vim: src/charset.c annotate

annotate src/charset.c @ 24649:31a7fa6b2e93 v8.2.2863

patch 8.2.2863: removing a text property does not redraw optimally Commit: https://github.com/vim/vim/commit/965c04486c9364ded99b49c86f4c41228503df1f Author: Bram Moolenaar <Bram@vim.org> Date: Mon May 17 00:22:06 2021 +0200 patch 8.2.2863: removing a text property does not redraw optimally Problem: Removing a text property does not redraw optimally. Solution: Only redraw the lines that mithg actually have been changed.

author	Bram Moolenaar <Bram@vim.org>
date	Mon, 17 May 2021 00:30:04 +0200
parents	fe4b6fc7149c
children	661d15592d3c

rev	line source
10042 4aead6a9b7a9 commit https://github.com/vim/vim/commit/edf3f97ae2af024708ebb4ac614227327033ca47 Christian Brabandt <cb@256bit.org> parents: 9399 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 #include "vim.h"
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	11
15595 1ec942f1b648 patch 8.1.0805: too many #ifdefs Bram Moolenaar <Bram@vim.org> parents: 14862 diff changeset	12 #if defined(HAVE_WCHAR_H)
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	13 # include <wchar.h> // for towupper() and towlower()
15595 1ec942f1b648 patch 8.1.0805: too many #ifdefs Bram Moolenaar <Bram@vim.org> parents: 14862 diff changeset	14 #endif
7799 af3c41a3c53f commit https://github.com/vim/vim/commit/f28dbcea371b3a35727d91afc90fb90e0527d78a Christian Brabandt <cb@256bit.org> parents: 7697 diff changeset	15 static int win_nolbr_chartabsize(win_T wp, char_u s, colnr_T col, int *headp);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	16
7799 af3c41a3c53f commit https://github.com/vim/vim/commit/f28dbcea371b3a35727d91afc90fb90e0527d78a Christian Brabandt <cb@256bit.org> parents: 7697 diff changeset	17 static unsigned nr2hex(unsigned c);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	18
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	19 static int chartab_initialized = FALSE;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	20
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	21 // b_chartab[] is an array of 32 bytes, each bit representing one of the
c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	22 // characters 0-255.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	23 #define SET_CHARTAB(buf, c) (buf)->b_chartab[(unsigned)(c) >> 3] \|= (1 << ((c) & 0x7))
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	24 #define RESET_CHARTAB(buf, c) (buf)->b_chartab[(unsigned)(c) >> 3] &= ~(1 << ((c) & 0x7))
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	25 #define GET_CHARTAB(buf, c) ((buf)->b_chartab[(unsigned)(c) >> 3] & (1 << ((c) & 0x7)))
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	26
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	27 // table used below, see init_chartab() for an explanation
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	28 static char_u g_chartab[256];
f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	29
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	30 /*
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	31 * Flags for g_chartab[].
f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	32 */
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	33 #define CT_CELL_MASK 0x07 // mask: nr of display cells (1, 2 or 4)
c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	34 #define CT_PRINT_CHAR 0x10 // flag: set for printable chars
c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	35 #define CT_ID_CHAR 0x20 // flag: set for ID chars
c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	36 #define CT_FNAME_CHAR 0x40 // flag: set for file name chars
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	37
17789 0f7ae8010787 patch 8.1.1891: functions used in one file are global Bram Moolenaar <Bram@vim.org> parents: 16819 diff changeset	38 static int in_win_border(win_T *wp, colnr_T vcol);
0f7ae8010787 patch 8.1.1891: functions used in one file are global Bram Moolenaar <Bram@vim.org> parents: 16819 diff changeset	39
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	40 /*
f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	41 * Fill g_chartab[]. Also fills curbuf->b_chartab[] with flags for keyword
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	42 * characters for current buffer.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	43 *
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	44 * Depends on the option settings 'iskeyword', 'isident', 'isfname',
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	45 * 'isprint' and 'encoding'.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	46 *
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	47 * The index in g_chartab[] depends on 'encoding':
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	48 * - For non-multi-byte index with the byte (same as the character).
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	49 * - For DBCS index with the first byte.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	50 * - For UTF-8 index with the character (when first byte is up to 0x80 it is
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	51 * the same as the character, if the first byte is 0x80 and above it depends
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	52 * on further bytes).
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	53 *
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	54 * The contents of g_chartab[]:
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	55 * - The lower two bits, masked by CT_CELL_MASK, give the number of display
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	56 * cells the character occupies (1 or 2). Not valid for UTF-8 above 0x80.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	57 * - CT_PRINT_CHAR bit is set when the character is printable (no need to
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	58 * translate the character before displaying it). Note that only DBCS
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	59 * characters can have 2 display cells and still be printable.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	60 * - CT_FNAME_CHAR bit is set when the character can be in a file name.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	61 * - CT_ID_CHAR bit is set when the character can be in an identifier.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	62 *
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	63 * Return FAIL if 'iskeyword', 'isident', 'isfname' or 'isprint' option has an
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	64 * error, OK otherwise.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	65 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	66 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	67 init_chartab(void)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	68 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	69 return buf_init_chartab(curbuf, TRUE);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	70 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	71
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	72 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	73 buf_init_chartab(
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	74 buf_T *buf,
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	75 int global) // FALSE: only set buf->b_chartab[]
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	76 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	77 int c;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	78 int c2;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	79 char_u *p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	80 int i;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	81 int tilde;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	82 int do_isalpha;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	83
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	84 if (global)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	85 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	86 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	87 * Set the default size for printable characters:
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	88 * From <Space> to '~' is 1 (printable), others are 2 (not printable).
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	89 * This also inits all 'isident' and 'isfname' flags to FALSE.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	90 *
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	91 * EBCDIC: all chars below ' ' are not printable, all others are
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	92 * printable.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	93 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	94 c = 0;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	95 while (c < ' ')
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	96 g_chartab[c++] = (dy_flags & DY_UHEX) ? 4 : 2;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	97 #ifdef EBCDIC
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	98 while (c < 255)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	99 #else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	100 while (c <= '~')
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	101 #endif
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	102 g_chartab[c++] = 1 + CT_PRINT_CHAR;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	103 while (c < 256)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	104 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	105 // UTF-8: bytes 0xa0 - 0xff are printable (latin1)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	106 if (enc_utf8 && c >= 0xa0)
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	107 g_chartab[c++] = CT_PRINT_CHAR + 1;
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	108 // euc-jp characters starting with 0x8e are single width
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	109 else if (enc_dbcs == DBCS_JPNU && c == 0x8e)
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	110 g_chartab[c++] = CT_PRINT_CHAR + 1;
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	111 // other double-byte chars can be printable AND double-width
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	112 else if (enc_dbcs != 0 && MB_BYTE2LEN(c) == 2)
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	113 g_chartab[c++] = CT_PRINT_CHAR + 2;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	114 else
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	115 // the rest is unprintable by default
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	116 g_chartab[c++] = (dy_flags & DY_UHEX) ? 4 : 2;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	117 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	118
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	119 // Assume that every multi-byte char is a filename character.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	120 for (c = 1; c < 256; ++c)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	121 if ((enc_dbcs != 0 && MB_BYTE2LEN(c) > 1)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	122 \|\| (enc_dbcs == DBCS_JPNU && c == 0x8e)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	123 \|\| (enc_utf8 && c >= 0xa0))
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	124 g_chartab[c] \|= CT_FNAME_CHAR;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	125 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	126
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	127 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	128 * Init word char flags all to FALSE
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	129 */
20007 aadd1cae2ff5 patch 8.2.0559: clearing a struct is verbose Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	130 CLEAR_FIELD(buf->b_chartab);
227 ef254e0f2365 updated for version 7.0063 vimboss parents: 221 diff changeset	131 if (enc_dbcs != 0)
ef254e0f2365 updated for version 7.0063 vimboss parents: 221 diff changeset	132 for (c = 0; c < 256; ++c)
ef254e0f2365 updated for version 7.0063 vimboss parents: 221 diff changeset	133 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	134 // double-byte characters are probably word characters
227 ef254e0f2365 updated for version 7.0063 vimboss parents: 221 diff changeset	135 if (MB_BYTE2LEN(c) == 2)
ef254e0f2365 updated for version 7.0063 vimboss parents: 221 diff changeset	136 SET_CHARTAB(buf, c);
ef254e0f2365 updated for version 7.0063 vimboss parents: 221 diff changeset	137 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	138
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	139 #ifdef FEAT_LISP
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	140 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	141 * In lisp mode the '-' character is included in keywords.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	142 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	143 if (buf->b_p_lisp)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	144 SET_CHARTAB(buf, '-');
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	145 #endif
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	146
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	147 // Walk through the 'isident', 'iskeyword', 'isfname' and 'isprint'
c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	148 // options Each option is a list of characters, character numbers or
c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	149 // ranges, separated by commas, e.g.: "200-210,x,#-178,-"
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	150 for (i = global ? 0 : 3; i <= 3; ++i)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	151 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	152 if (i == 0)
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	153 p = p_isi; // first round: 'isident'
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	154 else if (i == 1)
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	155 p = p_isp; // second round: 'isprint'
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	156 else if (i == 2)
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	157 p = p_isf; // third round: 'isfname'
c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	158 else // i == 3
c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	159 p = buf->b_p_isk; // fourth round: 'iskeyword'
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	160
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	161 while (*p)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	162 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	163 tilde = FALSE;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	164 do_isalpha = FALSE;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	165 if (*p == '^' && p[1] != NUL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	166 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	167 tilde = TRUE;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	168 ++p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	169 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	170 if (VIM_ISDIGIT(*p))
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	171 c = getdigits(&p);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	172 else
1955 3f1b2e6496de updated for version 7.2-252 vimboss parents: 1876 diff changeset	173 if (has_mbyte)
3f1b2e6496de updated for version 7.2-252 vimboss parents: 1876 diff changeset	174 c = mb_ptr2char_adv(&p);
3f1b2e6496de updated for version 7.2-252 vimboss parents: 1876 diff changeset	175 else
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	176 c = *p++;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	177 c2 = -1;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	178 if (*p == '-' && p[1] != NUL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	179 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	180 ++p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	181 if (VIM_ISDIGIT(*p))
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	182 c2 = getdigits(&p);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	183 else
1979 fd24e02210c9 updated for version 7.2-276 vimboss parents: 1970 diff changeset	184 if (has_mbyte)
fd24e02210c9 updated for version 7.2-276 vimboss parents: 1970 diff changeset	185 c2 = mb_ptr2char_adv(&p);
fd24e02210c9 updated for version 7.2-276 vimboss parents: 1970 diff changeset	186 else
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	187 c2 = *p++;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	188 }
1979 fd24e02210c9 updated for version 7.2-276 vimboss parents: 1970 diff changeset	189 if (c <= 0 \|\| c >= 256 \|\| (c2 < c && c2 != -1) \|\| c2 >= 256
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	190 \|\| !(p == NUL \|\| p == ','))
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	191 return FAIL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	192
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	193 if (c2 == -1) // not a range
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	194 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	195 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	196 * A single '@' (not "@-@"):
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	197 * Decide on letters being ID/printable/keyword chars with
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	198 * standard function isalpha(). This takes care of locale for
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	199 * single-byte characters).
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	200 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	201 if (c == '@')
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	202 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	203 do_isalpha = TRUE;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	204 c = 1;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	205 c2 = 255;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	206 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	207 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	208 c2 = c;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	209 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	210 while (c <= c2)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	211 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	212 // Use the MB_ functions here, because isalpha() doesn't
c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	213 // work properly when 'encoding' is "latin1" and the locale is
c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	214 // "C".
15850 a6ca8cf07a98 patch 8.1.0932: Farsi support is outdated and unused Bram Moolenaar <Bram@vim.org> parents: 15636 diff changeset	215 if (!do_isalpha \|\| MB_ISLOWER(c) \|\| MB_ISUPPER(c))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	216 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	217 if (i == 0) // (re)set ID flag
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	218 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	219 if (tilde)
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	220 g_chartab[c] &= ~CT_ID_CHAR;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	221 else
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	222 g_chartab[c] \|= CT_ID_CHAR;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	223 }
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	224 else if (i == 1) // (re)set printable
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	225 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	226 if ((c < ' '
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	227 #ifndef EBCDIC
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	228 \|\| c > '~'
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	229 #endif
15595 1ec942f1b648 patch 8.1.0805: too many #ifdefs Bram Moolenaar <Bram@vim.org> parents: 14862 diff changeset	230 // For double-byte we keep the cell width, so
1ec942f1b648 patch 8.1.0805: too many #ifdefs Bram Moolenaar <Bram@vim.org> parents: 14862 diff changeset	231 // that we can detect it from the first byte.
1ec942f1b648 patch 8.1.0805: too many #ifdefs Bram Moolenaar <Bram@vim.org> parents: 14862 diff changeset	232 ) && !(enc_dbcs && MB_BYTE2LEN(c) == 2))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	233 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	234 if (tilde)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	235 {
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	236 g_chartab[c] = (g_chartab[c] & ~CT_CELL_MASK)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	237 + ((dy_flags & DY_UHEX) ? 4 : 2);
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	238 g_chartab[c] &= ~CT_PRINT_CHAR;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	239 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	240 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	241 {
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	242 g_chartab[c] = (g_chartab[c] & ~CT_CELL_MASK) + 1;
f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	243 g_chartab[c] \|= CT_PRINT_CHAR;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	244 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	245 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	246 }
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	247 else if (i == 2) // (re)set fname flag
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	248 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	249 if (tilde)
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	250 g_chartab[c] &= ~CT_FNAME_CHAR;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	251 else
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	252 g_chartab[c] \|= CT_FNAME_CHAR;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	253 }
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	254 else // i == 3 (re)set keyword flag
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	255 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	256 if (tilde)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	257 RESET_CHARTAB(buf, c);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	258 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	259 SET_CHARTAB(buf, c);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	260 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	261 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	262 ++c;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	263 }
4096 cd5145d2408b updated for version 7.3.802 Bram Moolenaar <bram@vim.org> parents: 4080 diff changeset	264
cd5145d2408b updated for version 7.3.802 Bram Moolenaar <bram@vim.org> parents: 4080 diff changeset	265 c = *p;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	266 p = skip_to_option_part(p);
4096 cd5145d2408b updated for version 7.3.802 Bram Moolenaar <bram@vim.org> parents: 4080 diff changeset	267 if (c == ',' && *p == NUL)
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	268 // Trailing comma is not allowed.
4096 cd5145d2408b updated for version 7.3.802 Bram Moolenaar <bram@vim.org> parents: 4080 diff changeset	269 return FAIL;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	270 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	271 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	272 chartab_initialized = TRUE;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	273 return OK;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	274 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	275
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	276 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	277 * Translate any special characters in buf[bufsize] in-place.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	278 * The result is a string with only printable characters, but if there is not
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	279 * enough room, not all characters will be translated.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	280 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	281 void
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	282 trans_characters(
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	283 char_u *buf,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	284 int bufsize)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	285 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	286 int len; // length of string needing translation
c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	287 int room; // room in buffer after string
c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	288 char_u *trs; // translated character
c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	289 int trs_len; // length of trs[]
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	290
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	291 len = (int)STRLEN(buf);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	292 room = bufsize - len;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	293 while (*buf != 0)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	294 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	295 // Assume a multi-byte character doesn't need translation.
474 a5fcf36ef512 updated for version 7.0127 vimboss parents: 308 diff changeset	296 if (has_mbyte && (trs_len = (*mb_ptr2len)(buf)) > 1)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	297 len -= trs_len;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	298 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	299 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	300 trs = transchar_byte(*buf);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	301 trs_len = (int)STRLEN(trs);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	302 if (trs_len > 1)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	303 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	304 room -= trs_len - 1;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	305 if (room <= 0)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	306 return;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	307 mch_memmove(buf + trs_len, buf + 1, (size_t)len);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	308 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	309 mch_memmove(buf, trs, (size_t)trs_len);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	310 --len;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	311 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	312 buf += trs_len;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	313 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	314 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	315
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	316 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	317 * Translate a string into allocated memory, replacing special chars with
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	318 * printable chars. Returns NULL when out of memory.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	319 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	320 char_u *
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	321 transstr(char_u *s)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	322 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	323 char_u *res;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	324 char_u *p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	325 int l, len, c;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	326 char_u hexbuf[11];
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	327
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	328 if (has_mbyte)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	329 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	330 // Compute the length of the result, taking account of unprintable
c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	331 // multi-byte characters.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	332 len = 0;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	333 p = s;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	334 while (*p != NUL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	335 {
474 a5fcf36ef512 updated for version 7.0127 vimboss parents: 308 diff changeset	336 if ((l = (*mb_ptr2len)(p)) > 1)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	337 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	338 c = (*mb_ptr2char)(p);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	339 p += l;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	340 if (vim_isprintc(c))
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	341 len += l;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	342 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	343 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	344 transchar_hex(hexbuf, c);
835 8bebcabccc2c updated for version 7.0e01 vimboss parents: 782 diff changeset	345 len += (int)STRLEN(hexbuf);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	346 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	347 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	348 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	349 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	350 l = byte2cells(*p++);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	351 if (l > 0)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	352 len += l;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	353 else
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	354 len += 4; // illegal byte sequence
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	355 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	356 }
16764 ef00b6bc186b patch 8.1.1384: using "int" for alloc() often results in compiler warnings Bram Moolenaar <Bram@vim.org> parents: 16706 diff changeset	357 res = alloc(len + 1);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	358 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	359 else
16764 ef00b6bc186b patch 8.1.1384: using "int" for alloc() often results in compiler warnings Bram Moolenaar <Bram@vim.org> parents: 16706 diff changeset	360 res = alloc(vim_strsize(s) + 1);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	361 if (res != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	362 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	363 *res = NUL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	364 p = s;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	365 while (*p != NUL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	366 {
474 a5fcf36ef512 updated for version 7.0127 vimboss parents: 308 diff changeset	367 if (has_mbyte && (l = (*mb_ptr2len)(p)) > 1)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	368 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	369 c = (*mb_ptr2char)(p);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	370 if (vim_isprintc(c))
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	371 STRNCAT(res, p, l); // append printable multi-byte char
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	372 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	373 transchar_hex(res + STRLEN(res), c);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	374 p += l;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	375 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	376 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	377 STRCAT(res, transchar_byte(*p++));
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	378 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	379 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	380 return res;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	381 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	382
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	383 /*
221 7fd4b5df33be updated for version 7.0062 vimboss parents: 130 diff changeset	384 * Convert the string "str[orglen]" to do ignore-case comparing. Uses the
7fd4b5df33be updated for version 7.0062 vimboss parents: 130 diff changeset	385 * current locale.
130 964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	386 * When "buf" is NULL returns an allocated string (NULL for out-of-memory).
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	387 * Otherwise puts the result in "buf[buflen]".
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	388 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	389 char_u *
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	390 str_foldcase(
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	391 char_u *str,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	392 int orglen,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	393 char_u *buf,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	394 int buflen)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	395 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	396 garray_T ga;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	397 int i;
130 964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	398 int len = orglen;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	399
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	400 #define GA_CHAR(i) ((char_u *)ga.ga_data)[i]
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	401 #define GA_PTR(i) ((char_u *)ga.ga_data + i)
130 964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	402 #define STR_CHAR(i) (buf == NULL ? GA_CHAR(i) : buf[i])
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	403 #define STR_PTR(i) (buf == NULL ? GA_PTR(i) : buf + i)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	404
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	405 // Copy "str" into "buf" or allocated memory, unmodified.
130 964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	406 if (buf == NULL)
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	407 {
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	408 ga_init2(&ga, 1, 10);
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	409 if (ga_grow(&ga, len + 1) == FAIL)
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	410 return NULL;
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	411 mch_memmove(ga.ga_data, str, (size_t)len);
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	412 ga.ga_len = len;
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	413 }
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	414 else
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	415 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	416 if (len >= buflen) // Ugly!
130 964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	417 len = buflen - 1;
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	418 mch_memmove(buf, str, (size_t)len);
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	419 }
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	420 if (buf == NULL)
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	421 GA_CHAR(len) = NUL;
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	422 else
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	423 buf[len] = NUL;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	424
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	425 // Make each character lower case.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	426 i = 0;
130 964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	427 while (STR_CHAR(i) != NUL)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	428 {
130 964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	429 if (enc_utf8 \|\| (has_mbyte && MB_BYTE2LEN(STR_CHAR(i)) > 1))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	430 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	431 if (enc_utf8)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	432 {
1654 0eef0f621811 updated for version 7.2a-006 vimboss parents: 1621 diff changeset	433 int c = utf_ptr2char(STR_PTR(i));
3263 320cc46d0eb0 updated for version 7.3.400 Bram Moolenaar <bram@vim.org> parents: 2541 diff changeset	434 int olen = utf_ptr2len(STR_PTR(i));
1654 0eef0f621811 updated for version 7.2a-006 vimboss parents: 1621 diff changeset	435 int lc = utf_tolower(c);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	436
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	437 // Only replace the character when it is not an invalid
c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	438 // sequence (ASCII character or more than one byte) and
c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	439 // utf_tolower() doesn't return the original character.
3263 320cc46d0eb0 updated for version 7.3.400 Bram Moolenaar <bram@vim.org> parents: 2541 diff changeset	440 if ((c < 0x80 \|\| olen > 1) && c != lc)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	441 {
3263 320cc46d0eb0 updated for version 7.3.400 Bram Moolenaar <bram@vim.org> parents: 2541 diff changeset	442 int nlen = utf_char2len(lc);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	443
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	444 // If the byte length changes need to shift the following
c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	445 // characters forward or backward.
3263 320cc46d0eb0 updated for version 7.3.400 Bram Moolenaar <bram@vim.org> parents: 2541 diff changeset	446 if (olen != nlen)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	447 {
3263 320cc46d0eb0 updated for version 7.3.400 Bram Moolenaar <bram@vim.org> parents: 2541 diff changeset	448 if (nlen > olen)
130 964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	449 {
3263 320cc46d0eb0 updated for version 7.3.400 Bram Moolenaar <bram@vim.org> parents: 2541 diff changeset	450 if (buf == NULL
320cc46d0eb0 updated for version 7.3.400 Bram Moolenaar <bram@vim.org> parents: 2541 diff changeset	451 ? ga_grow(&ga, nlen - olen + 1) == FAIL
320cc46d0eb0 updated for version 7.3.400 Bram Moolenaar <bram@vim.org> parents: 2541 diff changeset	452 : len + nlen - olen >= buflen)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	453 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	454 // out of memory, keep old char
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	455 lc = c;
3263 320cc46d0eb0 updated for version 7.3.400 Bram Moolenaar <bram@vim.org> parents: 2541 diff changeset	456 nlen = olen;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	457 }
130 964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	458 }
3263 320cc46d0eb0 updated for version 7.3.400 Bram Moolenaar <bram@vim.org> parents: 2541 diff changeset	459 if (olen != nlen)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	460 {
130 964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	461 if (buf == NULL)
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	462 {
3263 320cc46d0eb0 updated for version 7.3.400 Bram Moolenaar <bram@vim.org> parents: 2541 diff changeset	463 STRMOVE(GA_PTR(i) + nlen, GA_PTR(i) + olen);
320cc46d0eb0 updated for version 7.3.400 Bram Moolenaar <bram@vim.org> parents: 2541 diff changeset	464 ga.ga_len += nlen - olen;
130 964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	465 }
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	466 else
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	467 {
3263 320cc46d0eb0 updated for version 7.3.400 Bram Moolenaar <bram@vim.org> parents: 2541 diff changeset	468 STRMOVE(buf + i + nlen, buf + i + olen);
320cc46d0eb0 updated for version 7.3.400 Bram Moolenaar <bram@vim.org> parents: 2541 diff changeset	469 len += nlen - olen;
130 964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	470 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	471 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	472 }
130 964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	473 (void)utf_char2bytes(lc, STR_PTR(i));
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	474 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	475 }
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	476 // skip to next multi-byte char
474 a5fcf36ef512 updated for version 7.0127 vimboss parents: 308 diff changeset	477 i += (*mb_ptr2len)(STR_PTR(i));
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	478 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	479 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	480 {
130 964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	481 if (buf == NULL)
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	482 GA_CHAR(i) = TOLOWER_LOC(GA_CHAR(i));
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	483 else
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	484 buf[i] = TOLOWER_LOC(buf[i]);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	485 ++i;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	486 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	487 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	488
130 964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	489 if (buf == NULL)
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	490 return (char_u *)ga.ga_data;
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	491 return buf;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	492 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	493
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	494 /*
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	495 * Catch 22: g_chartab[] can't be initialized before the options are
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	496 * initialized, and initializing options may cause transchar() to be called!
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	497 * When chartab_initialized == FALSE don't use g_chartab[].
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	498 * Does NOT work for multi-byte characters, c must be <= 255.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	499 * Also doesn't work for the first byte of a multi-byte, "c" must be a
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	500 * character!
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	501 */
20782 c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	502 static char_u transchar_charbuf[7];
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	503
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	504 char_u *
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	505 transchar(int c)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	506 {
20782 c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	507 return transchar_buf(curbuf, c);
c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	508 }
c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	509
c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	510 char_u *
c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	511 transchar_buf(buf_T *buf, int c)
c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	512 {
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	513 int i;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	514
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	515 i = 0;
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	516 if (IS_SPECIAL(c)) // special key code, display as ~@ char
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	517 {
20782 c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	518 transchar_charbuf[0] = '~';
c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	519 transchar_charbuf[1] = '@';
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	520 i = 2;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	521 c = K_SECOND(c);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	522 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	523
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	524 if ((!chartab_initialized && (
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	525 #ifdef EBCDIC
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	526 (c >= 64 && c < 255)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	527 #else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	528 (c >= ' ' && c <= '~')
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	529 #endif
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	530 )) \|\| (c < 256 && vim_isprintc_strict(c)))
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	531 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	532 // printable character
20782 c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	533 transchar_charbuf[i] = c;
c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	534 transchar_charbuf[i + 1] = NUL;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	535 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	536 else
20782 c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	537 transchar_nonprint(buf, transchar_charbuf + i, c);
c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	538 return transchar_charbuf;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	539 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	540
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	541 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	542 * Like transchar(), but called with a byte instead of a character. Checks
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	543 * for an illegal UTF-8 byte.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	544 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	545 char_u *
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	546 transchar_byte(int c)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	547 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	548 if (enc_utf8 && c >= 0x80)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	549 {
20782 c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	550 transchar_nonprint(curbuf, transchar_charbuf, c);
c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	551 return transchar_charbuf;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	552 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	553 return transchar(c);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	554 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	555
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	556 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	557 * Convert non-printable character to two or more printable characters in
20782 c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	558 * "buf[]". "charbuf" needs to be able to hold five bytes.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	559 * Does NOT work for multi-byte characters, c must be <= 255.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	560 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	561 void
20782 c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	562 transchar_nonprint(buf_T buf, char_u charbuf, int c)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	563 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	564 if (c == NL)
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	565 c = NUL; // we use newline in place of a NUL
20782 c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	566 else if (c == CAR && get_fileformat(buf) == EOL_MAC)
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	567 c = NL; // we use CR in place of NL in this case
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	568
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	569 if (dy_flags & DY_UHEX) // 'display' has "uhex"
20782 c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	570 transchar_hex(charbuf, c);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	571
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	572 #ifdef EBCDIC
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	573 // For EBCDIC only the characters 0-63 and 255 are not printable
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	574 else if (CtrlChar(c) != 0 \|\| c == DEL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	575 #else
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	576 else if (c <= 0x7f) // 0x00 - 0x1f and 0x7f
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	577 #endif
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	578 {
20782 c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	579 charbuf[0] = '^';
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	580 #ifdef EBCDIC
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	581 if (c == DEL)
20782 c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	582 charbuf[1] = '?'; // DEL displayed as ^?
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	583 else
20782 c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	584 charbuf[1] = CtrlChar(c);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	585 #else
20782 c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	586 charbuf[1] = c ^ 0x40; // DEL displayed as ^?
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	587 #endif
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	588
20782 c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	589 charbuf[2] = NUL;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	590 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	591 else if (enc_utf8 && c >= 0x80)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	592 {
20782 c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	593 transchar_hex(charbuf, c);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	594 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	595 #ifndef EBCDIC
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	596 else if (c >= ' ' + 0x80 && c <= '~' + 0x80) // 0xa0 - 0xfe
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	597 {
20782 c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	598 charbuf[0] = '\|';
c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	599 charbuf[1] = c - 0x80;
c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	600 charbuf[2] = NUL;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	601 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	602 #else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	603 else if (c < 64)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	604 {
20782 c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	605 charbuf[0] = '~';
c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	606 charbuf[1] = MetaChar(c);
c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	607 charbuf[2] = NUL;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	608 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	609 #endif
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	610 else // 0x80 - 0x9f and 0xff
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	611 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	612 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	613 * TODO: EBCDIC I don't know what to do with this chars, so I display
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	614 * them as '~?' for now
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	615 */
20782 c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	616 charbuf[0] = '~';
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	617 #ifdef EBCDIC
20782 c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	618 charbuf[1] = '?'; // 0xff displayed as ~?
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	619 #else
20782 c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	620 charbuf[1] = (c - 0x80) ^ 0x40; // 0xff displayed as ~?
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	621 #endif
20782 c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	622 charbuf[2] = NUL;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	623 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	624 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	625
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	626 void
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	627 transchar_hex(char_u *buf, int c)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	628 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	629 int i = 0;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	630
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	631 buf[0] = '<';
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	632 if (c > 255)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	633 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	634 buf[++i] = nr2hex((unsigned)c >> 12);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	635 buf[++i] = nr2hex((unsigned)c >> 8);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	636 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	637 buf[++i] = nr2hex((unsigned)c >> 4);
1869 720a59d79bcd updated for version 7.2-168 vimboss parents: 1687 diff changeset	638 buf[++i] = nr2hex((unsigned)c);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	639 buf[++i] = '>';
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	640 buf[++i] = NUL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	641 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	642
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	643 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	644 * Convert the lower 4 bits of byte "c" to its hex character.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	645 * Lower case letters are used to avoid the confusion of <F1> being 0xf1 or
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	646 * function key 1.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	647 */
1869 720a59d79bcd updated for version 7.2-168 vimboss parents: 1687 diff changeset	648 static unsigned
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	649 nr2hex(unsigned c)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	650 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	651 if ((c & 0xf) <= 9)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	652 return (c & 0xf) + '0';
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	653 return (c & 0xf) - 10 + 'a';
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	654 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	655
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	656 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	657 * Return number of display cells occupied by byte "b".
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	658 * Caller must make sure 0 <= b <= 255.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	659 * For multi-byte mode "b" must be the first byte of a character.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	660 * A TAB is counted as two cells: "^I".
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	661 * For UTF-8 mode this will return 0 for bytes >= 0x80, because the number of
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	662 * cells depends on further bytes.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	663 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	664 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	665 byte2cells(int b)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	666 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	667 if (enc_utf8 && b >= 0x80)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	668 return 0;
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	669 return (g_chartab[b] & CT_CELL_MASK);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	670 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	671
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	672 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	673 * Return number of display cells occupied by character "c".
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	674 * "c" can be a special key (negative number) in which case 3 or 4 is returned.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	675 * A TAB is counted as two cells: "^I" or four: "<09>".
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	676 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	677 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	678 char2cells(int c)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	679 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	680 if (IS_SPECIAL(c))
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	681 return char2cells(K_SECOND(c)) + 2;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	682 if (c >= 0x80)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	683 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	684 // UTF-8: above 0x80 need to check the value
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	685 if (enc_utf8)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	686 return utf_char2cells(c);
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	687 // DBCS: double-byte means double-width, except for euc-jp with first
c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	688 // byte 0x8e
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	689 if (enc_dbcs != 0 && c >= 0x100)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	690 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	691 if (enc_dbcs == DBCS_JPNU && ((unsigned)c >> 8) == 0x8e)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	692 return 1;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	693 return 2;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	694 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	695 }
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	696 return (g_chartab[c & 0xff] & CT_CELL_MASK);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	697 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	698
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	699 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	700 * Return number of display cells occupied by character at "*p".
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	701 * A TAB is counted as two cells: "^I" or four: "<09>".
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	702 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	703 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	704 ptr2cells(char_u *p)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	705 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	706 // For UTF-8 we need to look at more bytes if the first byte is >= 0x80.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	707 if (enc_utf8 && *p >= 0x80)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	708 return utf_ptr2cells(p);
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	709 // For DBCS we can tell the cell count from the first byte.
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	710 return (g_chartab[*p] & CT_CELL_MASK);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	711 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	712
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	713 /*
3292 c7861dd3b593 updated for version 7.3.414 Bram Moolenaar <bram@vim.org> parents: 3263 diff changeset	714 * Return the number of character cells string "s" will take on the screen,
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	715 * counting TABs as two characters: "^I".
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	716 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	717 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	718 vim_strsize(char_u *s)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	719 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	720 return vim_strnsize(s, (int)MAXCOL);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	721 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	722
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	723 /*
3292 c7861dd3b593 updated for version 7.3.414 Bram Moolenaar <bram@vim.org> parents: 3263 diff changeset	724 * Return the number of character cells string "s[len]" will take on the
c7861dd3b593 updated for version 7.3.414 Bram Moolenaar <bram@vim.org> parents: 3263 diff changeset	725 * screen, counting TABs as two characters: "^I".
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	726 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	727 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	728 vim_strnsize(char_u *s, int len)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	729 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	730 int size = 0;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	731
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	732 while (*s != NUL && --len >= 0)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	733 if (has_mbyte)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	734 {
474 a5fcf36ef512 updated for version 7.0127 vimboss parents: 308 diff changeset	735 int l = (*mb_ptr2len)(s);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	736
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	737 size += ptr2cells(s);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	738 s += l;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	739 len -= l - 1;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	740 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	741 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	742 size += byte2cells(*s++);
15595 1ec942f1b648 patch 8.1.0805: too many #ifdefs Bram Moolenaar <Bram@vim.org> parents: 14862 diff changeset	743
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	744 return size;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	745 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	746
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	747 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	748 * Return the number of characters 'c' will take on the screen, taking
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	749 * into account the size of a tab.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	750 * Use a define to make it fast, this is used very often!!!
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	751 * Also see getvcol() below.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	752 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	753
14175 2ad722003b36 patch 8.1.0105: all tab stops are the same Christian Brabandt <cb@256bit.org> parents: 14061 diff changeset	754 #ifdef FEAT_VARTABS
2ad722003b36 patch 8.1.0105: all tab stops are the same Christian Brabandt <cb@256bit.org> parents: 14061 diff changeset	755 # define RET_WIN_BUF_CHARTABSIZE(wp, buf, p, col) \
23952 44be09b25619 patch 8.2.2518: 'listchars' should be window-local Bram Moolenaar <Bram@vim.org> parents: 23533 diff changeset	756 if (*(p) == TAB && (!(wp)->w_p_list \|\| wp->w_lcs_chars.tab1)) \
14175 2ad722003b36 patch 8.1.0105: all tab stops are the same Christian Brabandt <cb@256bit.org> parents: 14061 diff changeset	757 { \
2ad722003b36 patch 8.1.0105: all tab stops are the same Christian Brabandt <cb@256bit.org> parents: 14061 diff changeset	758 return tabstop_padding(col, (buf)->b_p_ts, (buf)->b_p_vts_array); \
2ad722003b36 patch 8.1.0105: all tab stops are the same Christian Brabandt <cb@256bit.org> parents: 14061 diff changeset	759 } \
2ad722003b36 patch 8.1.0105: all tab stops are the same Christian Brabandt <cb@256bit.org> parents: 14061 diff changeset	760 else \
2ad722003b36 patch 8.1.0105: all tab stops are the same Christian Brabandt <cb@256bit.org> parents: 14061 diff changeset	761 return ptr2cells(p);
2ad722003b36 patch 8.1.0105: all tab stops are the same Christian Brabandt <cb@256bit.org> parents: 14061 diff changeset	762 #else
2ad722003b36 patch 8.1.0105: all tab stops are the same Christian Brabandt <cb@256bit.org> parents: 14061 diff changeset	763 # define RET_WIN_BUF_CHARTABSIZE(wp, buf, p, col) \
23952 44be09b25619 patch 8.2.2518: 'listchars' should be window-local Bram Moolenaar <Bram@vim.org> parents: 23533 diff changeset	764 if (*(p) == TAB && (!(wp)->w_p_list \|\| wp->w_lcs_chars.tab1)) \
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	765 { \
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	766 int ts; \
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	767 ts = (buf)->b_p_ts; \
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	768 return (int)(ts - (col % ts)); \
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	769 } \
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	770 else \
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	771 return ptr2cells(p);
14175 2ad722003b36 patch 8.1.0105: all tab stops are the same Christian Brabandt <cb@256bit.org> parents: 14061 diff changeset	772 #endif
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	773
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	774 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	775 chartabsize(char_u *p, colnr_T col)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	776 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	777 RET_WIN_BUF_CHARTABSIZE(curwin, curbuf, p, col)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	778 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	779
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	780 #ifdef FEAT_LINEBREAK
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	781 static int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	782 win_chartabsize(win_T wp, char_u p, colnr_T col)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	783 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	784 RET_WIN_BUF_CHARTABSIZE(wp, wp->w_buffer, p, col)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	785 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	786 #endif
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	787
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	788 /*
2339 01e4b4d37842 Added strdisplaywidth() function. Bram Moolenaar <bram@vim.org> parents: 2108 diff changeset	789 * Return the number of characters the string 's' will take on the screen,
01e4b4d37842 Added strdisplaywidth() function. Bram Moolenaar <bram@vim.org> parents: 2108 diff changeset	790 * taking into account the size of a tab.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	791 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	792 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	793 linetabsize(char_u *s)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	794 {
2339 01e4b4d37842 Added strdisplaywidth() function. Bram Moolenaar <bram@vim.org> parents: 2108 diff changeset	795 return linetabsize_col(0, s);
01e4b4d37842 Added strdisplaywidth() function. Bram Moolenaar <bram@vim.org> parents: 2108 diff changeset	796 }
01e4b4d37842 Added strdisplaywidth() function. Bram Moolenaar <bram@vim.org> parents: 2108 diff changeset	797
01e4b4d37842 Added strdisplaywidth() function. Bram Moolenaar <bram@vim.org> parents: 2108 diff changeset	798 /*
01e4b4d37842 Added strdisplaywidth() function. Bram Moolenaar <bram@vim.org> parents: 2108 diff changeset	799 * Like linetabsize(), but starting at column "startcol".
01e4b4d37842 Added strdisplaywidth() function. Bram Moolenaar <bram@vim.org> parents: 2108 diff changeset	800 */
01e4b4d37842 Added strdisplaywidth() function. Bram Moolenaar <bram@vim.org> parents: 2108 diff changeset	801 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	802 linetabsize_col(int startcol, char_u *s)
2339 01e4b4d37842 Added strdisplaywidth() function. Bram Moolenaar <bram@vim.org> parents: 2108 diff changeset	803 {
01e4b4d37842 Added strdisplaywidth() function. Bram Moolenaar <bram@vim.org> parents: 2108 diff changeset	804 colnr_T col = startcol;
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	805 char_u *line = s; // pointer to start of line, for breakindent
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	806
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	807 while (*s != NUL)
5995 ef83b423ebf7 updated for version 7.4.338 Bram Moolenaar <bram@vim.org> parents: 5735 diff changeset	808 col += lbr_chartabsize_adv(line, &s, col);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	809 return (int)col;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	810 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	811
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	812 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	813 * Like linetabsize(), but for a given window instead of the current one.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	814 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	815 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	816 win_linetabsize(win_T wp, char_u line, colnr_T len)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	817 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	818 colnr_T col = 0;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	819 char_u *s;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	820
5995 ef83b423ebf7 updated for version 7.4.338 Bram Moolenaar <bram@vim.org> parents: 5735 diff changeset	821 for (s = line; *s != NUL && (len == MAXCOL \|\| s < line + len);
11127 506f5d8b7d8b patch 8.0.0451: some macros are in lower case Christian Brabandt <cb@256bit.org> parents: 11121 diff changeset	822 MB_PTR_ADV(s))
5995 ef83b423ebf7 updated for version 7.4.338 Bram Moolenaar <bram@vim.org> parents: 5735 diff changeset	823 col += win_lbr_chartabsize(wp, line, s, col, NULL);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	824 return (int)col;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	825 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	826
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	827 /*
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	828 * Return TRUE if 'c' is a normal identifier character:
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	829 * Letters and characters from the 'isident' option.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	830 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	831 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	832 vim_isIDc(int c)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	833 {
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	834 return (c > 0 && c < 0x100 && (g_chartab[c] & CT_ID_CHAR));
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	835 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	836
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	837 /*
24375 fe4b6fc7149c patch 8.2.2728: special key names don't work if 'isident' is cleared Bram Moolenaar <Bram@vim.org> parents: 24268 diff changeset	838 * Like vim_isIDc() but not using the 'isident' option: letters, numbers and
fe4b6fc7149c patch 8.2.2728: special key names don't work if 'isident' is cleared Bram Moolenaar <Bram@vim.org> parents: 24268 diff changeset	839 * underscore.
fe4b6fc7149c patch 8.2.2728: special key names don't work if 'isident' is cleared Bram Moolenaar <Bram@vim.org> parents: 24268 diff changeset	840 */
fe4b6fc7149c patch 8.2.2728: special key names don't work if 'isident' is cleared Bram Moolenaar <Bram@vim.org> parents: 24268 diff changeset	841 int
fe4b6fc7149c patch 8.2.2728: special key names don't work if 'isident' is cleared Bram Moolenaar <Bram@vim.org> parents: 24268 diff changeset	842 vim_isNormalIDc(int c)
fe4b6fc7149c patch 8.2.2728: special key names don't work if 'isident' is cleared Bram Moolenaar <Bram@vim.org> parents: 24268 diff changeset	843 {
fe4b6fc7149c patch 8.2.2728: special key names don't work if 'isident' is cleared Bram Moolenaar <Bram@vim.org> parents: 24268 diff changeset	844 return ASCII_ISALNUM(c) \|\| c == '_';
fe4b6fc7149c patch 8.2.2728: special key names don't work if 'isident' is cleared Bram Moolenaar <Bram@vim.org> parents: 24268 diff changeset	845 }
fe4b6fc7149c patch 8.2.2728: special key names don't work if 'isident' is cleared Bram Moolenaar <Bram@vim.org> parents: 24268 diff changeset	846
fe4b6fc7149c patch 8.2.2728: special key names don't work if 'isident' is cleared Bram Moolenaar <Bram@vim.org> parents: 24268 diff changeset	847 /*
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	848 * return TRUE if 'c' is a keyword character: Letters and characters from
10549 055b1633aed7 patch 8.0.0164: outdated and misplaced comments Christian Brabandt <cb@256bit.org> parents: 10042 diff changeset	849 * 'iskeyword' option for the current buffer.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	850 * For multi-byte characters mb_get_class() is used (builtin rules).
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	851 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	852 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	853 vim_iswordc(int c)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	854 {
4043 80b041b994d1 updated for version 7.3.776 Bram Moolenaar <bram@vim.org> parents: 3533 diff changeset	855 return vim_iswordc_buf(c, curbuf);
80b041b994d1 updated for version 7.3.776 Bram Moolenaar <bram@vim.org> parents: 3533 diff changeset	856 }
80b041b994d1 updated for version 7.3.776 Bram Moolenaar <bram@vim.org> parents: 3533 diff changeset	857
80b041b994d1 updated for version 7.3.776 Bram Moolenaar <bram@vim.org> parents: 3533 diff changeset	858 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	859 vim_iswordc_buf(int c, buf_T *buf)
4043 80b041b994d1 updated for version 7.3.776 Bram Moolenaar <bram@vim.org> parents: 3533 diff changeset	860 {
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	861 if (c >= 0x100)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	862 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	863 if (enc_dbcs != 0)
1869 720a59d79bcd updated for version 7.2-168 vimboss parents: 1687 diff changeset	864 return dbcs_class((unsigned)c >> 8, (unsigned)(c & 0xff)) >= 2;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	865 if (enc_utf8)
10724 ae1c6bf22e5f patch 8.0.0252: not properly recognizing word characters between 128 and 255 Christian Brabandt <cb@256bit.org> parents: 10720 diff changeset	866 return utf_class_buf(c, buf) >= 2;
ae1c6bf22e5f patch 8.0.0252: not properly recognizing word characters between 128 and 255 Christian Brabandt <cb@256bit.org> parents: 10720 diff changeset	867 return FALSE;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	868 }
10724 ae1c6bf22e5f patch 8.0.0252: not properly recognizing word characters between 128 and 255 Christian Brabandt <cb@256bit.org> parents: 10720 diff changeset	869 return (c > 0 && GET_CHARTAB(buf, c) != 0);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	870 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	871
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	872 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	873 * Just like vim_iswordc() but uses a pointer to the (multi-byte) character.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	874 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	875 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	876 vim_iswordp(char_u *p)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	877 {
10724 ae1c6bf22e5f patch 8.0.0252: not properly recognizing word characters between 128 and 255 Christian Brabandt <cb@256bit.org> parents: 10720 diff changeset	878 return vim_iswordp_buf(p, curbuf);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	879 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	880
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	881 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	882 vim_iswordp_buf(char_u p, buf_T buf)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	883 {
10724 ae1c6bf22e5f patch 8.0.0252: not properly recognizing word characters between 128 and 255 Christian Brabandt <cb@256bit.org> parents: 10720 diff changeset	884 int c = *p;
ae1c6bf22e5f patch 8.0.0252: not properly recognizing word characters between 128 and 255 Christian Brabandt <cb@256bit.org> parents: 10720 diff changeset	885
ae1c6bf22e5f patch 8.0.0252: not properly recognizing word characters between 128 and 255 Christian Brabandt <cb@256bit.org> parents: 10720 diff changeset	886 if (has_mbyte && MB_BYTE2LEN(c) > 1)
ae1c6bf22e5f patch 8.0.0252: not properly recognizing word characters between 128 and 255 Christian Brabandt <cb@256bit.org> parents: 10720 diff changeset	887 c = (*mb_ptr2char)(p);
ae1c6bf22e5f patch 8.0.0252: not properly recognizing word characters between 128 and 255 Christian Brabandt <cb@256bit.org> parents: 10720 diff changeset	888 return vim_iswordc_buf(c, buf);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	889 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	890
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	891 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	892 * return TRUE if 'c' is a valid file-name character
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	893 * Assume characters above 0x100 are valid (multi-byte).
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	894 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	895 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	896 vim_isfilec(int c)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	897 {
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	898 return (c >= 0x100 \|\| (c > 0 && (g_chartab[c] & CT_FNAME_CHAR)));
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	899 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	900
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	901 /*
1369 1d4c67f84709 updated for version 7.1-084 vimboss parents: 1365 diff changeset	902 * return TRUE if 'c' is a valid file-name character or a wildcard character
1d4c67f84709 updated for version 7.1-084 vimboss parents: 1365 diff changeset	903 * Assume characters above 0x100 are valid (multi-byte).
1d4c67f84709 updated for version 7.1-084 vimboss parents: 1365 diff changeset	904 * Explicitly interpret ']' as a wildcard character as mch_has_wildcard("]")
1d4c67f84709 updated for version 7.1-084 vimboss parents: 1365 diff changeset	905 * returns false.
1d4c67f84709 updated for version 7.1-084 vimboss parents: 1365 diff changeset	906 */
1d4c67f84709 updated for version 7.1-084 vimboss parents: 1365 diff changeset	907 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	908 vim_isfilec_or_wc(int c)
1369 1d4c67f84709 updated for version 7.1-084 vimboss parents: 1365 diff changeset	909 {
1d4c67f84709 updated for version 7.1-084 vimboss parents: 1365 diff changeset	910 char_u buf[2];
1d4c67f84709 updated for version 7.1-084 vimboss parents: 1365 diff changeset	911
1d4c67f84709 updated for version 7.1-084 vimboss parents: 1365 diff changeset	912 buf[0] = (char_u)c;
1d4c67f84709 updated for version 7.1-084 vimboss parents: 1365 diff changeset	913 buf[1] = NUL;
1d4c67f84709 updated for version 7.1-084 vimboss parents: 1365 diff changeset	914 return vim_isfilec(c) \|\| c == ']' \|\| mch_has_wildcard(buf);
1d4c67f84709 updated for version 7.1-084 vimboss parents: 1365 diff changeset	915 }
1d4c67f84709 updated for version 7.1-084 vimboss parents: 1365 diff changeset	916
1d4c67f84709 updated for version 7.1-084 vimboss parents: 1365 diff changeset	917 /*
11333 fef09eb74832 patch 8.0.0552: toupper and tolower don't work properly for Turkish Christian Brabandt <cb@256bit.org> parents: 11133 diff changeset	918 * Return TRUE if 'c' is a printable character.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	919 * Assume characters above 0x100 are printable (multi-byte), except for
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	920 * Unicode.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	921 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	922 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	923 vim_isprintc(int c)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	924 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	925 if (enc_utf8 && c >= 0x100)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	926 return utf_printable(c);
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	927 return (c >= 0x100 \|\| (c > 0 && (g_chartab[c] & CT_PRINT_CHAR)));
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	928 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	929
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	930 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	931 * Strict version of vim_isprintc(c), don't return TRUE if "c" is the head
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	932 * byte of a double-byte character.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	933 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	934 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	935 vim_isprintc_strict(int c)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	936 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	937 if (enc_dbcs != 0 && c < 0x100 && MB_BYTE2LEN(c) > 1)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	938 return FALSE;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	939 if (enc_utf8 && c >= 0x100)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	940 return utf_printable(c);
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	941 return (c >= 0x100 \|\| (c > 0 && (g_chartab[c] & CT_PRINT_CHAR)));
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	942 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	943
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	944 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	945 * like chartabsize(), but also check for line breaks on the screen
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	946 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	947 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	948 lbr_chartabsize(
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	949 char_u *line UNUSED, // start of the line
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	950 unsigned char *s,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	951 colnr_T col)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	952 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	953 #ifdef FEAT_LINEBREAK
18574 8b0114ffde2b patch 8.1.2281: 'showbreak' cannot be set for one window Bram Moolenaar <Bram@vim.org> parents: 18082 diff changeset	954 if (!curwin->w_p_lbr && *get_showbreak_value(curwin) == NUL
8b0114ffde2b patch 8.1.2281: 'showbreak' cannot be set for one window Bram Moolenaar <Bram@vim.org> parents: 18082 diff changeset	955 && !curwin->w_p_bri)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	956 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	957 #endif
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	958 if (curwin->w_p_wrap)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	959 return win_nolbr_chartabsize(curwin, s, col, NULL);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	960 RET_WIN_BUF_CHARTABSIZE(curwin, curbuf, s, col)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	961 #ifdef FEAT_LINEBREAK
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	962 }
5995 ef83b423ebf7 updated for version 7.4.338 Bram Moolenaar <bram@vim.org> parents: 5735 diff changeset	963 return win_lbr_chartabsize(curwin, line == NULL ? s : line, s, col, NULL);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	964 #endif
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	965 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	966
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	967 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	968 * Call lbr_chartabsize() and advance the pointer.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	969 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	970 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	971 lbr_chartabsize_adv(
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	972 char_u *line, // start of the line
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	973 char_u **s,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	974 colnr_T col)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	975 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	976 int retval;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	977
5995 ef83b423ebf7 updated for version 7.4.338 Bram Moolenaar <bram@vim.org> parents: 5735 diff changeset	978 retval = lbr_chartabsize(line, *s, col);
11127 506f5d8b7d8b patch 8.0.0451: some macros are in lower case Christian Brabandt <cb@256bit.org> parents: 11121 diff changeset	979 MB_PTR_ADV(*s);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	980 return retval;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	981 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	982
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	983 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	984 * This function is used very often, keep it fast!!!!
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	985 *
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	986 * If "headp" not NULL, set *headp to the size of what we for 'showbreak'
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	987 * string at start of line. Warning: *headp is only set if it's a non-zero
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	988 * value, init to 0 before calling.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	989 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	990 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	991 win_lbr_chartabsize(
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	992 win_T *wp,
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	993 char_u *line UNUSED, // start of the line
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	994 char_u *s,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	995 colnr_T col,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	996 int *headp UNUSED)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	997 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	998 #ifdef FEAT_LINEBREAK
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	999 int c;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1000 int size;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1001 colnr_T col2;
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1002 colnr_T col_adj = 0; // col + screen size of tab
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1003 colnr_T colmax;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1004 int added;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1005 int mb_added = 0;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1006 int numberextra;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1007 char_u *ps;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1008 int tab_corr = (*s == TAB);
236 4707450c2b33 updated for version 7.0066 vimboss parents: 227 diff changeset	1009 int n;
18574 8b0114ffde2b patch 8.1.2281: 'showbreak' cannot be set for one window Bram Moolenaar <Bram@vim.org> parents: 18082 diff changeset	1010 char_u *sbr;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1011
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1012 /*
5995 ef83b423ebf7 updated for version 7.4.338 Bram Moolenaar <bram@vim.org> parents: 5735 diff changeset	1013 * No 'linebreak', 'showbreak' and 'breakindent': return quickly.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1014 */
18574 8b0114ffde2b patch 8.1.2281: 'showbreak' cannot be set for one window Bram Moolenaar <Bram@vim.org> parents: 18082 diff changeset	1015 if (!wp->w_p_lbr && !wp->w_p_bri && *get_showbreak_value(wp) == NUL)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1016 #endif
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1017 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1018 if (wp->w_p_wrap)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1019 return win_nolbr_chartabsize(wp, s, col, headp);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1020 RET_WIN_BUF_CHARTABSIZE(wp, wp->w_buffer, s, col)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1021 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1022
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1023 #ifdef FEAT_LINEBREAK
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1024 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1025 * First get normal size, without 'linebreak'
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1026 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1027 size = win_chartabsize(wp, s, col);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1028 c = *s;
6024 b4962cf3a1c0 updated for version 7.4.352 Bram Moolenaar <bram@vim.org> parents: 5995 diff changeset	1029 if (tab_corr)
b4962cf3a1c0 updated for version 7.4.352 Bram Moolenaar <bram@vim.org> parents: 5995 diff changeset	1030 col_adj = size - 1;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1031
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1032 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1033 * If 'linebreak' set check at a blank before a non-blank if the line
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1034 * needs a break here
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1035 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1036 if (wp->w_p_lbr
11127 506f5d8b7d8b patch 8.0.0451: some macros are in lower case Christian Brabandt <cb@256bit.org> parents: 11121 diff changeset	1037 && VIM_ISBREAK(c)
11133 d8e830e32be9 patch 8.0.0454: compiler warnings for "always true" comparison Christian Brabandt <cb@256bit.org> parents: 11129 diff changeset	1038 && !VIM_ISBREAK((int)s[1])
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1039 && wp->w_p_wrap
12477 68d7bc045dbe patch 8.0.1118: FEAT_WINDOWS adds a lot of #ifdefs Christian Brabandt <cb@256bit.org> parents: 12323 diff changeset	1040 && wp->w_width != 0)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1041 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1042 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1043 * Count all characters from first non-blank after a blank up to next
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1044 * non-blank after a blank.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1045 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1046 numberextra = win_col_off(wp);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1047 col2 = col;
12515 972ea22c946f patch 8.0.1136: W_WIDTH() is always the same Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	1048 colmax = (colnr_T)(wp->w_width - numberextra - col_adj);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1049 if (col >= colmax)
236 4707450c2b33 updated for version 7.0066 vimboss parents: 227 diff changeset	1050 {
6024 b4962cf3a1c0 updated for version 7.4.352 Bram Moolenaar <bram@vim.org> parents: 5995 diff changeset	1051 colmax += col_adj;
b4962cf3a1c0 updated for version 7.4.352 Bram Moolenaar <bram@vim.org> parents: 5995 diff changeset	1052 n = colmax + win_col_off2(wp);
236 4707450c2b33 updated for version 7.0066 vimboss parents: 227 diff changeset	1053 if (n > 0)
6024 b4962cf3a1c0 updated for version 7.4.352 Bram Moolenaar <bram@vim.org> parents: 5995 diff changeset	1054 colmax += (((col - colmax) / n) + 1) * n - col_adj;
236 4707450c2b33 updated for version 7.0066 vimboss parents: 227 diff changeset	1055 }
4707450c2b33 updated for version 7.0066 vimboss parents: 227 diff changeset	1056
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1057 for (;;)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1058 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1059 ps = s;
11127 506f5d8b7d8b patch 8.0.0451: some macros are in lower case Christian Brabandt <cb@256bit.org> parents: 11121 diff changeset	1060 MB_PTR_ADV(s);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1061 c = *s;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1062 if (!(c != NUL
11127 506f5d8b7d8b patch 8.0.0451: some macros are in lower case Christian Brabandt <cb@256bit.org> parents: 11121 diff changeset	1063 && (VIM_ISBREAK(c)
506f5d8b7d8b patch 8.0.0451: some macros are in lower case Christian Brabandt <cb@256bit.org> parents: 11121 diff changeset	1064 \|\| (!VIM_ISBREAK(c)
11133 d8e830e32be9 patch 8.0.0454: compiler warnings for "always true" comparison Christian Brabandt <cb@256bit.org> parents: 11129 diff changeset	1065 && (col2 == col \|\| !VIM_ISBREAK((int)*ps))))))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1066 break;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1067
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1068 col2 += win_chartabsize(wp, s, col2);
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1069 if (col2 >= colmax) // doesn't fit
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1070 {
6024 b4962cf3a1c0 updated for version 7.4.352 Bram Moolenaar <bram@vim.org> parents: 5995 diff changeset	1071 size = colmax - col + col_adj;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1072 break;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1073 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1074 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1075 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1076 else if (has_mbyte && size == 2 && MB_BYTE2LEN(*s) > 1
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1077 && wp->w_p_wrap && in_win_border(wp, col))
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1078 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1079 ++size; // Count the ">" in the last column.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1080 mb_added = 1;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1081 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1082
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1083 /*
5995 ef83b423ebf7 updated for version 7.4.338 Bram Moolenaar <bram@vim.org> parents: 5735 diff changeset	1084 * May have to add something for 'breakindent' and/or 'showbreak'
ef83b423ebf7 updated for version 7.4.338 Bram Moolenaar <bram@vim.org> parents: 5735 diff changeset	1085 * string at start of line.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1086 * Set *headp to the size of what we add.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1087 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1088 added = 0;
18574 8b0114ffde2b patch 8.1.2281: 'showbreak' cannot be set for one window Bram Moolenaar <Bram@vim.org> parents: 18082 diff changeset	1089 sbr = get_showbreak_value(wp);
8b0114ffde2b patch 8.1.2281: 'showbreak' cannot be set for one window Bram Moolenaar <Bram@vim.org> parents: 18082 diff changeset	1090 if ((*sbr != NUL \|\| wp->w_p_bri) && wp->w_p_wrap && col != 0)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1091 {
6503 134a7d55f9fa updated for version 7.4.579 Bram Moolenaar <bram@vim.org> parents: 6312 diff changeset	1092 colnr_T sbrlen = 0;
134a7d55f9fa updated for version 7.4.579 Bram Moolenaar <bram@vim.org> parents: 6312 diff changeset	1093 int numberwidth = win_col_off(wp);
134a7d55f9fa updated for version 7.4.579 Bram Moolenaar <bram@vim.org> parents: 6312 diff changeset	1094
134a7d55f9fa updated for version 7.4.579 Bram Moolenaar <bram@vim.org> parents: 6312 diff changeset	1095 numberextra = numberwidth;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1096 col += numberextra + mb_added;
12515 972ea22c946f patch 8.0.1136: W_WIDTH() is always the same Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	1097 if (col >= (colnr_T)wp->w_width)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1098 {
12515 972ea22c946f patch 8.0.1136: W_WIDTH() is always the same Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	1099 col -= wp->w_width;
972ea22c946f patch 8.0.1136: W_WIDTH() is always the same Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	1100 numberextra = wp->w_width - (numberextra - win_col_off2(wp));
6503 134a7d55f9fa updated for version 7.4.579 Bram Moolenaar <bram@vim.org> parents: 6312 diff changeset	1101 if (col >= numberextra && numberextra > 0)
6312 31c78e590806 updated for version 7.4.489 Bram Moolenaar <bram@vim.org> parents: 6288 diff changeset	1102 col %= numberextra;
18574 8b0114ffde2b patch 8.1.2281: 'showbreak' cannot be set for one window Bram Moolenaar <Bram@vim.org> parents: 18082 diff changeset	1103 if (*sbr != NUL)
6288 fcb898dea2bc updated for version 7.4.478 Bram Moolenaar <bram@vim.org> parents: 6278 diff changeset	1104 {
18574 8b0114ffde2b patch 8.1.2281: 'showbreak' cannot be set for one window Bram Moolenaar <Bram@vim.org> parents: 18082 diff changeset	1105 sbrlen = (colnr_T)MB_CHARLEN(sbr);
6288 fcb898dea2bc updated for version 7.4.478 Bram Moolenaar <bram@vim.org> parents: 6278 diff changeset	1106 if (col >= sbrlen)
fcb898dea2bc updated for version 7.4.478 Bram Moolenaar <bram@vim.org> parents: 6278 diff changeset	1107 col -= sbrlen;
fcb898dea2bc updated for version 7.4.478 Bram Moolenaar <bram@vim.org> parents: 6278 diff changeset	1108 }
6503 134a7d55f9fa updated for version 7.4.579 Bram Moolenaar <bram@vim.org> parents: 6312 diff changeset	1109 if (col >= numberextra && numberextra > 0)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1110 col = col % numberextra;
6503 134a7d55f9fa updated for version 7.4.579 Bram Moolenaar <bram@vim.org> parents: 6312 diff changeset	1111 else if (col > 0 && numberextra > 0)
134a7d55f9fa updated for version 7.4.579 Bram Moolenaar <bram@vim.org> parents: 6312 diff changeset	1112 col += numberwidth - win_col_off2(wp);
134a7d55f9fa updated for version 7.4.579 Bram Moolenaar <bram@vim.org> parents: 6312 diff changeset	1113
134a7d55f9fa updated for version 7.4.579 Bram Moolenaar <bram@vim.org> parents: 6312 diff changeset	1114 numberwidth -= win_col_off2(wp);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1115 }
12515 972ea22c946f patch 8.0.1136: W_WIDTH() is always the same Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	1116 if (col == 0 \|\| col + size + sbrlen > (colnr_T)wp->w_width)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1117 {
5995 ef83b423ebf7 updated for version 7.4.338 Bram Moolenaar <bram@vim.org> parents: 5735 diff changeset	1118 added = 0;
18574 8b0114ffde2b patch 8.1.2281: 'showbreak' cannot be set for one window Bram Moolenaar <Bram@vim.org> parents: 18082 diff changeset	1119 if (*sbr != NUL)
6503 134a7d55f9fa updated for version 7.4.579 Bram Moolenaar <bram@vim.org> parents: 6312 diff changeset	1120 {
12515 972ea22c946f patch 8.0.1136: W_WIDTH() is always the same Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	1121 if (size + sbrlen + numberwidth > (colnr_T)wp->w_width)
6503 134a7d55f9fa updated for version 7.4.579 Bram Moolenaar <bram@vim.org> parents: 6312 diff changeset	1122 {
16819 91619e48e1a7 patch 8.1.1411: Coverity warns for divide by zero Bram Moolenaar <Bram@vim.org> parents: 16764 diff changeset	1123 // calculate effective window width
12515 972ea22c946f patch 8.0.1136: W_WIDTH() is always the same Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	1124 int width = (colnr_T)wp->w_width - sbrlen - numberwidth;
16054 78faa25f9698 patch 8.1.1032: warnings from clang static analyzer Bram Moolenaar <Bram@vim.org> parents: 15850 diff changeset	1125 int prev_width = col
78faa25f9698 patch 8.1.1032: warnings from clang static analyzer Bram Moolenaar <Bram@vim.org> parents: 15850 diff changeset	1126 ? ((colnr_T)wp->w_width - (sbrlen + col)) : 0;
16819 91619e48e1a7 patch 8.1.1411: Coverity warns for divide by zero Bram Moolenaar <Bram@vim.org> parents: 16764 diff changeset	1127
91619e48e1a7 patch 8.1.1411: Coverity warns for divide by zero Bram Moolenaar <Bram@vim.org> parents: 16764 diff changeset	1128 if (width <= 0)
91619e48e1a7 patch 8.1.1411: Coverity warns for divide by zero Bram Moolenaar <Bram@vim.org> parents: 16764 diff changeset	1129 width = (colnr_T)1;
18574 8b0114ffde2b patch 8.1.2281: 'showbreak' cannot be set for one window Bram Moolenaar <Bram@vim.org> parents: 18082 diff changeset	1130 added += ((size - prev_width) / width) * vim_strsize(sbr);
6503 134a7d55f9fa updated for version 7.4.579 Bram Moolenaar <bram@vim.org> parents: 6312 diff changeset	1131 if ((size - prev_width) % width)
16819 91619e48e1a7 patch 8.1.1411: Coverity warns for divide by zero Bram Moolenaar <Bram@vim.org> parents: 16764 diff changeset	1132 // wrapped, add another length of 'sbr'
18574 8b0114ffde2b patch 8.1.2281: 'showbreak' cannot be set for one window Bram Moolenaar <Bram@vim.org> parents: 18082 diff changeset	1133 added += vim_strsize(sbr);
6503 134a7d55f9fa updated for version 7.4.579 Bram Moolenaar <bram@vim.org> parents: 6312 diff changeset	1134 }
134a7d55f9fa updated for version 7.4.579 Bram Moolenaar <bram@vim.org> parents: 6312 diff changeset	1135 else
18574 8b0114ffde2b patch 8.1.2281: 'showbreak' cannot be set for one window Bram Moolenaar <Bram@vim.org> parents: 18082 diff changeset	1136 added += vim_strsize(sbr);
6503 134a7d55f9fa updated for version 7.4.579 Bram Moolenaar <bram@vim.org> parents: 6312 diff changeset	1137 }
5995 ef83b423ebf7 updated for version 7.4.338 Bram Moolenaar <bram@vim.org> parents: 5735 diff changeset	1138 if (wp->w_p_bri)
ef83b423ebf7 updated for version 7.4.338 Bram Moolenaar <bram@vim.org> parents: 5735 diff changeset	1139 added += get_breakindent_win(wp, line);
ef83b423ebf7 updated for version 7.4.338 Bram Moolenaar <bram@vim.org> parents: 5735 diff changeset	1140
6160 735bd597a8ff updated for version 7.4.416 Bram Moolenaar <bram@vim.org> parents: 6068 diff changeset	1141 size += added;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1142 if (col != 0)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1143 added = 0;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1144 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1145 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1146 if (headp != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1147 *headp = added + mb_added;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1148 return size;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1149 #endif
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1150 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1151
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1152 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1153 * Like win_lbr_chartabsize(), except that we know 'linebreak' is off and
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1154 * 'wrap' is on. This means we need to check for a double-byte character that
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1155 * doesn't fit at the end of the screen line.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1156 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1157 static int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1158 win_nolbr_chartabsize(
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1159 win_T *wp,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1160 char_u *s,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1161 colnr_T col,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1162 int *headp)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1163 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1164 int n;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1165
23952 44be09b25619 patch 8.2.2518: 'listchars' should be window-local Bram Moolenaar <Bram@vim.org> parents: 23533 diff changeset	1166 if (*s == TAB && (!wp->w_p_list \|\| wp->w_lcs_chars.tab1))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1167 {
14175 2ad722003b36 patch 8.1.0105: all tab stops are the same Christian Brabandt <cb@256bit.org> parents: 14061 diff changeset	1168 # ifdef FEAT_VARTABS
2ad722003b36 patch 8.1.0105: all tab stops are the same Christian Brabandt <cb@256bit.org> parents: 14061 diff changeset	1169 return tabstop_padding(col, wp->w_buffer->b_p_ts,
2ad722003b36 patch 8.1.0105: all tab stops are the same Christian Brabandt <cb@256bit.org> parents: 14061 diff changeset	1170 wp->w_buffer->b_p_vts_array);
2ad722003b36 patch 8.1.0105: all tab stops are the same Christian Brabandt <cb@256bit.org> parents: 14061 diff changeset	1171 # else
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1172 n = wp->w_buffer->b_p_ts;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1173 return (int)(n - (col % n));
14175 2ad722003b36 patch 8.1.0105: all tab stops are the same Christian Brabandt <cb@256bit.org> parents: 14061 diff changeset	1174 # endif
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1175 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1176 n = ptr2cells(s);
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1177 // Add one cell for a double-width character in the last column of the
c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1178 // window, displayed with a ">".
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1179 if (n == 2 && MB_BYTE2LEN(*s) > 1 && in_win_border(wp, col))
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1180 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1181 if (headp != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1182 *headp = 1;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1183 return 3;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1184 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1185 return n;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1186 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1187
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1188 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1189 * Return TRUE if virtual column "vcol" is in the rightmost column of window
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1190 * "wp".
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1191 */
17789 0f7ae8010787 patch 8.1.1891: functions used in one file are global Bram Moolenaar <Bram@vim.org> parents: 16819 diff changeset	1192 static int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1193 in_win_border(win_T *wp, colnr_T vcol)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1194 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1195 int width1; // width of first line (after line number)
c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1196 int width2; // width of further lines
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1197
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1198 if (wp->w_width == 0) // there is no border
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1199 return FALSE;
12515 972ea22c946f patch 8.0.1136: W_WIDTH() is always the same Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	1200 width1 = wp->w_width - win_col_off(wp);
1869 720a59d79bcd updated for version 7.2-168 vimboss parents: 1687 diff changeset	1201 if ((int)vcol < width1 - 1)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1202 return FALSE;
1869 720a59d79bcd updated for version 7.2-168 vimboss parents: 1687 diff changeset	1203 if ((int)vcol == width1 - 1)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1204 return TRUE;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1205 width2 = width1 + win_col_off2(wp);
1970 7bcd81b96e2a updated for version 7.2-267 vimboss parents: 1955 diff changeset	1206 if (width2 <= 0)
7bcd81b96e2a updated for version 7.2-267 vimboss parents: 1955 diff changeset	1207 return FALSE;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1208 return ((vcol - width1) % width2 == width2 - 1);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1209 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1210
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1211 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1212 * Get virtual column number of pos.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1213 * start: on the first position of this character (TAB, ctrl)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1214 * cursor: where the cursor is on this character (first char, except for TAB)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1215 * end: on the last position of this character (TAB, ctrl)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1216 *
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1217 * This is used very often, keep it fast!
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1218 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1219 void
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1220 getvcol(
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1221 win_T *wp,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1222 pos_T *pos,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1223 colnr_T *start,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1224 colnr_T *cursor,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1225 colnr_T *end)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1226 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1227 colnr_T vcol;
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1228 char_u *ptr; // points to current char
c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1229 char_u *posptr; // points to char at pos->col
c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1230 char_u *line; // start of the line
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1231 int incr;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1232 int head;
14175 2ad722003b36 patch 8.1.0105: all tab stops are the same Christian Brabandt <cb@256bit.org> parents: 14061 diff changeset	1233 #ifdef FEAT_VARTABS
2ad722003b36 patch 8.1.0105: all tab stops are the same Christian Brabandt <cb@256bit.org> parents: 14061 diff changeset	1234 int *vts = wp->w_buffer->b_p_vts_array;
2ad722003b36 patch 8.1.0105: all tab stops are the same Christian Brabandt <cb@256bit.org> parents: 14061 diff changeset	1235 #endif
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1236 int ts = wp->w_buffer->b_p_ts;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1237 int c;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1238
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1239 vcol = 0;
5995 ef83b423ebf7 updated for version 7.4.338 Bram Moolenaar <bram@vim.org> parents: 5735 diff changeset	1240 line = ptr = ml_get_buf(wp->w_buffer, pos->lnum, FALSE);
2108 3cdf2a653e00 updated for version 7.2.391 Bram Moolenaar <bram@zimbu.org> parents: 1979 diff changeset	1241 if (pos->col == MAXCOL)
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1242 posptr = NULL; // continue until the NUL
2108 3cdf2a653e00 updated for version 7.2.391 Bram Moolenaar <bram@zimbu.org> parents: 1979 diff changeset	1243 else
10720 44a1661f4cfa patch 8.0.0250: virtcol() does not work well for multi-byte characters Christian Brabandt <cb@256bit.org> parents: 10658 diff changeset	1244 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1245 // Special check for an empty line, which can happen on exit, when
c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1246 // ml_get_buf() always returns an empty string.
10835 c9da7f9137af patch 8.0.0307: asan detects a memory error when EXITFREE is defined Christian Brabandt <cb@256bit.org> parents: 10724 diff changeset	1247 if (*ptr == NUL)
c9da7f9137af patch 8.0.0307: asan detects a memory error when EXITFREE is defined Christian Brabandt <cb@256bit.org> parents: 10724 diff changeset	1248 pos->col = 0;
2108 3cdf2a653e00 updated for version 7.2.391 Bram Moolenaar <bram@zimbu.org> parents: 1979 diff changeset	1249 posptr = ptr + pos->col;
10720 44a1661f4cfa patch 8.0.0250: virtcol() does not work well for multi-byte characters Christian Brabandt <cb@256bit.org> parents: 10658 diff changeset	1250 if (has_mbyte)
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1251 // always start on the first byte
10720 44a1661f4cfa patch 8.0.0250: virtcol() does not work well for multi-byte characters Christian Brabandt <cb@256bit.org> parents: 10658 diff changeset	1252 posptr -= (*mb_head_off)(line, posptr);
44a1661f4cfa patch 8.0.0250: virtcol() does not work well for multi-byte characters Christian Brabandt <cb@256bit.org> parents: 10658 diff changeset	1253 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1254
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1255 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1256 * This function is used very often, do some speed optimizations.
5995 ef83b423ebf7 updated for version 7.4.338 Bram Moolenaar <bram@vim.org> parents: 5735 diff changeset	1257 * When 'list', 'linebreak', 'showbreak' and 'breakindent' are not set
ef83b423ebf7 updated for version 7.4.338 Bram Moolenaar <bram@vim.org> parents: 5735 diff changeset	1258 * use a simple loop.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1259 * Also use this when 'list' is set but tabs take their normal size.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1260 */
23952 44be09b25619 patch 8.2.2518: 'listchars' should be window-local Bram Moolenaar <Bram@vim.org> parents: 23533 diff changeset	1261 if ((!wp->w_p_list \|\| wp->w_lcs_chars.tab1 != NUL)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1262 #ifdef FEAT_LINEBREAK
18574 8b0114ffde2b patch 8.1.2281: 'showbreak' cannot be set for one window Bram Moolenaar <Bram@vim.org> parents: 18082 diff changeset	1263 && !wp->w_p_lbr && *get_showbreak_value(wp) == NUL && !wp->w_p_bri
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1264 #endif
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1265 )
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1266 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1267 for (;;)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1268 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1269 head = 0;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1270 c = *ptr;
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1271 // make sure we don't go past the end of the line
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1272 if (c == NUL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1273 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1274 incr = 1; // NUL at end of line only takes one column
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1275 break;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1276 }
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1277 // A tab gets expanded, depending on the current column
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1278 if (c == TAB)
14175 2ad722003b36 patch 8.1.0105: all tab stops are the same Christian Brabandt <cb@256bit.org> parents: 14061 diff changeset	1279 #ifdef FEAT_VARTABS
2ad722003b36 patch 8.1.0105: all tab stops are the same Christian Brabandt <cb@256bit.org> parents: 14061 diff changeset	1280 incr = tabstop_padding(vcol, ts, vts);
2ad722003b36 patch 8.1.0105: all tab stops are the same Christian Brabandt <cb@256bit.org> parents: 14061 diff changeset	1281 #else
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1282 incr = ts - (vcol % ts);
14175 2ad722003b36 patch 8.1.0105: all tab stops are the same Christian Brabandt <cb@256bit.org> parents: 14061 diff changeset	1283 #endif
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1284 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1285 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1286 if (has_mbyte)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1287 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1288 // For utf-8, if the byte is >= 0x80, need to look at
c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1289 // further bytes to find the cell width.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1290 if (enc_utf8 && c >= 0x80)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1291 incr = utf_ptr2cells(ptr);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1292 else
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	1293 incr = g_chartab[c] & CT_CELL_MASK;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1294
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1295 // If a double-cell char doesn't fit at the end of a line
c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1296 // it wraps to the next line, it's like this char is three
c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1297 // cells wide.
1546 75f5889a5d8e updated for version 7.1-260 vimboss parents: 1369 diff changeset	1298 if (incr == 2 && wp->w_p_wrap && MB_BYTE2LEN(*ptr) > 1
75f5889a5d8e updated for version 7.1-260 vimboss parents: 1369 diff changeset	1299 && in_win_border(wp, vcol))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1300 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1301 ++incr;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1302 head = 1;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1303 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1304 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1305 else
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	1306 incr = g_chartab[c] & CT_CELL_MASK;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1307 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1308
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1309 if (posptr != NULL && ptr >= posptr) // character at pos->col
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1310 break;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1311
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1312 vcol += incr;
11127 506f5d8b7d8b patch 8.0.0451: some macros are in lower case Christian Brabandt <cb@256bit.org> parents: 11121 diff changeset	1313 MB_PTR_ADV(ptr);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1314 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1315 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1316 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1317 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1318 for (;;)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1319 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1320 // A tab gets expanded, depending on the current column
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1321 head = 0;
5995 ef83b423ebf7 updated for version 7.4.338 Bram Moolenaar <bram@vim.org> parents: 5735 diff changeset	1322 incr = win_lbr_chartabsize(wp, line, ptr, vcol, &head);
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1323 // make sure we don't go past the end of the line
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1324 if (*ptr == NUL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1325 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1326 incr = 1; // NUL at end of line only takes one column
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1327 break;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1328 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1329
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1330 if (posptr != NULL && ptr >= posptr) // character at pos->col
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1331 break;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1332
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1333 vcol += incr;
11127 506f5d8b7d8b patch 8.0.0451: some macros are in lower case Christian Brabandt <cb@256bit.org> parents: 11121 diff changeset	1334 MB_PTR_ADV(ptr);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1335 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1336 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1337 if (start != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1338 *start = vcol + head;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1339 if (end != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1340 *end = vcol + incr - 1;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1341 if (cursor != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1342 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1343 if (*ptr == TAB
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1344 && (State & NORMAL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1345 && !wp->w_p_list
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1346 && !virtual_active()
11121 778c10516955 patch 8.0.0448: some macros are in lower case Christian Brabandt <cb@256bit.org> parents: 10835 diff changeset	1347 && !(VIsual_active
778c10516955 patch 8.0.0448: some macros are in lower case Christian Brabandt <cb@256bit.org> parents: 10835 diff changeset	1348 && (p_sel == 'e' \|\| LTOREQ_POS(pos, VIsual)))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1349 )
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1350 *cursor = vcol + incr - 1; // cursor at end
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1351 else
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1352 *cursor = vcol + head; // cursor at start
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1353 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1354 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1355
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1356 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1357 * Get virtual cursor column in the current window, pretending 'list' is off.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1358 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1359 colnr_T
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1360 getvcol_nolist(pos_T *posp)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1361 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1362 int list_save = curwin->w_p_list;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1363 colnr_T vcol;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1364
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1365 curwin->w_p_list = FALSE;
13786 0fa21ba32e21 patch 8.0.1765: CTRL-G j in Insert mode is incorrect when 'virtualedit' set Christian Brabandt <cb@256bit.org> parents: 13553 diff changeset	1366 if (posp->coladd)
0fa21ba32e21 patch 8.0.1765: CTRL-G j in Insert mode is incorrect when 'virtualedit' set Christian Brabandt <cb@256bit.org> parents: 13553 diff changeset	1367 getvvcol(curwin, posp, NULL, &vcol, NULL);
0fa21ba32e21 patch 8.0.1765: CTRL-G j in Insert mode is incorrect when 'virtualedit' set Christian Brabandt <cb@256bit.org> parents: 13553 diff changeset	1368 else
0fa21ba32e21 patch 8.0.1765: CTRL-G j in Insert mode is incorrect when 'virtualedit' set Christian Brabandt <cb@256bit.org> parents: 13553 diff changeset	1369 getvcol(curwin, posp, NULL, &vcol, NULL);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1370 curwin->w_p_list = list_save;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1371 return vcol;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1372 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1373
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1374 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1375 * Get virtual column in virtual mode.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1376 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1377 void
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1378 getvvcol(
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1379 win_T *wp,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1380 pos_T *pos,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1381 colnr_T *start,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1382 colnr_T *cursor,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1383 colnr_T *end)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1384 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1385 colnr_T col;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1386 colnr_T coladd;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1387 colnr_T endadd;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1388 char_u *ptr;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1389
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1390 if (virtual_active())
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1391 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1392 // For virtual mode, only want one value
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1393 getvcol(wp, pos, &col, NULL, NULL);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1394
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1395 coladd = pos->coladd;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1396 endadd = 0;
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1397 // Cannot put the cursor on part of a wide character.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1398 ptr = ml_get_buf(wp->w_buffer, pos->lnum, FALSE);
1869 720a59d79bcd updated for version 7.2-168 vimboss parents: 1687 diff changeset	1399 if (pos->col < (colnr_T)STRLEN(ptr))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1400 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1401 int c = (*mb_ptr2char)(ptr + pos->col);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1402
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1403 if (c != TAB && vim_isprintc(c))
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1404 {
1869 720a59d79bcd updated for version 7.2-168 vimboss parents: 1687 diff changeset	1405 endadd = (colnr_T)(char2cells(c) - 1);
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1406 if (coladd > endadd) // past end of line
557 862863033fdd updated for version 7.0158 vimboss parents: 497 diff changeset	1407 endadd = 0;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1408 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1409 coladd = 0;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1410 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1411 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1412 col += coladd;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1413 if (start != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1414 *start = col;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1415 if (cursor != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1416 *cursor = col;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1417 if (end != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1418 *end = col + endadd;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1419 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1420 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1421 getvcol(wp, pos, start, cursor, end);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1422 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1423
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1424 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1425 * Get the leftmost and rightmost virtual column of pos1 and pos2.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1426 * Used for Visual block mode.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1427 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1428 void
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1429 getvcols(
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1430 win_T *wp,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1431 pos_T *pos1,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1432 pos_T *pos2,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1433 colnr_T *left,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1434 colnr_T *right)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1435 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1436 colnr_T from1, from2, to1, to2;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1437
11121 778c10516955 patch 8.0.0448: some macros are in lower case Christian Brabandt <cb@256bit.org> parents: 10835 diff changeset	1438 if (LT_POSP(pos1, pos2))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1439 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1440 getvvcol(wp, pos1, &from1, NULL, &to1);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1441 getvvcol(wp, pos2, &from2, NULL, &to2);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1442 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1443 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1444 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1445 getvvcol(wp, pos2, &from1, NULL, &to1);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1446 getvvcol(wp, pos1, &from2, NULL, &to2);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1447 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1448 if (from2 < from1)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1449 *left = from2;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1450 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1451 *left = from1;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1452 if (to2 > to1)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1453 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1454 if (*p_sel == 'e' && from2 - 1 >= to1)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1455 *right = from2 - 1;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1456 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1457 *right = to2;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1458 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1459 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1460 *right = to1;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1461 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1462
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1463 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1464 * skipwhite: skip over ' ' and '\t'.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1465 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1466 char_u *
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1467 skipwhite(char_u *q)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1468 {
1687 b2e037ed7e33 updated for version 7.2b-020 vimboss parents: 1654 diff changeset	1469 char_u *p = q;
b2e037ed7e33 updated for version 7.2b-020 vimboss parents: 1654 diff changeset	1470
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1471 while (VIM_ISWHITE(*p)) // skip to next non-white
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1472 ++p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1473 return p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1474 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1475
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1476 /*
12323 4dba3e4f3b01 patch 8.0.1041: bogus characters when indenting during visual-block append Christian Brabandt <cb@256bit.org> parents: 11337 diff changeset	1477 * getwhitecols: return the number of whitespace
4dba3e4f3b01 patch 8.0.1041: bogus characters when indenting during visual-block append Christian Brabandt <cb@256bit.org> parents: 11337 diff changeset	1478 * columns (bytes) at the start of a given line
4dba3e4f3b01 patch 8.0.1041: bogus characters when indenting during visual-block append Christian Brabandt <cb@256bit.org> parents: 11337 diff changeset	1479 */
4dba3e4f3b01 patch 8.0.1041: bogus characters when indenting during visual-block append Christian Brabandt <cb@256bit.org> parents: 11337 diff changeset	1480 int
4dba3e4f3b01 patch 8.0.1041: bogus characters when indenting during visual-block append Christian Brabandt <cb@256bit.org> parents: 11337 diff changeset	1481 getwhitecols_curline()
4dba3e4f3b01 patch 8.0.1041: bogus characters when indenting during visual-block append Christian Brabandt <cb@256bit.org> parents: 11337 diff changeset	1482 {
4dba3e4f3b01 patch 8.0.1041: bogus characters when indenting during visual-block append Christian Brabandt <cb@256bit.org> parents: 11337 diff changeset	1483 return getwhitecols(ml_get_curline());
4dba3e4f3b01 patch 8.0.1041: bogus characters when indenting during visual-block append Christian Brabandt <cb@256bit.org> parents: 11337 diff changeset	1484 }
4dba3e4f3b01 patch 8.0.1041: bogus characters when indenting during visual-block append Christian Brabandt <cb@256bit.org> parents: 11337 diff changeset	1485
4dba3e4f3b01 patch 8.0.1041: bogus characters when indenting during visual-block append Christian Brabandt <cb@256bit.org> parents: 11337 diff changeset	1486 int
4dba3e4f3b01 patch 8.0.1041: bogus characters when indenting during visual-block append Christian Brabandt <cb@256bit.org> parents: 11337 diff changeset	1487 getwhitecols(char_u *p)
4dba3e4f3b01 patch 8.0.1041: bogus characters when indenting during visual-block append Christian Brabandt <cb@256bit.org> parents: 11337 diff changeset	1488 {
4dba3e4f3b01 patch 8.0.1041: bogus characters when indenting during visual-block append Christian Brabandt <cb@256bit.org> parents: 11337 diff changeset	1489 return skipwhite(p) - p;
4dba3e4f3b01 patch 8.0.1041: bogus characters when indenting during visual-block append Christian Brabandt <cb@256bit.org> parents: 11337 diff changeset	1490 }
4dba3e4f3b01 patch 8.0.1041: bogus characters when indenting during visual-block append Christian Brabandt <cb@256bit.org> parents: 11337 diff changeset	1491
4dba3e4f3b01 patch 8.0.1041: bogus characters when indenting during visual-block append Christian Brabandt <cb@256bit.org> parents: 11337 diff changeset	1492 /*
293 f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1493 * skip over digits
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1494 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1495 char_u *
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1496 skipdigits(char_u *q)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1497 {
1687 b2e037ed7e33 updated for version 7.2b-020 vimboss parents: 1654 diff changeset	1498 char_u *p = q;
b2e037ed7e33 updated for version 7.2b-020 vimboss parents: 1654 diff changeset	1499
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1500 while (VIM_ISDIGIT(*p)) // skip to next non-digit
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1501 ++p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1502 return p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1503 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1504
741 ac1f1e69c50d updated for version 7.0222 vimboss parents: 557 diff changeset	1505 #if defined(FEAT_SYN_HL) \|\| defined(FEAT_SPELL) \|\| defined(PROTO)
301 006e9c8a6a8a updated for version 7.0079 vimboss parents: 293 diff changeset	1506 /*
7447 ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1507 * skip over binary digits
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1508 */
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1509 char_u *
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1510 skipbin(char_u *q)
7447 ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1511 {
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1512 char_u *p = q;
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1513
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1514 while (vim_isbdigit(*p)) // skip to next non-digit
7447 ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1515 ++p;
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1516 return p;
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1517 }
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1518
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1519 /*
301 006e9c8a6a8a updated for version 7.0079 vimboss parents: 293 diff changeset	1520 * skip over digits and hex characters
006e9c8a6a8a updated for version 7.0079 vimboss parents: 293 diff changeset	1521 */
006e9c8a6a8a updated for version 7.0079 vimboss parents: 293 diff changeset	1522 char_u *
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1523 skiphex(char_u *q)
301 006e9c8a6a8a updated for version 7.0079 vimboss parents: 293 diff changeset	1524 {
1687 b2e037ed7e33 updated for version 7.2b-020 vimboss parents: 1654 diff changeset	1525 char_u *p = q;
b2e037ed7e33 updated for version 7.2b-020 vimboss parents: 1654 diff changeset	1526
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1527 while (vim_isxdigit(*p)) // skip to next non-digit
301 006e9c8a6a8a updated for version 7.0079 vimboss parents: 293 diff changeset	1528 ++p;
006e9c8a6a8a updated for version 7.0079 vimboss parents: 293 diff changeset	1529 return p;
006e9c8a6a8a updated for version 7.0079 vimboss parents: 293 diff changeset	1530 }
006e9c8a6a8a updated for version 7.0079 vimboss parents: 293 diff changeset	1531 #endif
006e9c8a6a8a updated for version 7.0079 vimboss parents: 293 diff changeset	1532
293 f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1533 /*
7447 ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1534 * skip to bin digit (or NUL after the string)
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1535 */
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1536 char_u *
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1537 skiptobin(char_u *q)
7447 ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1538 {
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1539 char_u *p = q;
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1540
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1541 while (p != NUL && !vim_isbdigit(p)) // skip to next digit
7447 ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1542 ++p;
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1543 return p;
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1544 }
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1545
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1546 /*
293 f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1547 * skip to digit (or NUL after the string)
f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1548 */
f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1549 char_u *
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1550 skiptodigit(char_u *q)
293 f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1551 {
1687 b2e037ed7e33 updated for version 7.2b-020 vimboss parents: 1654 diff changeset	1552 char_u *p = q;
b2e037ed7e33 updated for version 7.2b-020 vimboss parents: 1654 diff changeset	1553
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1554 while (p != NUL && !VIM_ISDIGIT(p)) // skip to next digit
293 f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1555 ++p;
f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1556 return p;
f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1557 }
f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1558
f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1559 /*
f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1560 * skip to hex character (or NUL after the string)
f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1561 */
f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1562 char_u *
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1563 skiptohex(char_u *q)
293 f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1564 {
1687 b2e037ed7e33 updated for version 7.2b-020 vimboss parents: 1654 diff changeset	1565 char_u *p = q;
b2e037ed7e33 updated for version 7.2b-020 vimboss parents: 1654 diff changeset	1566
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1567 while (p != NUL && !vim_isxdigit(p)) // skip to next digit
293 f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1568 ++p;
f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1569 return p;
f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1570 }
f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1571
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1572 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1573 * Variant of isdigit() that can handle characters > 0x100.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1574 * We don't use isdigit() here, because on some systems it also considers
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1575 * superscript 1 to be a digit.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1576 * Use the VIM_ISDIGIT() macro for simple arguments.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1577 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1578 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1579 vim_isdigit(int c)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1580 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1581 return (c >= '0' && c <= '9');
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1582 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1583
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1584 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1585 * Variant of isxdigit() that can handle characters > 0x100.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1586 * We don't use isxdigit() here, because on some systems it also considers
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1587 * superscript 1 to be a digit.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1588 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1589 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1590 vim_isxdigit(int c)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1591 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1592 return (c >= '0' && c <= '9')
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1593 \|\| (c >= 'a' && c <= 'f')
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1594 \|\| (c >= 'A' && c <= 'F');
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1595 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1596
7447 ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1597 /*
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1598 * Corollary of vim_isdigit and vim_isxdigit() that can handle
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1599 * characters > 0x100.
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1600 */
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1601 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1602 vim_isbdigit(int c)
7447 ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1603 {
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1604 return (c == '0' \|\| c == '1');
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1605 }
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1606
23533 ee43d943c3bb patch 8.2.2309: 0o777 not recognized as octal Bram Moolenaar <Bram@vim.org> parents: 20782 diff changeset	1607 static int
ee43d943c3bb patch 8.2.2309: 0o777 not recognized as octal Bram Moolenaar <Bram@vim.org> parents: 20782 diff changeset	1608 vim_isodigit(int c)
ee43d943c3bb patch 8.2.2309: 0o777 not recognized as octal Bram Moolenaar <Bram@vim.org> parents: 20782 diff changeset	1609 {
ee43d943c3bb patch 8.2.2309: 0o777 not recognized as octal Bram Moolenaar <Bram@vim.org> parents: 20782 diff changeset	1610 return (c >= '0' && c <= '7');
ee43d943c3bb patch 8.2.2309: 0o777 not recognized as octal Bram Moolenaar <Bram@vim.org> parents: 20782 diff changeset	1611 }
ee43d943c3bb patch 8.2.2309: 0o777 not recognized as octal Bram Moolenaar <Bram@vim.org> parents: 20782 diff changeset	1612
492 81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1613 /*
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1614 * Vim's own character class functions. These exist because many library
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1615 * islower()/toupper() etc. do not work properly: they crash when used with
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1616 * invalid values or can't handle latin1 when the locale is C.
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1617 * Speed is most important here.
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1618 */
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1619 #define LATIN1LOWER 'l'
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1620 #define LATIN1UPPER 'U'
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1621
497 73f10d8124f4 updated for version 7.0136 vimboss parents: 492 diff changeset	1622 static char_u latin1flags[257] = " UUUUUUUUUUUUUUUUUUUUUUUUUU llllllllllllllllllllllllll UUUUUUUUUUUUUUUUUUUUUUU UUUUUUUllllllllllllllllllllllll llllllll";
3533 a17918b76ca1 updated for version 7.3.527 Bram Moolenaar <bram@vim.org> parents: 3292 diff changeset	1623 static char_u latin1upper[257] = " !\"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\\]^_`ABCDEFGHIJKLMNOPQRSTUVWXYZ{\|}~\x7f\x80\x81\x82\x83\x84\x85\x86\x87\x88\x89\x8a\x8b\x8c\x8d\x8e\x8f\x90\x91\x92\x93\x94\x95\x96\x97\x98\x99\x9a\x9b\x9c\x9d\x9e\x9f\xa0\xa1\xa2\xa3\xa4\xa5\xa6\xa7\xa8\xa9\xaa\xab\xac\xad\xae\xaf\xb0\xb1\xb2\xb3\xb4\xb5\xb6\xb7\xb8\xb9\xba\xbb\xbc\xbd\xbe\xbf\xc0\xc1\xc2\xc3\xc4\xc5\xc6\xc7\xc8\xc9\xca\xcb\xcc\xcd\xce\xcf\xd0\xd1\xd2\xd3\xd4\xd5\xd6\xd7\xd8\xd9\xda\xdb\xdc\xdd\xde\xdf\xc0\xc1\xc2\xc3\xc4\xc5\xc6\xc7\xc8\xc9\xca\xcb\xcc\xcd\xce\xcf\xd0\xd1\xd2\xd3\xd4\xd5\xd6\xf7\xd8\xd9\xda\xdb\xdc\xdd\xde\xff";
a17918b76ca1 updated for version 7.3.527 Bram Moolenaar <bram@vim.org> parents: 3292 diff changeset	1624 static char_u latin1lower[257] = " !\"#$%&'()*+,-./0123456789:;<=>?@abcdefghijklmnopqrstuvwxyz[\\]^_`abcdefghijklmnopqrstuvwxyz{\|}~\x7f\x80\x81\x82\x83\x84\x85\x86\x87\x88\x89\x8a\x8b\x8c\x8d\x8e\x8f\x90\x91\x92\x93\x94\x95\x96\x97\x98\x99\x9a\x9b\x9c\x9d\x9e\x9f\xa0\xa1\xa2\xa3\xa4\xa5\xa6\xa7\xa8\xa9\xaa\xab\xac\xad\xae\xaf\xb0\xb1\xb2\xb3\xb4\xb5\xb6\xb7\xb8\xb9\xba\xbb\xbc\xbd\xbe\xbf\xe0\xe1\xe2\xe3\xe4\xe5\xe6\xe7\xe8\xe9\xea\xeb\xec\xed\xee\xef\xf0\xf1\xf2\xf3\xf4\xf5\xf6\xd7\xf8\xf9\xfa\xfb\xfc\xfd\xfe\xdf\xe0\xe1\xe2\xe3\xe4\xe5\xe6\xe7\xe8\xe9\xea\xeb\xec\xed\xee\xef\xf0\xf1\xf2\xf3\xf4\xf5\xf6\xf7\xf8\xf9\xfa\xfb\xfc\xfd\xfe\xff";
492 81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1625
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1626 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1627 vim_islower(int c)
492 81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1628 {
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1629 if (c <= '@')
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1630 return FALSE;
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1631 if (c >= 0x80)
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1632 {
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1633 if (enc_utf8)
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1634 return utf_islower(c);
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1635 if (c >= 0x100)
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1636 {
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1637 #ifdef HAVE_ISWLOWER
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1638 if (has_mbyte)
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1639 return iswlower(c);
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1640 #endif
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1641 // islower() can't handle these chars and may crash
492 81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1642 return FALSE;
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1643 }
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1644 if (enc_latin1like)
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1645 return (latin1flags[c] & LATIN1LOWER) == LATIN1LOWER;
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1646 }
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1647 return islower(c);
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1648 }
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1649
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1650 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1651 vim_isupper(int c)
492 81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1652 {
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1653 if (c <= '@')
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1654 return FALSE;
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1655 if (c >= 0x80)
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1656 {
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1657 if (enc_utf8)
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1658 return utf_isupper(c);
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1659 if (c >= 0x100)
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1660 {
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1661 #ifdef HAVE_ISWUPPER
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1662 if (has_mbyte)
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1663 return iswupper(c);
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1664 #endif
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1665 // islower() can't handle these chars and may crash
492 81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1666 return FALSE;
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1667 }
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1668 if (enc_latin1like)
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1669 return (latin1flags[c] & LATIN1UPPER) == LATIN1UPPER;
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1670 }
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1671 return isupper(c);
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1672 }
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1673
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1674 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1675 vim_toupper(int c)
492 81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1676 {
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1677 if (c <= '@')
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1678 return c;
11333 fef09eb74832 patch 8.0.0552: toupper and tolower don't work properly for Turkish Christian Brabandt <cb@256bit.org> parents: 11133 diff changeset	1679 if (c >= 0x80 \|\| !(cmp_flags & CMP_KEEPASCII))
492 81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1680 {
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1681 if (enc_utf8)
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1682 return utf_toupper(c);
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1683 if (c >= 0x100)
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1684 {
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1685 #ifdef HAVE_TOWUPPER
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1686 if (has_mbyte)
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1687 return towupper(c);
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1688 #endif
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1689 // toupper() can't handle these chars and may crash
492 81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1690 return c;
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1691 }
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1692 if (enc_latin1like)
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1693 return latin1upper[c];
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1694 }
11337 f0fbebf19b80 patch 8.0.0554: toupper and tolower don't work properly for Turkish Christian Brabandt <cb@256bit.org> parents: 11333 diff changeset	1695 if (c < 0x80 && (cmp_flags & CMP_KEEPASCII))
f0fbebf19b80 patch 8.0.0554: toupper and tolower don't work properly for Turkish Christian Brabandt <cb@256bit.org> parents: 11333 diff changeset	1696 return TOUPPER_ASC(c);
492 81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1697 return TOUPPER_LOC(c);
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1698 }
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1699
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1700 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1701 vim_tolower(int c)
492 81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1702 {
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1703 if (c <= '@')
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1704 return c;
11333 fef09eb74832 patch 8.0.0552: toupper and tolower don't work properly for Turkish Christian Brabandt <cb@256bit.org> parents: 11133 diff changeset	1705 if (c >= 0x80 \|\| !(cmp_flags & CMP_KEEPASCII))
492 81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1706 {
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1707 if (enc_utf8)
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1708 return utf_tolower(c);
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1709 if (c >= 0x100)
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1710 {
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1711 #ifdef HAVE_TOWLOWER
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1712 if (has_mbyte)
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1713 return towlower(c);
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1714 #endif
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1715 // tolower() can't handle these chars and may crash
492 81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1716 return c;
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1717 }
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1718 if (enc_latin1like)
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1719 return latin1lower[c];
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1720 }
11337 f0fbebf19b80 patch 8.0.0554: toupper and tolower don't work properly for Turkish Christian Brabandt <cb@256bit.org> parents: 11333 diff changeset	1721 if (c < 0x80 && (cmp_flags & CMP_KEEPASCII))
f0fbebf19b80 patch 8.0.0554: toupper and tolower don't work properly for Turkish Christian Brabandt <cb@256bit.org> parents: 11333 diff changeset	1722 return TOLOWER_ASC(c);
492 81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1723 return TOLOWER_LOC(c);
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1724 }
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1725
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1726 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1727 * skiptowhite: skip over text until ' ' or '\t' or NUL.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1728 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1729 char_u *
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1730 skiptowhite(char_u *p)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1731 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1732 while (p != ' ' && p != '\t' && *p != NUL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1733 ++p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1734 return p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1735 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1736
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1737 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1738 * skiptowhite_esc: Like skiptowhite(), but also skip escaped chars
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1739 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1740 char_u *
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1741 skiptowhite_esc(char_u *p)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1742 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1743 while (p != ' ' && p != '\t' && *p != NUL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1744 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1745 if ((p == '\\' \|\| p == Ctrl_V) && *(p + 1) != NUL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1746 ++p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1747 ++p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1748 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1749 return p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1750 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1751
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1752 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1753 * Getdigits: Get a number from a string and skip over it.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1754 * Note: the argument is a pointer to a char_u pointer!
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1755 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1756 long
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1757 getdigits(char_u **pp)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1758 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1759 char_u *p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1760 long retval;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1761
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1762 p = *pp;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1763 retval = atol((char *)p);
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1764 if (*p == '-') // skip negative sign
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1765 ++p;
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1766 p = skipdigits(p); // skip to next non-digit
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1767 *pp = p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1768 return retval;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1769 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1770
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1771 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1772 * Return TRUE if "lbuf" is empty or only contains blanks.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1773 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1774 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1775 vim_isblankline(char_u *lbuf)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1776 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1777 char_u *p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1778
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1779 p = skipwhite(lbuf);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1780 return (p == NUL \|\| p == '\r' \|\| *p == '\n');
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1781 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1782
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1783 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1784 * Convert a string into a long and/or unsigned long, taking care of
7447 ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1785 * hexadecimal, octal, and binary numbers. Accepts a '-' sign.
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1786 * If "prep" is not NULL, returns a flag to indicate the type of the number:
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1787 * 0 decimal
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1788 * '0' octal
20665 6ff992bf4c82 patch 8.2.0886: cannot use octal numbers in scriptversion 4 Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	1789 * 'O' octal
6ff992bf4c82 patch 8.2.0886: cannot use octal numbers in scriptversion 4 Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	1790 * 'o' octal
7447 ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1791 * 'B' bin
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1792 * 'b' bin
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1793 * 'X' hex
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1794 * 'x' hex
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1795 * If "len" is not NULL, the length of the number in characters is returned.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1796 * If "nptr" is not NULL, the signed result is returned in it.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1797 * If "unptr" is not NULL, the unsigned result is returned in it.
7447 ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1798 * If "what" contains STR2NR_BIN recognize binary numbers
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1799 * If "what" contains STR2NR_OCT recognize octal numbers
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1800 * If "what" contains STR2NR_HEX recognize hex numbers
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1801 * If "what" contains STR2NR_FORCE always assume bin/oct/hex.
18082 1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1802 * If "what" contains STR2NR_QUOTE ignore embedded single quotes
12704 ee5f3f5d3c55 patch 8.0.1230: CTRL-A in Visual mode uses character after selection Christian Brabandt <cb@256bit.org> parents: 12702 diff changeset	1803 * If maxlen > 0, check at a maximum maxlen chars.
16706 77bcb5055fec patch 8.1.1355: obvious mistakes are accepted as valid expressions Bram Moolenaar <Bram@vim.org> parents: 16054 diff changeset	1804 * If strict is TRUE, check the number strictly. return *len = 0 if fail.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1805 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1806 void
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1807 vim_str2nr(
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1808 char_u *start,
16706 77bcb5055fec patch 8.1.1355: obvious mistakes are accepted as valid expressions Bram Moolenaar <Bram@vim.org> parents: 16054 diff changeset	1809 int *prep, // return: type of number 0 = decimal, 'x'
20665 6ff992bf4c82 patch 8.2.0886: cannot use octal numbers in scriptversion 4 Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	1810 // or 'X' is hex, '0', 'o' or 'O' is octal,
6ff992bf4c82 patch 8.2.0886: cannot use octal numbers in scriptversion 4 Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	1811 // 'b' or 'B' is bin
16706 77bcb5055fec patch 8.1.1355: obvious mistakes are accepted as valid expressions Bram Moolenaar <Bram@vim.org> parents: 16054 diff changeset	1812 int *len, // return: detected length of number
77bcb5055fec patch 8.1.1355: obvious mistakes are accepted as valid expressions Bram Moolenaar <Bram@vim.org> parents: 16054 diff changeset	1813 int what, // what numbers to recognize
77bcb5055fec patch 8.1.1355: obvious mistakes are accepted as valid expressions Bram Moolenaar <Bram@vim.org> parents: 16054 diff changeset	1814 varnumber_T *nptr, // return: signed result
77bcb5055fec patch 8.1.1355: obvious mistakes are accepted as valid expressions Bram Moolenaar <Bram@vim.org> parents: 16054 diff changeset	1815 uvarnumber_T *unptr, // return: unsigned result
77bcb5055fec patch 8.1.1355: obvious mistakes are accepted as valid expressions Bram Moolenaar <Bram@vim.org> parents: 16054 diff changeset	1816 int maxlen, // max length of string to check
77bcb5055fec patch 8.1.1355: obvious mistakes are accepted as valid expressions Bram Moolenaar <Bram@vim.org> parents: 16054 diff changeset	1817 int strict) // check strictly
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1818 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1819 char_u *ptr = start;
16706 77bcb5055fec patch 8.1.1355: obvious mistakes are accepted as valid expressions Bram Moolenaar <Bram@vim.org> parents: 16054 diff changeset	1820 int pre = 0; // default is decimal
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1821 int negative = FALSE;
9389 32e34e574716 commit https://github.com/vim/vim/commit/22fcfad29276bd5f317faf516637dcd491b96a12 Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	1822 uvarnumber_T un = 0;
39 410fa1a31baf updated for version 7.0023 vimboss parents: 16 diff changeset	1823 int n;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1824
16706 77bcb5055fec patch 8.1.1355: obvious mistakes are accepted as valid expressions Bram Moolenaar <Bram@vim.org> parents: 16054 diff changeset	1825 if (len != NULL)
77bcb5055fec patch 8.1.1355: obvious mistakes are accepted as valid expressions Bram Moolenaar <Bram@vim.org> parents: 16054 diff changeset	1826 *len = 0;
77bcb5055fec patch 8.1.1355: obvious mistakes are accepted as valid expressions Bram Moolenaar <Bram@vim.org> parents: 16054 diff changeset	1827
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1828 if (ptr[0] == '-')
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1829 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1830 negative = TRUE;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1831 ++ptr;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1832 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1833
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1834 // Recognize hex, octal, and bin.
6927 58d9f967ae1a patch 7.4.782 Bram Moolenaar <bram@vim.org> parents: 6503 diff changeset	1835 if (ptr[0] == '0' && ptr[1] != '8' && ptr[1] != '9'
58d9f967ae1a patch 7.4.782 Bram Moolenaar <bram@vim.org> parents: 6503 diff changeset	1836 && (maxlen == 0 \|\| maxlen > 1))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1837 {
7447 ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1838 pre = ptr[1];
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1839 if ((what & STR2NR_HEX)
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1840 && (pre == 'X' \|\| pre == 'x') && vim_isxdigit(ptr[2])
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1841 && (maxlen == 0 \|\| maxlen > 2))
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1842 // hexadecimal
7447 ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1843 ptr += 2;
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1844 else if ((what & STR2NR_BIN)
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1845 && (pre == 'B' \|\| pre == 'b') && vim_isbdigit(ptr[2])
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1846 && (maxlen == 0 \|\| maxlen > 2))
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1847 // binary
7447 ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1848 ptr += 2;
20665 6ff992bf4c82 patch 8.2.0886: cannot use octal numbers in scriptversion 4 Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	1849 else if ((what & STR2NR_OOCT)
23533 ee43d943c3bb patch 8.2.2309: 0o777 not recognized as octal Bram Moolenaar <Bram@vim.org> parents: 20782 diff changeset	1850 && (pre == 'O' \|\| pre == 'o') && vim_isodigit(ptr[2])
20665 6ff992bf4c82 patch 8.2.0886: cannot use octal numbers in scriptversion 4 Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	1851 && (maxlen == 0 \|\| maxlen > 2))
6ff992bf4c82 patch 8.2.0886: cannot use octal numbers in scriptversion 4 Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	1852 // octal with prefix "0o"
6ff992bf4c82 patch 8.2.0886: cannot use octal numbers in scriptversion 4 Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	1853 ptr += 2;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1854 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1855 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1856 // decimal or octal, default is decimal
7447 ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1857 pre = 0;
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1858 if (what & STR2NR_OCT)
39 410fa1a31baf updated for version 7.0023 vimboss parents: 16 diff changeset	1859 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1860 // Don't interpret "0", "08" or "0129" as octal.
12704 ee5f3f5d3c55 patch 8.0.1230: CTRL-A in Visual mode uses character after selection Christian Brabandt <cb@256bit.org> parents: 12702 diff changeset	1861 for (n = 1; n != maxlen && VIM_ISDIGIT(ptr[n]); ++n)
39 410fa1a31baf updated for version 7.0023 vimboss parents: 16 diff changeset	1862 {
410fa1a31baf updated for version 7.0023 vimboss parents: 16 diff changeset	1863 if (ptr[n] > '7')
410fa1a31baf updated for version 7.0023 vimboss parents: 16 diff changeset	1864 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1865 pre = 0; // can't be octal
39 410fa1a31baf updated for version 7.0023 vimboss parents: 16 diff changeset	1866 break;
410fa1a31baf updated for version 7.0023 vimboss parents: 16 diff changeset	1867 }
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1868 pre = '0'; // assume octal
39 410fa1a31baf updated for version 7.0023 vimboss parents: 16 diff changeset	1869 }
410fa1a31baf updated for version 7.0023 vimboss parents: 16 diff changeset	1870 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1871 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1872 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1873
16706 77bcb5055fec patch 8.1.1355: obvious mistakes are accepted as valid expressions Bram Moolenaar <Bram@vim.org> parents: 16054 diff changeset	1874 // Do the conversion manually to avoid sscanf() quirks.
6927 58d9f967ae1a patch 7.4.782 Bram Moolenaar <bram@vim.org> parents: 6503 diff changeset	1875 n = 1;
18082 1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1876 if (pre == 'B' \|\| pre == 'b'
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1877 \|\| ((what & STR2NR_BIN) && (what & STR2NR_FORCE)))
7447 ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1878 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1879 // bin
7447 ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1880 if (pre != 0)
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1881 n += 2; // skip over "0b"
7447 ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1882 while ('0' <= ptr && ptr <= '1')
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1883 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1884 // avoid ubsan error for overflow
14061 47b2db8a5709 patch 8.1.0048: vim_str2nr() does not handle numbers close to the maximum Christian Brabandt <cb@256bit.org> parents: 13786 diff changeset	1885 if (un <= UVARNUM_MAX / 2)
47b2db8a5709 patch 8.1.0048: vim_str2nr() does not handle numbers close to the maximum Christian Brabandt <cb@256bit.org> parents: 13786 diff changeset	1886 un = 2 * un + (uvarnumber_T)(*ptr - '0');
10658 77d66e9ac0ab patch 8.0.0219: ubsan reports errors for overflow Christian Brabandt <cb@256bit.org> parents: 10549 diff changeset	1887 else
77d66e9ac0ab patch 8.0.0219: ubsan reports errors for overflow Christian Brabandt <cb@256bit.org> parents: 10549 diff changeset	1888 un = UVARNUM_MAX;
7447 ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1889 ++ptr;
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1890 if (n++ == maxlen)
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1891 break;
18082 1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1892 if ((what & STR2NR_QUOTE) && *ptr == '\''
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1893 && '0' <= ptr[1] && ptr[1] <= '1')
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1894 {
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1895 ++ptr;
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1896 if (n++ == maxlen)
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1897 break;
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1898 }
7447 ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1899 }
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1900 }
20665 6ff992bf4c82 patch 8.2.0886: cannot use octal numbers in scriptversion 4 Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	1901 else if (pre == 'O' \|\| pre == 'o' \|\|
6ff992bf4c82 patch 8.2.0886: cannot use octal numbers in scriptversion 4 Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	1902 pre == '0' \|\| ((what & STR2NR_OCT) && (what & STR2NR_FORCE)))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1903 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1904 // octal
20665 6ff992bf4c82 patch 8.2.0886: cannot use octal numbers in scriptversion 4 Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	1905 if (pre != 0 && pre != '0')
6ff992bf4c82 patch 8.2.0886: cannot use octal numbers in scriptversion 4 Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	1906 n += 2; // skip over "0o"
293 f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1907 while ('0' <= ptr && ptr <= '7')
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1908 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1909 // avoid ubsan error for overflow
14061 47b2db8a5709 patch 8.1.0048: vim_str2nr() does not handle numbers close to the maximum Christian Brabandt <cb@256bit.org> parents: 13786 diff changeset	1910 if (un <= UVARNUM_MAX / 8)
10658 77d66e9ac0ab patch 8.0.0219: ubsan reports errors for overflow Christian Brabandt <cb@256bit.org> parents: 10549 diff changeset	1911 un = 8 * un + (uvarnumber_T)(*ptr - '0');
77d66e9ac0ab patch 8.0.0219: ubsan reports errors for overflow Christian Brabandt <cb@256bit.org> parents: 10549 diff changeset	1912 else
77d66e9ac0ab patch 8.0.0219: ubsan reports errors for overflow Christian Brabandt <cb@256bit.org> parents: 10549 diff changeset	1913 un = UVARNUM_MAX;
293 f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1914 ++ptr;
6927 58d9f967ae1a patch 7.4.782 Bram Moolenaar <bram@vim.org> parents: 6503 diff changeset	1915 if (n++ == maxlen)
58d9f967ae1a patch 7.4.782 Bram Moolenaar <bram@vim.org> parents: 6503 diff changeset	1916 break;
18082 1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1917 if ((what & STR2NR_QUOTE) && *ptr == '\''
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1918 && '0' <= ptr[1] && ptr[1] <= '7')
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1919 {
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1920 ++ptr;
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1921 if (n++ == maxlen)
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1922 break;
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1923 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1924 }
293 f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1925 }
18082 1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1926 else if (pre != 0 \|\| ((what & STR2NR_HEX) && (what & STR2NR_FORCE)))
293 f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1927 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1928 // hex
7447 ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1929 if (pre != 0)
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1930 n += 2; // skip over "0x"
293 f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1931 while (vim_isxdigit(*ptr))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1932 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1933 // avoid ubsan error for overflow
14061 47b2db8a5709 patch 8.1.0048: vim_str2nr() does not handle numbers close to the maximum Christian Brabandt <cb@256bit.org> parents: 13786 diff changeset	1934 if (un <= UVARNUM_MAX / 16)
10658 77d66e9ac0ab patch 8.0.0219: ubsan reports errors for overflow Christian Brabandt <cb@256bit.org> parents: 10549 diff changeset	1935 un = 16 * un + (uvarnumber_T)hex2nr(*ptr);
77d66e9ac0ab patch 8.0.0219: ubsan reports errors for overflow Christian Brabandt <cb@256bit.org> parents: 10549 diff changeset	1936 else
77d66e9ac0ab patch 8.0.0219: ubsan reports errors for overflow Christian Brabandt <cb@256bit.org> parents: 10549 diff changeset	1937 un = UVARNUM_MAX;
293 f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1938 ++ptr;
6927 58d9f967ae1a patch 7.4.782 Bram Moolenaar <bram@vim.org> parents: 6503 diff changeset	1939 if (n++ == maxlen)
58d9f967ae1a patch 7.4.782 Bram Moolenaar <bram@vim.org> parents: 6503 diff changeset	1940 break;
18082 1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1941 if ((what & STR2NR_QUOTE) && *ptr == '\'' && vim_isxdigit(ptr[1]))
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1942 {
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1943 ++ptr;
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1944 if (n++ == maxlen)
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1945 break;
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1946 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1947 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1948 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1949 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1950 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1951 // decimal
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1952 while (VIM_ISDIGIT(*ptr))
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1953 {
14061 47b2db8a5709 patch 8.1.0048: vim_str2nr() does not handle numbers close to the maximum Christian Brabandt <cb@256bit.org> parents: 13786 diff changeset	1954 uvarnumber_T digit = (uvarnumber_T)(*ptr - '0');
47b2db8a5709 patch 8.1.0048: vim_str2nr() does not handle numbers close to the maximum Christian Brabandt <cb@256bit.org> parents: 13786 diff changeset	1955
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1956 // avoid ubsan error for overflow
14061 47b2db8a5709 patch 8.1.0048: vim_str2nr() does not handle numbers close to the maximum Christian Brabandt <cb@256bit.org> parents: 13786 diff changeset	1957 if (un < UVARNUM_MAX / 10
47b2db8a5709 patch 8.1.0048: vim_str2nr() does not handle numbers close to the maximum Christian Brabandt <cb@256bit.org> parents: 13786 diff changeset	1958 \|\| (un == UVARNUM_MAX / 10 && digit <= UVARNUM_MAX % 10))
47b2db8a5709 patch 8.1.0048: vim_str2nr() does not handle numbers close to the maximum Christian Brabandt <cb@256bit.org> parents: 13786 diff changeset	1959 un = 10 * un + digit;
10658 77d66e9ac0ab patch 8.0.0219: ubsan reports errors for overflow Christian Brabandt <cb@256bit.org> parents: 10549 diff changeset	1960 else
77d66e9ac0ab patch 8.0.0219: ubsan reports errors for overflow Christian Brabandt <cb@256bit.org> parents: 10549 diff changeset	1961 un = UVARNUM_MAX;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1962 ++ptr;
6927 58d9f967ae1a patch 7.4.782 Bram Moolenaar <bram@vim.org> parents: 6503 diff changeset	1963 if (n++ == maxlen)
58d9f967ae1a patch 7.4.782 Bram Moolenaar <bram@vim.org> parents: 6503 diff changeset	1964 break;
18082 1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1965 if ((what & STR2NR_QUOTE) && *ptr == '\'' && VIM_ISDIGIT(ptr[1]))
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1966 {
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1967 ++ptr;
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1968 if (n++ == maxlen)
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1969 break;
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1970 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1971 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1972 }
18082 1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1973
19195 2ef19eed524a patch 8.2.0156: various typos in source files and tests Bram Moolenaar <Bram@vim.org> parents: 18757 diff changeset	1974 // Check for an alphanumeric character immediately following, that is
16706 77bcb5055fec patch 8.1.1355: obvious mistakes are accepted as valid expressions Bram Moolenaar <Bram@vim.org> parents: 16054 diff changeset	1975 // most likely a typo.
77bcb5055fec patch 8.1.1355: obvious mistakes are accepted as valid expressions Bram Moolenaar <Bram@vim.org> parents: 16054 diff changeset	1976 if (strict && n - 1 != maxlen && ASCII_ISALNUM(*ptr))
77bcb5055fec patch 8.1.1355: obvious mistakes are accepted as valid expressions Bram Moolenaar <Bram@vim.org> parents: 16054 diff changeset	1977 return;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1978
7447 ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1979 if (prep != NULL)
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1980 *prep = pre;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1981 if (len != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1982 *len = (int)(ptr - start);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1983 if (nptr != NULL)
16 3ba373b54370 updated for version 7.0008 vimboss parents: 7 diff changeset	1984 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1985 if (negative) // account for leading '-' for decimal numbers
10658 77d66e9ac0ab patch 8.0.0219: ubsan reports errors for overflow Christian Brabandt <cb@256bit.org> parents: 10549 diff changeset	1986 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1987 // avoid ubsan error for overflow
10658 77d66e9ac0ab patch 8.0.0219: ubsan reports errors for overflow Christian Brabandt <cb@256bit.org> parents: 10549 diff changeset	1988 if (un > VARNUM_MAX)
77d66e9ac0ab patch 8.0.0219: ubsan reports errors for overflow Christian Brabandt <cb@256bit.org> parents: 10549 diff changeset	1989 *nptr = VARNUM_MIN;
77d66e9ac0ab patch 8.0.0219: ubsan reports errors for overflow Christian Brabandt <cb@256bit.org> parents: 10549 diff changeset	1990 else
77d66e9ac0ab patch 8.0.0219: ubsan reports errors for overflow Christian Brabandt <cb@256bit.org> parents: 10549 diff changeset	1991 *nptr = -(varnumber_T)un;
77d66e9ac0ab patch 8.0.0219: ubsan reports errors for overflow Christian Brabandt <cb@256bit.org> parents: 10549 diff changeset	1992 }
16 3ba373b54370 updated for version 7.0008 vimboss parents: 7 diff changeset	1993 else
10658 77d66e9ac0ab patch 8.0.0219: ubsan reports errors for overflow Christian Brabandt <cb@256bit.org> parents: 10549 diff changeset	1994 {
77d66e9ac0ab patch 8.0.0219: ubsan reports errors for overflow Christian Brabandt <cb@256bit.org> parents: 10549 diff changeset	1995 if (un > VARNUM_MAX)
77d66e9ac0ab patch 8.0.0219: ubsan reports errors for overflow Christian Brabandt <cb@256bit.org> parents: 10549 diff changeset	1996 un = VARNUM_MAX;
9389 32e34e574716 commit https://github.com/vim/vim/commit/22fcfad29276bd5f317faf516637dcd491b96a12 Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	1997 *nptr = (varnumber_T)un;
10658 77d66e9ac0ab patch 8.0.0219: ubsan reports errors for overflow Christian Brabandt <cb@256bit.org> parents: 10549 diff changeset	1998 }
16 3ba373b54370 updated for version 7.0008 vimboss parents: 7 diff changeset	1999 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2000 if (unptr != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2001 *unptr = un;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2002 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2003
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2004 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2005 * Return the value of a single hex character.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2006 * Only valid when the argument is '0' - '9', 'A' - 'F' or 'a' - 'f'.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2007 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2008 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	2009 hex2nr(int c)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2010 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2011 if (c >= 'a' && c <= 'f')
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2012 return c - 'a' + 10;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2013 if (c >= 'A' && c <= 'F')
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2014 return c - 'A' + 10;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2015 return c - '0';
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2016 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2017
24268 9257f3980f4a patch 8.2.2675: directory change in a terminal window shell is not followed Bram Moolenaar <Bram@vim.org> parents: 23952 diff changeset	2018 #if defined(FEAT_TERMRESPONSE) \|\| defined(FEAT_GUI_GTK) \
9257f3980f4a patch 8.2.2675: directory change in a terminal window shell is not followed Bram Moolenaar <Bram@vim.org> parents: 23952 diff changeset	2019 \|\| defined(PROTO) \|\| defined(FEAT_AUTOSHELLDIR)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2020 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2021 * Convert two hex characters to a byte.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2022 * Return -1 if one of the characters is not hex.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2023 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2024 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	2025 hexhex2nr(char_u *p)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2026 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2027 if (!vim_isxdigit(p[0]) \|\| !vim_isxdigit(p[1]))
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2028 return -1;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2029 return (hex2nr(p[0]) << 4) + hex2nr(p[1]);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2030 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2031 #endif
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2032
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2033 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2034 * Return TRUE if "str" starts with a backslash that should be removed.
16054 78faa25f9698 patch 8.1.1032: warnings from clang static analyzer Bram Moolenaar <Bram@vim.org> parents: 15850 diff changeset	2035 * For MS-DOS, MSWIN and OS/2 this is only done when the character after the
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2036 * backslash is not a normal file name character.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2037 * '$' is a valid file name character, we don't remove the backslash before
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2038 * it. This means it is not possible to use an environment variable after a
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2039 * backslash. "C:\$VIM\doc" is taken literally, only "$VIM\doc" works.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2040 * Although "\ name" is valid, the backslash in "Program\ files" must be
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2041 * removed. Assume a file name doesn't start with a space.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2042 * For multi-byte names, never remove a backslash before a non-ascii
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2043 * character, assume that all multi-byte characters are valid file name
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2044 * characters.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2045 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2046 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	2047 rem_backslash(char_u *str)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2048 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2049 #ifdef BACKSLASH_IN_FILENAME
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2050 return (str[0] == '\\'
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2051 && str[1] < 0x80
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2052 && (str[1] == ' '
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2053 \|\| (str[1] != NUL
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2054 && str[1] != '*'
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2055 && str[1] != '?'
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2056 && !vim_isfilec(str[1]))));
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2057 #else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2058 return (str[0] == '\\' && str[1] != NUL);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2059 #endif
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2060 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2061
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2062 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2063 * Halve the number of backslashes in a file name argument.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2064 * For MS-DOS we only do this if the character after the backslash
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2065 * is not a normal file character.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2066 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2067 void
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	2068 backslash_halve(char_u *p)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2069 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2070 for ( ; *p; ++p)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2071 if (rem_backslash(p))
1621 82b5078be2dd updated for version 7.2a vimboss parents: 1546 diff changeset	2072 STRMOVE(p, p + 1);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2073 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2074
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2075 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2076 * backslash_halve() plus save the result in allocated memory.
17809 59f8948b7590 patch 8.1.1901: the +insert_expand feature is not always available Bram Moolenaar <Bram@vim.org> parents: 17789 diff changeset	2077 * However, returns "p" when out of memory.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2078 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2079 char_u *
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	2080 backslash_halve_save(char_u *p)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2081 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2082 char_u *res;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2083
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2084 res = vim_strsave(p);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2085 if (res == NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2086 return p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2087 backslash_halve(res);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2088 return res;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2089 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2090
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2091 #if (defined(EBCDIC) && defined(FEAT_POSTSCRIPT)) \|\| defined(PROTO)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2092 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2093 * Table for EBCDIC to ASCII conversion unashamedly taken from xxd.c!
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2094 * The first 64 entries have been added to map control characters defined in
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2095 * ascii.h
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2096 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2097 static char_u ebcdic2ascii_tab[256] =
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2098 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2099 0000, 0001, 0002, 0003, 0004, 0011, 0006, 0177,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2100 0010, 0011, 0012, 0013, 0014, 0015, 0016, 0017,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2101 0020, 0021, 0022, 0023, 0024, 0012, 0010, 0027,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2102 0030, 0031, 0032, 0033, 0033, 0035, 0036, 0037,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2103 0040, 0041, 0042, 0043, 0044, 0045, 0046, 0047,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2104 0050, 0051, 0052, 0053, 0054, 0055, 0056, 0057,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2105 0060, 0061, 0062, 0063, 0064, 0065, 0066, 0067,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2106 0070, 0071, 0072, 0073, 0074, 0075, 0076, 0077,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2107 0040, 0240, 0241, 0242, 0243, 0244, 0245, 0246,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2108 0247, 0250, 0325, 0056, 0074, 0050, 0053, 0174,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2109 0046, 0251, 0252, 0253, 0254, 0255, 0256, 0257,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2110 0260, 0261, 0041, 0044, 0052, 0051, 0073, 0176,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2111 0055, 0057, 0262, 0263, 0264, 0265, 0266, 0267,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2112 0270, 0271, 0313, 0054, 0045, 0137, 0076, 0077,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2113 0272, 0273, 0274, 0275, 0276, 0277, 0300, 0301,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2114 0302, 0140, 0072, 0043, 0100, 0047, 0075, 0042,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2115 0303, 0141, 0142, 0143, 0144, 0145, 0146, 0147,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2116 0150, 0151, 0304, 0305, 0306, 0307, 0310, 0311,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2117 0312, 0152, 0153, 0154, 0155, 0156, 0157, 0160,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2118 0161, 0162, 0136, 0314, 0315, 0316, 0317, 0320,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2119 0321, 0345, 0163, 0164, 0165, 0166, 0167, 0170,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2120 0171, 0172, 0322, 0323, 0324, 0133, 0326, 0327,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2121 0330, 0331, 0332, 0333, 0334, 0335, 0336, 0337,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2122 0340, 0341, 0342, 0343, 0344, 0135, 0346, 0347,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2123 0173, 0101, 0102, 0103, 0104, 0105, 0106, 0107,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2124 0110, 0111, 0350, 0351, 0352, 0353, 0354, 0355,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2125 0175, 0112, 0113, 0114, 0115, 0116, 0117, 0120,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2126 0121, 0122, 0356, 0357, 0360, 0361, 0362, 0363,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2127 0134, 0237, 0123, 0124, 0125, 0126, 0127, 0130,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2128 0131, 0132, 0364, 0365, 0366, 0367, 0370, 0371,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2129 0060, 0061, 0062, 0063, 0064, 0065, 0066, 0067,
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2130 0070, 0071, 0372, 0373, 0374, 0375, 0376, 0377
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2131 };
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2132
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2133 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2134 * Convert a buffer worth of characters from EBCDIC to ASCII. Only useful if
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2135 * wanting 7-bit ASCII characters out the other end.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2136 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2137 void
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	2138 ebcdic2ascii(char_u *buffer, int len)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2139 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2140 int i;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2141
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2142 for (i = 0; i < len; i++)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2143 buffer[i] = ebcdic2ascii_tab[buffer[i]];
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2144 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2145 #endif

Mercurial > vim

annotate src/charset.c @ 24649:31a7fa6b2e93 v8.2.2863