vim: src/charset.c annotate

annotate src/charset.c @ 28849:be5bc2060ee8

Added tag v8.2.4947 for changeset ba81f4ed59e2781fa94f2ba0e002768a1987d4f5

author	Bram Moolenaar <Bram@vim.org>
date	Fri, 13 May 2022 13:45:04 +0200
parents	d770568e6c98
children	6cdf55afaae9

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 c = 0;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	92 while (c < ' ')
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	93 g_chartab[c++] = (dy_flags & DY_UHEX) ? 4 : 2;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	94 while (c <= '~')
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	95 g_chartab[c++] = 1 + CT_PRINT_CHAR;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	96 while (c < 256)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	97 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	98 // UTF-8: bytes 0xa0 - 0xff are printable (latin1)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	99 if (enc_utf8 && c >= 0xa0)
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	100 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	101 // euc-jp characters starting with 0x8e are single width
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	102 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	103 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	104 // other double-byte chars can be printable AND double-width
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	105 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	106 g_chartab[c++] = CT_PRINT_CHAR + 2;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	107 else
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	108 // 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	109 g_chartab[c++] = (dy_flags & DY_UHEX) ? 4 : 2;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	110 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	111
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	112 // Assume that every multi-byte char is a filename character.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	113 for (c = 1; c < 256; ++c)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	114 if ((enc_dbcs != 0 && MB_BYTE2LEN(c) > 1)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	115 \|\| (enc_dbcs == DBCS_JPNU && c == 0x8e)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	116 \|\| (enc_utf8 && c >= 0xa0))
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	117 g_chartab[c] \|= CT_FNAME_CHAR;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	118 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	119
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	120 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	121 * Init word char flags all to FALSE
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	122 */
20007 aadd1cae2ff5 patch 8.2.0559: clearing a struct is verbose Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	123 CLEAR_FIELD(buf->b_chartab);
227 ef254e0f2365 updated for version 7.0063 vimboss parents: 221 diff changeset	124 if (enc_dbcs != 0)
ef254e0f2365 updated for version 7.0063 vimboss parents: 221 diff changeset	125 for (c = 0; c < 256; ++c)
ef254e0f2365 updated for version 7.0063 vimboss parents: 221 diff changeset	126 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	127 // double-byte characters are probably word characters
227 ef254e0f2365 updated for version 7.0063 vimboss parents: 221 diff changeset	128 if (MB_BYTE2LEN(c) == 2)
ef254e0f2365 updated for version 7.0063 vimboss parents: 221 diff changeset	129 SET_CHARTAB(buf, c);
ef254e0f2365 updated for version 7.0063 vimboss parents: 221 diff changeset	130 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	131
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	132 #ifdef FEAT_LISP
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	133 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	134 * In lisp mode the '-' character is included in keywords.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	135 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	136 if (buf->b_p_lisp)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	137 SET_CHARTAB(buf, '-');
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	138 #endif
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	139
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	140 // 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	141 // 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	142 // ranges, separated by commas, e.g.: "200-210,x,#-178,-"
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	143 for (i = global ? 0 : 3; i <= 3; ++i)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	144 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	145 if (i == 0)
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	146 p = p_isi; // first round: 'isident'
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	147 else if (i == 1)
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	148 p = p_isp; // second round: 'isprint'
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	149 else if (i == 2)
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	150 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	151 else // i == 3
c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	152 p = buf->b_p_isk; // fourth round: 'iskeyword'
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	153
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	154 while (*p)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	155 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	156 tilde = FALSE;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	157 do_isalpha = FALSE;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	158 if (*p == '^' && p[1] != NUL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	159 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	160 tilde = TRUE;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	161 ++p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	162 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	163 if (VIM_ISDIGIT(*p))
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	164 c = getdigits(&p);
24665 661d15592d3c patch 8.2.2871: unnessary VIM_ISDIGIT() calls, badly indented code Bram Moolenaar <Bram@vim.org> parents: 24375 diff changeset	165 else if (has_mbyte)
1955 3f1b2e6496de updated for version 7.2-252 vimboss parents: 1876 diff changeset	166 c = mb_ptr2char_adv(&p);
3f1b2e6496de updated for version 7.2-252 vimboss parents: 1876 diff changeset	167 else
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	168 c = *p++;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	169 c2 = -1;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	170 if (*p == '-' && p[1] != NUL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	171 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	172 ++p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	173 if (VIM_ISDIGIT(*p))
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	174 c2 = getdigits(&p);
24665 661d15592d3c patch 8.2.2871: unnessary VIM_ISDIGIT() calls, badly indented code Bram Moolenaar <Bram@vim.org> parents: 24375 diff changeset	175 else if (has_mbyte)
1979 fd24e02210c9 updated for version 7.2-276 vimboss parents: 1970 diff changeset	176 c2 = mb_ptr2char_adv(&p);
fd24e02210c9 updated for version 7.2-276 vimboss parents: 1970 diff changeset	177 else
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	178 c2 = *p++;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	179 }
1979 fd24e02210c9 updated for version 7.2-276 vimboss parents: 1970 diff changeset	180 if (c <= 0 \|\| c >= 256 \|\| (c2 < c && c2 != -1) \|\| c2 >= 256
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	181 \|\| !(p == NUL \|\| p == ','))
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	182 return FAIL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	183
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	184 if (c2 == -1) // not a range
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	185 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	186 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	187 * A single '@' (not "@-@"):
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	188 * Decide on letters being ID/printable/keyword chars with
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	189 * standard function isalpha(). This takes care of locale for
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	190 * single-byte characters).
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	191 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	192 if (c == '@')
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	193 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	194 do_isalpha = TRUE;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	195 c = 1;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	196 c2 = 255;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	197 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	198 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	199 c2 = c;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	200 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	201 while (c <= c2)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	202 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	203 // 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	204 // 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	205 // "C".
15850 a6ca8cf07a98 patch 8.1.0932: Farsi support is outdated and unused Bram Moolenaar <Bram@vim.org> parents: 15636 diff changeset	206 if (!do_isalpha \|\| MB_ISLOWER(c) \|\| MB_ISUPPER(c))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	207 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	208 if (i == 0) // (re)set ID flag
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	209 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	210 if (tilde)
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	211 g_chartab[c] &= ~CT_ID_CHAR;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	212 else
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	213 g_chartab[c] \|= CT_ID_CHAR;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	214 }
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	215 else if (i == 1) // (re)set printable
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	216 {
27490 fb4c30606b4a patch 8.2.4273: the EBCDIC support is outdated Bram Moolenaar <Bram@vim.org> parents: 27018 diff changeset	217 if ((c < ' ' \|\| c > '~'
15595 1ec942f1b648 patch 8.1.0805: too many #ifdefs Bram Moolenaar <Bram@vim.org> parents: 14862 diff changeset	218 // 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	219 // 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	220 ) && !(enc_dbcs && MB_BYTE2LEN(c) == 2))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	221 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	222 if (tilde)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	223 {
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	224 g_chartab[c] = (g_chartab[c] & ~CT_CELL_MASK)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	225 + ((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	226 g_chartab[c] &= ~CT_PRINT_CHAR;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	227 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	228 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	229 {
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	230 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	231 g_chartab[c] \|= CT_PRINT_CHAR;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	232 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	233 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	234 }
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	235 else if (i == 2) // (re)set fname flag
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	236 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	237 if (tilde)
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	238 g_chartab[c] &= ~CT_FNAME_CHAR;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	239 else
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	240 g_chartab[c] \|= CT_FNAME_CHAR;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	241 }
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	242 else // i == 3 (re)set keyword flag
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	243 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	244 if (tilde)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	245 RESET_CHARTAB(buf, c);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	246 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	247 SET_CHARTAB(buf, c);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	248 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	249 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	250 ++c;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	251 }
4096 cd5145d2408b updated for version 7.3.802 Bram Moolenaar <bram@vim.org> parents: 4080 diff changeset	252
cd5145d2408b updated for version 7.3.802 Bram Moolenaar <bram@vim.org> parents: 4080 diff changeset	253 c = *p;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	254 p = skip_to_option_part(p);
4096 cd5145d2408b updated for version 7.3.802 Bram Moolenaar <bram@vim.org> parents: 4080 diff changeset	255 if (c == ',' && *p == NUL)
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	256 // Trailing comma is not allowed.
4096 cd5145d2408b updated for version 7.3.802 Bram Moolenaar <bram@vim.org> parents: 4080 diff changeset	257 return FAIL;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	258 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	259 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	260 chartab_initialized = TRUE;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	261 return OK;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	262 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	263
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	264 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	265 * Translate any special characters in buf[bufsize] in-place.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	266 * The result is a string with only printable characters, but if there is not
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	267 * enough room, not all characters will be translated.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	268 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	269 void
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	270 trans_characters(
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	271 char_u *buf,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	272 int bufsize)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	273 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	274 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	275 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	276 char_u *trs; // translated character
c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	277 int trs_len; // length of trs[]
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	278
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	279 len = (int)STRLEN(buf);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	280 room = bufsize - len;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	281 while (*buf != 0)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	282 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	283 // Assume a multi-byte character doesn't need translation.
474 a5fcf36ef512 updated for version 7.0127 vimboss parents: 308 diff changeset	284 if (has_mbyte && (trs_len = (*mb_ptr2len)(buf)) > 1)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	285 len -= trs_len;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	286 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	287 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	288 trs = transchar_byte(*buf);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	289 trs_len = (int)STRLEN(trs);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	290 if (trs_len > 1)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	291 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	292 room -= trs_len - 1;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	293 if (room <= 0)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	294 return;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	295 mch_memmove(buf + trs_len, buf + 1, (size_t)len);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	296 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	297 mch_memmove(buf, trs, (size_t)trs_len);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	298 --len;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	299 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	300 buf += trs_len;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	301 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	302 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	303
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	304 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	305 * Translate a string into allocated memory, replacing special chars with
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	306 * printable chars. Returns NULL when out of memory.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	307 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	308 char_u *
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	309 transstr(char_u *s)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	310 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	311 char_u *res;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	312 char_u *p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	313 int l, len, c;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	314 char_u hexbuf[11];
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	315
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	316 if (has_mbyte)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	317 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	318 // 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	319 // multi-byte characters.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	320 len = 0;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	321 p = s;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	322 while (*p != NUL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	323 {
474 a5fcf36ef512 updated for version 7.0127 vimboss parents: 308 diff changeset	324 if ((l = (*mb_ptr2len)(p)) > 1)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	325 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	326 c = (*mb_ptr2char)(p);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	327 p += l;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	328 if (vim_isprintc(c))
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	329 len += l;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	330 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	331 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	332 transchar_hex(hexbuf, c);
835 8bebcabccc2c updated for version 7.0e01 vimboss parents: 782 diff changeset	333 len += (int)STRLEN(hexbuf);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	334 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	335 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	336 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	337 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	338 l = byte2cells(*p++);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	339 if (l > 0)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	340 len += l;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	341 else
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	342 len += 4; // illegal byte sequence
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	343 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	344 }
16764 ef00b6bc186b patch 8.1.1384: using "int" for alloc() often results in compiler warnings Bram Moolenaar <Bram@vim.org> parents: 16706 diff changeset	345 res = alloc(len + 1);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	346 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	347 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	348 res = alloc(vim_strsize(s) + 1);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	349 if (res != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	350 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	351 *res = NUL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	352 p = s;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	353 while (*p != NUL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	354 {
474 a5fcf36ef512 updated for version 7.0127 vimboss parents: 308 diff changeset	355 if (has_mbyte && (l = (*mb_ptr2len)(p)) > 1)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	356 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	357 c = (*mb_ptr2char)(p);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	358 if (vim_isprintc(c))
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	359 STRNCAT(res, p, l); // append printable multi-byte char
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	360 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	361 transchar_hex(res + STRLEN(res), c);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	362 p += l;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	363 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	364 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	365 STRCAT(res, transchar_byte(*p++));
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	366 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	367 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	368 return res;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	369 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	370
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	371 /*
221 7fd4b5df33be updated for version 7.0062 vimboss parents: 130 diff changeset	372 * Convert the string "str[orglen]" to do ignore-case comparing. Uses the
7fd4b5df33be updated for version 7.0062 vimboss parents: 130 diff changeset	373 * current locale.
130 964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	374 * When "buf" is NULL returns an allocated string (NULL for out-of-memory).
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	375 * Otherwise puts the result in "buf[buflen]".
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	376 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	377 char_u *
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	378 str_foldcase(
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	379 char_u *str,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	380 int orglen,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	381 char_u *buf,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	382 int buflen)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	383 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	384 garray_T ga;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	385 int i;
130 964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	386 int len = orglen;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	387
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	388 #define GA_CHAR(i) ((char_u *)ga.ga_data)[i]
27752 c1d1639b52dd patch 8.2.4402: missing parenthesis may cause unexpected problems Bram Moolenaar <Bram@vim.org> parents: 27490 diff changeset	389 #define GA_PTR(i) ((char_u *)ga.ga_data + (i))
130 964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	390 #define STR_CHAR(i) (buf == NULL ? GA_CHAR(i) : buf[i])
27752 c1d1639b52dd patch 8.2.4402: missing parenthesis may cause unexpected problems Bram Moolenaar <Bram@vim.org> parents: 27490 diff changeset	391 #define STR_PTR(i) (buf == NULL ? GA_PTR(i) : buf + (i))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	392
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	393 // Copy "str" into "buf" or allocated memory, unmodified.
130 964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	394 if (buf == NULL)
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	395 {
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	396 ga_init2(&ga, 1, 10);
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	397 if (ga_grow(&ga, len + 1) == FAIL)
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	398 return NULL;
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	399 mch_memmove(ga.ga_data, str, (size_t)len);
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	400 ga.ga_len = len;
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	401 }
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	402 else
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	403 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	404 if (len >= buflen) // Ugly!
130 964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	405 len = buflen - 1;
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	406 mch_memmove(buf, str, (size_t)len);
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	407 }
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	408 if (buf == NULL)
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	409 GA_CHAR(len) = NUL;
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	410 else
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	411 buf[len] = NUL;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	412
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	413 // Make each character lower case.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	414 i = 0;
130 964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	415 while (STR_CHAR(i) != NUL)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	416 {
130 964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	417 if (enc_utf8 \|\| (has_mbyte && MB_BYTE2LEN(STR_CHAR(i)) > 1))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	418 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	419 if (enc_utf8)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	420 {
1654 0eef0f621811 updated for version 7.2a-006 vimboss parents: 1621 diff changeset	421 int c = utf_ptr2char(STR_PTR(i));
3263 320cc46d0eb0 updated for version 7.3.400 Bram Moolenaar <bram@vim.org> parents: 2541 diff changeset	422 int olen = utf_ptr2len(STR_PTR(i));
1654 0eef0f621811 updated for version 7.2a-006 vimboss parents: 1621 diff changeset	423 int lc = utf_tolower(c);
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 // 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	426 // 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	427 // 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	428 if ((c < 0x80 \|\| olen > 1) && c != lc)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	429 {
3263 320cc46d0eb0 updated for version 7.3.400 Bram Moolenaar <bram@vim.org> parents: 2541 diff changeset	430 int nlen = utf_char2len(lc);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	431
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	432 // 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	433 // characters forward or backward.
3263 320cc46d0eb0 updated for version 7.3.400 Bram Moolenaar <bram@vim.org> parents: 2541 diff changeset	434 if (olen != nlen)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	435 {
3263 320cc46d0eb0 updated for version 7.3.400 Bram Moolenaar <bram@vim.org> parents: 2541 diff changeset	436 if (nlen > olen)
130 964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	437 {
3263 320cc46d0eb0 updated for version 7.3.400 Bram Moolenaar <bram@vim.org> parents: 2541 diff changeset	438 if (buf == NULL
320cc46d0eb0 updated for version 7.3.400 Bram Moolenaar <bram@vim.org> parents: 2541 diff changeset	439 ? ga_grow(&ga, nlen - olen + 1) == FAIL
320cc46d0eb0 updated for version 7.3.400 Bram Moolenaar <bram@vim.org> parents: 2541 diff changeset	440 : len + nlen - olen >= buflen)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	441 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	442 // out of memory, keep old char
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	443 lc = c;
3263 320cc46d0eb0 updated for version 7.3.400 Bram Moolenaar <bram@vim.org> parents: 2541 diff changeset	444 nlen = olen;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	445 }
130 964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	446 }
3263 320cc46d0eb0 updated for version 7.3.400 Bram Moolenaar <bram@vim.org> parents: 2541 diff changeset	447 if (olen != nlen)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	448 {
130 964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	449 if (buf == NULL)
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	450 {
3263 320cc46d0eb0 updated for version 7.3.400 Bram Moolenaar <bram@vim.org> parents: 2541 diff changeset	451 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	452 ga.ga_len += nlen - olen;
130 964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	453 }
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	454 else
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	455 {
3263 320cc46d0eb0 updated for version 7.3.400 Bram Moolenaar <bram@vim.org> parents: 2541 diff changeset	456 STRMOVE(buf + i + nlen, buf + i + olen);
320cc46d0eb0 updated for version 7.3.400 Bram Moolenaar <bram@vim.org> parents: 2541 diff changeset	457 len += nlen - olen;
130 964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	458 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	459 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	460 }
130 964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	461 (void)utf_char2bytes(lc, STR_PTR(i));
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	462 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	463 }
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	464 // skip to next multi-byte char
474 a5fcf36ef512 updated for version 7.0127 vimboss parents: 308 diff changeset	465 i += (*mb_ptr2len)(STR_PTR(i));
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	466 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	467 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	468 {
130 964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	469 if (buf == NULL)
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	470 GA_CHAR(i) = TOLOWER_LOC(GA_CHAR(i));
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	471 else
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	472 buf[i] = TOLOWER_LOC(buf[i]);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	473 ++i;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	474 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	475 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	476
130 964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	477 if (buf == NULL)
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	478 return (char_u *)ga.ga_data;
964dc7d8b63d updated for version 7.0044 vimboss parents: 42 diff changeset	479 return buf;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	480 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	481
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	482 /*
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	483 * Catch 22: g_chartab[] can't be initialized before the options are
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	484 * 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	485 * When chartab_initialized == FALSE don't use g_chartab[].
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	486 * Does NOT work for multi-byte characters, c must be <= 255.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	487 * 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	488 * character!
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	489 */
20782 c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	490 static char_u transchar_charbuf[7];
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	491
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	492 char_u *
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	493 transchar(int c)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	494 {
20782 c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	495 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	496 }
c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	497
c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	498 char_u *
c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	499 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	500 {
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	501 int i;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	502
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	503 i = 0;
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	504 if (IS_SPECIAL(c)) // special key code, display as ~@ char
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	505 {
20782 c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	506 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	507 transchar_charbuf[1] = '@';
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	508 i = 2;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	509 c = K_SECOND(c);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	510 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	511
27490 fb4c30606b4a patch 8.2.4273: the EBCDIC support is outdated Bram Moolenaar <Bram@vim.org> parents: 27018 diff changeset	512 if ((!chartab_initialized && ((c >= ' ' && c <= '~')))
fb4c30606b4a patch 8.2.4273: the EBCDIC support is outdated Bram Moolenaar <Bram@vim.org> parents: 27018 diff changeset	513 \|\| (c < 256 && vim_isprintc_strict(c)))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	514 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	515 // 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	516 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	517 transchar_charbuf[i + 1] = NUL;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	518 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	519 else
20782 c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	520 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	521 return transchar_charbuf;
7 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 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	525 * Like transchar(), but called with a byte instead of a character. Checks
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	526 * for an illegal UTF-8 byte.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	527 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	528 char_u *
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	529 transchar_byte(int c)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	530 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	531 if (enc_utf8 && c >= 0x80)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	532 {
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_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	534 return transchar_charbuf;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	535 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	536 return transchar(c);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	537 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	538
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	539 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	540 * 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	541 * "buf[]". "charbuf" needs to be able to hold five bytes.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	542 * Does NOT work for multi-byte characters, c must be <= 255.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	543 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	544 void
20782 c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	545 transchar_nonprint(buf_T buf, char_u charbuf, int c)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	546 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	547 if (c == NL)
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	548 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	549 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	550 c = NL; // we use CR in place of NL in this case
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	551
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	552 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	553 transchar_hex(charbuf, c);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	554
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	555 else if (c <= 0x7f) // 0x00 - 0x1f and 0x7f
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	556 {
20782 c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	557 charbuf[0] = '^';
c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	558 charbuf[1] = c ^ 0x40; // DEL displayed as ^?
c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	559 charbuf[2] = NUL;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	560 }
28013 dbf6d5ea7a1f patch 8.2.4531: LGTM warnings for condition and buffer size Bram Moolenaar <Bram@vim.org> parents: 27952 diff changeset	561 else if (enc_utf8)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	562 {
20782 c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	563 transchar_hex(charbuf, c);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	564 }
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	565 else if (c >= ' ' + 0x80 && c <= '~' + 0x80) // 0xa0 - 0xfe
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	566 {
20782 c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	567 charbuf[0] = '\|';
c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	568 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	569 charbuf[2] = NUL;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	570 }
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	571 else // 0x80 - 0x9f and 0xff
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	572 {
20782 c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	573 charbuf[0] = '~';
c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	574 charbuf[1] = (c - 0x80) ^ 0x40; // 0xff displayed as ~?
c4bce986c31a patch 8.2.0943: displaying ^M or ^J depends on current buffer Bram Moolenaar <Bram@vim.org> parents: 20665 diff changeset	575 charbuf[2] = NUL;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	576 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	577 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	578
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	579 void
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	580 transchar_hex(char_u *buf, int c)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	581 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	582 int i = 0;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	583
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	584 buf[0] = '<';
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	585 if (c > 255)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	586 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	587 buf[++i] = nr2hex((unsigned)c >> 12);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	588 buf[++i] = nr2hex((unsigned)c >> 8);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	589 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	590 buf[++i] = nr2hex((unsigned)c >> 4);
1869 720a59d79bcd updated for version 7.2-168 vimboss parents: 1687 diff changeset	591 buf[++i] = nr2hex((unsigned)c);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	592 buf[++i] = '>';
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	593 buf[++i] = NUL;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	594 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	595
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	596 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	597 * Convert the lower 4 bits of byte "c" to its hex character.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	598 * Lower case letters are used to avoid the confusion of <F1> being 0xf1 or
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	599 * function key 1.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	600 */
1869 720a59d79bcd updated for version 7.2-168 vimboss parents: 1687 diff changeset	601 static unsigned
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	602 nr2hex(unsigned c)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	603 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	604 if ((c & 0xf) <= 9)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	605 return (c & 0xf) + '0';
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	606 return (c & 0xf) - 10 + 'a';
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	607 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	608
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	609 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	610 * Return number of display cells occupied by byte "b".
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	611 * Caller must make sure 0 <= b <= 255.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	612 * For multi-byte mode "b" must be the first byte of a character.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	613 * A TAB is counted as two cells: "^I".
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	614 * 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	615 * cells depends on further bytes.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	616 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	617 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	618 byte2cells(int b)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	619 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	620 if (enc_utf8 && b >= 0x80)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	621 return 0;
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	622 return (g_chartab[b] & CT_CELL_MASK);
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 * Return number of display cells occupied by character "c".
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	627 * "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	628 * A TAB is counted as two cells: "^I" or four: "<09>".
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	629 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	630 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	631 char2cells(int c)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	632 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	633 if (IS_SPECIAL(c))
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	634 return char2cells(K_SECOND(c)) + 2;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	635 if (c >= 0x80)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	636 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	637 // UTF-8: above 0x80 need to check the value
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	638 if (enc_utf8)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	639 return utf_char2cells(c);
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	640 // 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	641 // byte 0x8e
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	642 if (enc_dbcs != 0 && c >= 0x100)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	643 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	644 if (enc_dbcs == DBCS_JPNU && ((unsigned)c >> 8) == 0x8e)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	645 return 1;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	646 return 2;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	647 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	648 }
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	649 return (g_chartab[c & 0xff] & CT_CELL_MASK);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	650 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	651
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	652 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	653 * Return number of display cells occupied by character at "*p".
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	654 * A TAB is counted as two cells: "^I" or four: "<09>".
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	655 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	656 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	657 ptr2cells(char_u *p)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	658 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	659 // 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	660 if (enc_utf8 && *p >= 0x80)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	661 return utf_ptr2cells(p);
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	662 // 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	663 return (g_chartab[*p] & CT_CELL_MASK);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	664 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	665
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	666 /*
3292 c7861dd3b593 updated for version 7.3.414 Bram Moolenaar <bram@vim.org> parents: 3263 diff changeset	667 * Return the number of character cells string "s" will take on the screen,
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	668 * counting TABs as two characters: "^I".
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	669 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	670 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	671 vim_strsize(char_u *s)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	672 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	673 return vim_strnsize(s, (int)MAXCOL);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	674 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	675
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	676 /*
3292 c7861dd3b593 updated for version 7.3.414 Bram Moolenaar <bram@vim.org> parents: 3263 diff changeset	677 * 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	678 * screen, counting TABs as two characters: "^I".
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	679 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	680 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	681 vim_strnsize(char_u *s, int len)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	682 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	683 int size = 0;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	684
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	685 while (*s != NUL && --len >= 0)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	686 if (has_mbyte)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	687 {
474 a5fcf36ef512 updated for version 7.0127 vimboss parents: 308 diff changeset	688 int l = (*mb_ptr2len)(s);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	689
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	690 size += ptr2cells(s);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	691 s += l;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	692 len -= l - 1;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	693 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	694 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	695 size += byte2cells(*s++);
15595 1ec942f1b648 patch 8.1.0805: too many #ifdefs Bram Moolenaar <Bram@vim.org> parents: 14862 diff changeset	696
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	697 return size;
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 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	701 * Return the number of characters 'c' will take on the screen, taking
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	702 * into account the size of a tab.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	703 * Use a define to make it fast, this is used very often!!!
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	704 * Also see getvcol() below.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	705 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	706
14175 2ad722003b36 patch 8.1.0105: all tab stops are the same Christian Brabandt <cb@256bit.org> parents: 14061 diff changeset	707 #ifdef FEAT_VARTABS
2ad722003b36 patch 8.1.0105: all tab stops are the same Christian Brabandt <cb@256bit.org> parents: 14061 diff changeset	708 # define RET_WIN_BUF_CHARTABSIZE(wp, buf, p, col) \
27752 c1d1639b52dd patch 8.2.4402: missing parenthesis may cause unexpected problems Bram Moolenaar <Bram@vim.org> parents: 27490 diff changeset	709 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	710 { \
2ad722003b36 patch 8.1.0105: all tab stops are the same Christian Brabandt <cb@256bit.org> parents: 14061 diff changeset	711 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	712 } \
2ad722003b36 patch 8.1.0105: all tab stops are the same Christian Brabandt <cb@256bit.org> parents: 14061 diff changeset	713 else \
2ad722003b36 patch 8.1.0105: all tab stops are the same Christian Brabandt <cb@256bit.org> parents: 14061 diff changeset	714 return ptr2cells(p);
2ad722003b36 patch 8.1.0105: all tab stops are the same Christian Brabandt <cb@256bit.org> parents: 14061 diff changeset	715 #else
2ad722003b36 patch 8.1.0105: all tab stops are the same Christian Brabandt <cb@256bit.org> parents: 14061 diff changeset	716 # 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	717 if (*(p) == TAB && (!(wp)->w_p_list \|\| wp->w_lcs_chars.tab1)) \
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	718 { \
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	719 int ts; \
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	720 ts = (buf)->b_p_ts; \
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	721 return (int)(ts - (col % ts)); \
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	722 } \
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	723 else \
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	724 return ptr2cells(p);
14175 2ad722003b36 patch 8.1.0105: all tab stops are the same Christian Brabandt <cb@256bit.org> parents: 14061 diff changeset	725 #endif
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 chartabsize(char_u *p, colnr_T col)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	729 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	730 RET_WIN_BUF_CHARTABSIZE(curwin, curbuf, p, col)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	731 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	732
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	733 #ifdef FEAT_LINEBREAK
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	734 static int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	735 win_chartabsize(win_T wp, char_u p, colnr_T col)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	736 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	737 RET_WIN_BUF_CHARTABSIZE(wp, wp->w_buffer, p, col)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	738 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	739 #endif
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	740
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	741 /*
2339 01e4b4d37842 Added strdisplaywidth() function. Bram Moolenaar <bram@vim.org> parents: 2108 diff changeset	742 * 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	743 * taking into account the size of a tab.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	744 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	745 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	746 linetabsize(char_u *s)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	747 {
2339 01e4b4d37842 Added strdisplaywidth() function. Bram Moolenaar <bram@vim.org> parents: 2108 diff changeset	748 return linetabsize_col(0, s);
01e4b4d37842 Added strdisplaywidth() function. Bram Moolenaar <bram@vim.org> parents: 2108 diff changeset	749 }
01e4b4d37842 Added strdisplaywidth() function. Bram Moolenaar <bram@vim.org> parents: 2108 diff changeset	750
01e4b4d37842 Added strdisplaywidth() function. Bram Moolenaar <bram@vim.org> parents: 2108 diff changeset	751 /*
01e4b4d37842 Added strdisplaywidth() function. Bram Moolenaar <bram@vim.org> parents: 2108 diff changeset	752 * Like linetabsize(), but starting at column "startcol".
01e4b4d37842 Added strdisplaywidth() function. Bram Moolenaar <bram@vim.org> parents: 2108 diff changeset	753 */
01e4b4d37842 Added strdisplaywidth() function. Bram Moolenaar <bram@vim.org> parents: 2108 diff changeset	754 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	755 linetabsize_col(int startcol, char_u *s)
2339 01e4b4d37842 Added strdisplaywidth() function. Bram Moolenaar <bram@vim.org> parents: 2108 diff changeset	756 {
01e4b4d37842 Added strdisplaywidth() function. Bram Moolenaar <bram@vim.org> parents: 2108 diff changeset	757 colnr_T col = startcol;
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	758 char_u *line = s; // pointer to start of line, for breakindent
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	759
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	760 while (*s != NUL)
5995 ef83b423ebf7 updated for version 7.4.338 Bram Moolenaar <bram@vim.org> parents: 5735 diff changeset	761 col += lbr_chartabsize_adv(line, &s, col);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	762 return (int)col;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	763 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	764
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	765 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	766 * Like linetabsize(), but for a given window instead of the current one.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	767 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	768 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	769 win_linetabsize(win_T wp, char_u line, colnr_T len)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	770 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	771 colnr_T col = 0;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	772 char_u *s;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	773
5995 ef83b423ebf7 updated for version 7.4.338 Bram Moolenaar <bram@vim.org> parents: 5735 diff changeset	774 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	775 MB_PTR_ADV(s))
5995 ef83b423ebf7 updated for version 7.4.338 Bram Moolenaar <bram@vim.org> parents: 5735 diff changeset	776 col += win_lbr_chartabsize(wp, line, s, col, NULL);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	777 return (int)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 /*
42 c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	781 * Return TRUE if 'c' is a normal identifier character:
c75153d791d0 updated for version 7.0026 vimboss parents: 41 diff changeset	782 * Letters and characters from the 'isident' option.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	783 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	784 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	785 vim_isIDc(int c)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	786 {
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	787 return (c > 0 && c < 0x100 && (g_chartab[c] & CT_ID_CHAR));
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	788 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	789
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	790 /*
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	791 * 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	792 * 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	793 */
fe4b6fc7149c patch 8.2.2728: special key names don't work if 'isident' is cleared Bram Moolenaar <Bram@vim.org> parents: 24268 diff changeset	794 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	795 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	796 {
fe4b6fc7149c patch 8.2.2728: special key names don't work if 'isident' is cleared Bram Moolenaar <Bram@vim.org> parents: 24268 diff changeset	797 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	798 }
fe4b6fc7149c patch 8.2.2728: special key names don't work if 'isident' is cleared Bram Moolenaar <Bram@vim.org> parents: 24268 diff changeset	799
fe4b6fc7149c patch 8.2.2728: special key names don't work if 'isident' is cleared Bram Moolenaar <Bram@vim.org> parents: 24268 diff changeset	800 /*
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	801 * 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	802 * 'iskeyword' option for the current buffer.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	803 * For multi-byte characters mb_get_class() is used (builtin rules).
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	804 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	805 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	806 vim_iswordc(int c)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	807 {
4043 80b041b994d1 updated for version 7.3.776 Bram Moolenaar <bram@vim.org> parents: 3533 diff changeset	808 return vim_iswordc_buf(c, curbuf);
80b041b994d1 updated for version 7.3.776 Bram Moolenaar <bram@vim.org> parents: 3533 diff changeset	809 }
80b041b994d1 updated for version 7.3.776 Bram Moolenaar <bram@vim.org> parents: 3533 diff changeset	810
80b041b994d1 updated for version 7.3.776 Bram Moolenaar <bram@vim.org> parents: 3533 diff changeset	811 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	812 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	813 {
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	814 if (c >= 0x100)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	815 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	816 if (enc_dbcs != 0)
1869 720a59d79bcd updated for version 7.2-168 vimboss parents: 1687 diff changeset	817 return dbcs_class((unsigned)c >> 8, (unsigned)(c & 0xff)) >= 2;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	818 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	819 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	820 return FALSE;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	821 }
10724 ae1c6bf22e5f patch 8.0.0252: not properly recognizing word characters between 128 and 255 Christian Brabandt <cb@256bit.org> parents: 10720 diff changeset	822 return (c > 0 && GET_CHARTAB(buf, c) != 0);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	823 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	824
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	825 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	826 * Just like vim_iswordc() but uses a pointer to the (multi-byte) character.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	827 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	828 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	829 vim_iswordp(char_u *p)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	830 {
10724 ae1c6bf22e5f patch 8.0.0252: not properly recognizing word characters between 128 and 255 Christian Brabandt <cb@256bit.org> parents: 10720 diff changeset	831 return vim_iswordp_buf(p, curbuf);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	832 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	833
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	834 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	835 vim_iswordp_buf(char_u p, buf_T buf)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	836 {
10724 ae1c6bf22e5f patch 8.0.0252: not properly recognizing word characters between 128 and 255 Christian Brabandt <cb@256bit.org> parents: 10720 diff changeset	837 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	838
ae1c6bf22e5f patch 8.0.0252: not properly recognizing word characters between 128 and 255 Christian Brabandt <cb@256bit.org> parents: 10720 diff changeset	839 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	840 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	841 return vim_iswordc_buf(c, buf);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	842 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	843
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	844 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	845 * return TRUE if 'c' is a valid file-name character
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	846 * Assume characters above 0x100 are valid (multi-byte).
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	847 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	848 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	849 vim_isfilec(int c)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	850 {
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	851 return (c >= 0x100 \|\| (c > 0 && (g_chartab[c] & CT_FNAME_CHAR)));
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	852 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	853
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	854 /*
1369 1d4c67f84709 updated for version 7.1-084 vimboss parents: 1365 diff changeset	855 * 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	856 * Assume characters above 0x100 are valid (multi-byte).
1d4c67f84709 updated for version 7.1-084 vimboss parents: 1365 diff changeset	857 * Explicitly interpret ']' as a wildcard character as mch_has_wildcard("]")
1d4c67f84709 updated for version 7.1-084 vimboss parents: 1365 diff changeset	858 * returns false.
1d4c67f84709 updated for version 7.1-084 vimboss parents: 1365 diff changeset	859 */
1d4c67f84709 updated for version 7.1-084 vimboss parents: 1365 diff changeset	860 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	861 vim_isfilec_or_wc(int c)
1369 1d4c67f84709 updated for version 7.1-084 vimboss parents: 1365 diff changeset	862 {
1d4c67f84709 updated for version 7.1-084 vimboss parents: 1365 diff changeset	863 char_u buf[2];
1d4c67f84709 updated for version 7.1-084 vimboss parents: 1365 diff changeset	864
1d4c67f84709 updated for version 7.1-084 vimboss parents: 1365 diff changeset	865 buf[0] = (char_u)c;
1d4c67f84709 updated for version 7.1-084 vimboss parents: 1365 diff changeset	866 buf[1] = NUL;
1d4c67f84709 updated for version 7.1-084 vimboss parents: 1365 diff changeset	867 return vim_isfilec(c) \|\| c == ']' \|\| mch_has_wildcard(buf);
1d4c67f84709 updated for version 7.1-084 vimboss parents: 1365 diff changeset	868 }
1d4c67f84709 updated for version 7.1-084 vimboss parents: 1365 diff changeset	869
1d4c67f84709 updated for version 7.1-084 vimboss parents: 1365 diff changeset	870 /*
11333 fef09eb74832 patch 8.0.0552: toupper and tolower don't work properly for Turkish Christian Brabandt <cb@256bit.org> parents: 11133 diff changeset	871 * Return TRUE if 'c' is a printable character.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	872 * Assume characters above 0x100 are printable (multi-byte), except for
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	873 * Unicode.
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_isprintc(int c)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	877 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	878 if (enc_utf8 && c >= 0x100)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	879 return utf_printable(c);
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	880 return (c >= 0x100 \|\| (c > 0 && (g_chartab[c] & CT_PRINT_CHAR)));
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	881 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	882
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	883 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	884 * 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	885 * byte of a double-byte character.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	886 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	887 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	888 vim_isprintc_strict(int c)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	889 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	890 if (enc_dbcs != 0 && c < 0x100 && MB_BYTE2LEN(c) > 1)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	891 return FALSE;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	892 if (enc_utf8 && c >= 0x100)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	893 return utf_printable(c);
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	894 return (c >= 0x100 \|\| (c > 0 && (g_chartab[c] & CT_PRINT_CHAR)));
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	895 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	896
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	897 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	898 * like chartabsize(), but also check for line breaks on the screen
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	899 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	900 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	901 lbr_chartabsize(
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	902 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	903 unsigned char *s,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	904 colnr_T col)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	905 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	906 #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	907 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	908 && !curwin->w_p_bri)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	909 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	910 #endif
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	911 if (curwin->w_p_wrap)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	912 return win_nolbr_chartabsize(curwin, s, col, NULL);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	913 RET_WIN_BUF_CHARTABSIZE(curwin, curbuf, s, col)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	914 #ifdef FEAT_LINEBREAK
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	915 }
5995 ef83b423ebf7 updated for version 7.4.338 Bram Moolenaar <bram@vim.org> parents: 5735 diff changeset	916 return win_lbr_chartabsize(curwin, line == NULL ? s : line, s, col, NULL);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	917 #endif
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	918 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	919
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	920 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	921 * Call lbr_chartabsize() and advance the pointer.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	922 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	923 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	924 lbr_chartabsize_adv(
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	925 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	926 char_u **s,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	927 colnr_T col)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	928 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	929 int retval;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	930
5995 ef83b423ebf7 updated for version 7.4.338 Bram Moolenaar <bram@vim.org> parents: 5735 diff changeset	931 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	932 MB_PTR_ADV(*s);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	933 return retval;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	934 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	935
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	936 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	937 * This function is used very often, keep it fast!!!!
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	938 *
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	939 * If "headp" not NULL, set *headp to the size of what we for 'showbreak'
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	940 * 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	941 * value, init to 0 before calling.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	942 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	943 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	944 win_lbr_chartabsize(
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	945 win_T *wp,
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	946 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	947 char_u *s,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	948 colnr_T col,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	949 int *headp UNUSED)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	950 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	951 #ifdef FEAT_LINEBREAK
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	952 int c;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	953 int size;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	954 colnr_T col2;
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	955 colnr_T col_adj = 0; // col + screen size of tab
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	956 colnr_T colmax;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	957 int added;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	958 int mb_added = 0;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	959 int numberextra;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	960 char_u *ps;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	961 int tab_corr = (*s == TAB);
236 4707450c2b33 updated for version 7.0066 vimboss parents: 227 diff changeset	962 int n;
18574 8b0114ffde2b patch 8.1.2281: 'showbreak' cannot be set for one window Bram Moolenaar <Bram@vim.org> parents: 18082 diff changeset	963 char_u *sbr;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	964
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	965 /*
5995 ef83b423ebf7 updated for version 7.4.338 Bram Moolenaar <bram@vim.org> parents: 5735 diff changeset	966 * No 'linebreak', 'showbreak' and 'breakindent': return quickly.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	967 */
18574 8b0114ffde2b patch 8.1.2281: 'showbreak' cannot be set for one window Bram Moolenaar <Bram@vim.org> parents: 18082 diff changeset	968 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	969 #endif
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	970 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	971 if (wp->w_p_wrap)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	972 return win_nolbr_chartabsize(wp, s, col, headp);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	973 RET_WIN_BUF_CHARTABSIZE(wp, wp->w_buffer, s, col)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	974 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	975
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	976 #ifdef FEAT_LINEBREAK
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	977 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	978 * First get normal size, without 'linebreak'
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	979 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	980 size = win_chartabsize(wp, s, col);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	981 c = *s;
6024 b4962cf3a1c0 updated for version 7.4.352 Bram Moolenaar <bram@vim.org> parents: 5995 diff changeset	982 if (tab_corr)
b4962cf3a1c0 updated for version 7.4.352 Bram Moolenaar <bram@vim.org> parents: 5995 diff changeset	983 col_adj = size - 1;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	984
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	985 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	986 * If 'linebreak' set check at a blank before a non-blank if the line
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	987 * needs a break here
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	988 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	989 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	990 && VIM_ISBREAK(c)
11133 d8e830e32be9 patch 8.0.0454: compiler warnings for "always true" comparison Christian Brabandt <cb@256bit.org> parents: 11129 diff changeset	991 && !VIM_ISBREAK((int)s[1])
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	992 && 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	993 && wp->w_width != 0)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	994 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	995 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	996 * Count all characters from first non-blank after a blank up to next
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	997 * non-blank after a blank.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	998 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	999 numberextra = win_col_off(wp);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1000 col2 = col;
12515 972ea22c946f patch 8.0.1136: W_WIDTH() is always the same Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	1001 colmax = (colnr_T)(wp->w_width - numberextra - col_adj);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1002 if (col >= colmax)
236 4707450c2b33 updated for version 7.0066 vimboss parents: 227 diff changeset	1003 {
6024 b4962cf3a1c0 updated for version 7.4.352 Bram Moolenaar <bram@vim.org> parents: 5995 diff changeset	1004 colmax += col_adj;
b4962cf3a1c0 updated for version 7.4.352 Bram Moolenaar <bram@vim.org> parents: 5995 diff changeset	1005 n = colmax + win_col_off2(wp);
236 4707450c2b33 updated for version 7.0066 vimboss parents: 227 diff changeset	1006 if (n > 0)
6024 b4962cf3a1c0 updated for version 7.4.352 Bram Moolenaar <bram@vim.org> parents: 5995 diff changeset	1007 colmax += (((col - colmax) / n) + 1) * n - col_adj;
236 4707450c2b33 updated for version 7.0066 vimboss parents: 227 diff changeset	1008 }
4707450c2b33 updated for version 7.0066 vimboss parents: 227 diff changeset	1009
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1010 for (;;)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1011 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1012 ps = s;
11127 506f5d8b7d8b patch 8.0.0451: some macros are in lower case Christian Brabandt <cb@256bit.org> parents: 11121 diff changeset	1013 MB_PTR_ADV(s);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1014 c = *s;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1015 if (!(c != NUL
11127 506f5d8b7d8b patch 8.0.0451: some macros are in lower case Christian Brabandt <cb@256bit.org> parents: 11121 diff changeset	1016 && (VIM_ISBREAK(c)
506f5d8b7d8b patch 8.0.0451: some macros are in lower case Christian Brabandt <cb@256bit.org> parents: 11121 diff changeset	1017 \|\| (!VIM_ISBREAK(c)
11133 d8e830e32be9 patch 8.0.0454: compiler warnings for "always true" comparison Christian Brabandt <cb@256bit.org> parents: 11129 diff changeset	1018 && (col2 == col \|\| !VIM_ISBREAK((int)*ps))))))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1019 break;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1020
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1021 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	1022 if (col2 >= colmax) // doesn't fit
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1023 {
6024 b4962cf3a1c0 updated for version 7.4.352 Bram Moolenaar <bram@vim.org> parents: 5995 diff changeset	1024 size = colmax - col + col_adj;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1025 break;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1026 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1027 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1028 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1029 else if (has_mbyte && size == 2 && MB_BYTE2LEN(*s) > 1
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1030 && wp->w_p_wrap && in_win_border(wp, col))
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1031 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1032 ++size; // Count the ">" in the last column.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1033 mb_added = 1;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1034 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1035
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1036 /*
5995 ef83b423ebf7 updated for version 7.4.338 Bram Moolenaar <bram@vim.org> parents: 5735 diff changeset	1037 * 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	1038 * string at start of line.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1039 * Set *headp to the size of what we add.
27952 22cdc06b37bf patch 8.2.4501: with 'showbreak' set cursor displayed in wrong position Bram Moolenaar <Bram@vim.org> parents: 27784 diff changeset	1040 * Do not use 'showbreak' at the NUL after the text.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1041 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1042 added = 0;
27952 22cdc06b37bf patch 8.2.4501: with 'showbreak' set cursor displayed in wrong position Bram Moolenaar <Bram@vim.org> parents: 27784 diff changeset	1043 sbr = c == NUL ? empty_option : get_showbreak_value(wp);
18574 8b0114ffde2b patch 8.1.2281: 'showbreak' cannot be set for one window Bram Moolenaar <Bram@vim.org> parents: 18082 diff changeset	1044 if ((*sbr != NUL \|\| wp->w_p_bri) && wp->w_p_wrap && col != 0)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1045 {
6503 134a7d55f9fa updated for version 7.4.579 Bram Moolenaar <bram@vim.org> parents: 6312 diff changeset	1046 colnr_T sbrlen = 0;
134a7d55f9fa updated for version 7.4.579 Bram Moolenaar <bram@vim.org> parents: 6312 diff changeset	1047 int numberwidth = win_col_off(wp);
134a7d55f9fa updated for version 7.4.579 Bram Moolenaar <bram@vim.org> parents: 6312 diff changeset	1048
134a7d55f9fa updated for version 7.4.579 Bram Moolenaar <bram@vim.org> parents: 6312 diff changeset	1049 numberextra = numberwidth;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1050 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	1051 if (col >= (colnr_T)wp->w_width)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1052 {
12515 972ea22c946f patch 8.0.1136: W_WIDTH() is always the same Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	1053 col -= wp->w_width;
972ea22c946f patch 8.0.1136: W_WIDTH() is always the same Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	1054 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	1055 if (col >= numberextra && numberextra > 0)
6312 31c78e590806 updated for version 7.4.489 Bram Moolenaar <bram@vim.org> parents: 6288 diff changeset	1056 col %= numberextra;
18574 8b0114ffde2b patch 8.1.2281: 'showbreak' cannot be set for one window Bram Moolenaar <Bram@vim.org> parents: 18082 diff changeset	1057 if (*sbr != NUL)
6288 fcb898dea2bc updated for version 7.4.478 Bram Moolenaar <bram@vim.org> parents: 6278 diff changeset	1058 {
18574 8b0114ffde2b patch 8.1.2281: 'showbreak' cannot be set for one window Bram Moolenaar <Bram@vim.org> parents: 18082 diff changeset	1059 sbrlen = (colnr_T)MB_CHARLEN(sbr);
6288 fcb898dea2bc updated for version 7.4.478 Bram Moolenaar <bram@vim.org> parents: 6278 diff changeset	1060 if (col >= sbrlen)
fcb898dea2bc updated for version 7.4.478 Bram Moolenaar <bram@vim.org> parents: 6278 diff changeset	1061 col -= sbrlen;
fcb898dea2bc updated for version 7.4.478 Bram Moolenaar <bram@vim.org> parents: 6278 diff changeset	1062 }
6503 134a7d55f9fa updated for version 7.4.579 Bram Moolenaar <bram@vim.org> parents: 6312 diff changeset	1063 if (col >= numberextra && numberextra > 0)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1064 col = col % numberextra;
6503 134a7d55f9fa updated for version 7.4.579 Bram Moolenaar <bram@vim.org> parents: 6312 diff changeset	1065 else if (col > 0 && numberextra > 0)
134a7d55f9fa updated for version 7.4.579 Bram Moolenaar <bram@vim.org> parents: 6312 diff changeset	1066 col += numberwidth - win_col_off2(wp);
134a7d55f9fa updated for version 7.4.579 Bram Moolenaar <bram@vim.org> parents: 6312 diff changeset	1067
134a7d55f9fa updated for version 7.4.579 Bram Moolenaar <bram@vim.org> parents: 6312 diff changeset	1068 numberwidth -= win_col_off2(wp);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1069 }
12515 972ea22c946f patch 8.0.1136: W_WIDTH() is always the same Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	1070 if (col == 0 \|\| col + size + sbrlen > (colnr_T)wp->w_width)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1071 {
5995 ef83b423ebf7 updated for version 7.4.338 Bram Moolenaar <bram@vim.org> parents: 5735 diff changeset	1072 added = 0;
18574 8b0114ffde2b patch 8.1.2281: 'showbreak' cannot be set for one window Bram Moolenaar <Bram@vim.org> parents: 18082 diff changeset	1073 if (*sbr != NUL)
6503 134a7d55f9fa updated for version 7.4.579 Bram Moolenaar <bram@vim.org> parents: 6312 diff changeset	1074 {
12515 972ea22c946f patch 8.0.1136: W_WIDTH() is always the same Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	1075 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	1076 {
16819 91619e48e1a7 patch 8.1.1411: Coverity warns for divide by zero Bram Moolenaar <Bram@vim.org> parents: 16764 diff changeset	1077 // 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	1078 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	1079 int prev_width = col
78faa25f9698 patch 8.1.1032: warnings from clang static analyzer Bram Moolenaar <Bram@vim.org> parents: 15850 diff changeset	1080 ? ((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	1081
91619e48e1a7 patch 8.1.1411: Coverity warns for divide by zero Bram Moolenaar <Bram@vim.org> parents: 16764 diff changeset	1082 if (width <= 0)
91619e48e1a7 patch 8.1.1411: Coverity warns for divide by zero Bram Moolenaar <Bram@vim.org> parents: 16764 diff changeset	1083 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	1084 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	1085 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	1086 // 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	1087 added += vim_strsize(sbr);
6503 134a7d55f9fa updated for version 7.4.579 Bram Moolenaar <bram@vim.org> parents: 6312 diff changeset	1088 }
134a7d55f9fa updated for version 7.4.579 Bram Moolenaar <bram@vim.org> parents: 6312 diff changeset	1089 else
18574 8b0114ffde2b patch 8.1.2281: 'showbreak' cannot be set for one window Bram Moolenaar <Bram@vim.org> parents: 18082 diff changeset	1090 added += vim_strsize(sbr);
6503 134a7d55f9fa updated for version 7.4.579 Bram Moolenaar <bram@vim.org> parents: 6312 diff changeset	1091 }
5995 ef83b423ebf7 updated for version 7.4.338 Bram Moolenaar <bram@vim.org> parents: 5735 diff changeset	1092 if (wp->w_p_bri)
ef83b423ebf7 updated for version 7.4.338 Bram Moolenaar <bram@vim.org> parents: 5735 diff changeset	1093 added += get_breakindent_win(wp, line);
ef83b423ebf7 updated for version 7.4.338 Bram Moolenaar <bram@vim.org> parents: 5735 diff changeset	1094
6160 735bd597a8ff updated for version 7.4.416 Bram Moolenaar <bram@vim.org> parents: 6068 diff changeset	1095 size += added;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1096 if (col != 0)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1097 added = 0;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1098 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1099 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1100 if (headp != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1101 *headp = added + mb_added;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1102 return size;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1103 #endif
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1104 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1105
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1106 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1107 * Like win_lbr_chartabsize(), except that we know 'linebreak' is off and
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1108 * '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	1109 * doesn't fit at the end of the screen line.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1110 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1111 static int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1112 win_nolbr_chartabsize(
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1113 win_T *wp,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1114 char_u *s,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1115 colnr_T col,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1116 int *headp)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1117 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1118 int n;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1119
23952 44be09b25619 patch 8.2.2518: 'listchars' should be window-local Bram Moolenaar <Bram@vim.org> parents: 23533 diff changeset	1120 if (*s == TAB && (!wp->w_p_list \|\| wp->w_lcs_chars.tab1))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1121 {
14175 2ad722003b36 patch 8.1.0105: all tab stops are the same Christian Brabandt <cb@256bit.org> parents: 14061 diff changeset	1122 # ifdef FEAT_VARTABS
2ad722003b36 patch 8.1.0105: all tab stops are the same Christian Brabandt <cb@256bit.org> parents: 14061 diff changeset	1123 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	1124 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	1125 # else
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1126 n = wp->w_buffer->b_p_ts;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1127 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	1128 # endif
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1129 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1130 n = ptr2cells(s);
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1131 // 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	1132 // window, displayed with a ">".
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1133 if (n == 2 && MB_BYTE2LEN(*s) > 1 && in_win_border(wp, col))
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1134 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1135 if (headp != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1136 *headp = 1;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1137 return 3;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1138 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1139 return n;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1140 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1141
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1142 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1143 * Return TRUE if virtual column "vcol" is in the rightmost column of window
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1144 * "wp".
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1145 */
17789 0f7ae8010787 patch 8.1.1891: functions used in one file are global Bram Moolenaar <Bram@vim.org> parents: 16819 diff changeset	1146 static int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1147 in_win_border(win_T *wp, colnr_T vcol)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1148 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1149 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	1150 int width2; // width of further lines
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1151
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1152 if (wp->w_width == 0) // there is no border
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1153 return FALSE;
12515 972ea22c946f patch 8.0.1136: W_WIDTH() is always the same Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	1154 width1 = wp->w_width - win_col_off(wp);
1869 720a59d79bcd updated for version 7.2-168 vimboss parents: 1687 diff changeset	1155 if ((int)vcol < width1 - 1)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1156 return FALSE;
1869 720a59d79bcd updated for version 7.2-168 vimboss parents: 1687 diff changeset	1157 if ((int)vcol == width1 - 1)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1158 return TRUE;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1159 width2 = width1 + win_col_off2(wp);
1970 7bcd81b96e2a updated for version 7.2-267 vimboss parents: 1955 diff changeset	1160 if (width2 <= 0)
7bcd81b96e2a updated for version 7.2-267 vimboss parents: 1955 diff changeset	1161 return FALSE;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1162 return ((vcol - width1) % width2 == width2 - 1);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1163 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1164
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1165 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1166 * Get virtual column number of pos.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1167 * start: on the first position of this character (TAB, ctrl)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1168 * cursor: where the cursor is on this character (first char, except for TAB)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1169 * end: on the last position of this character (TAB, ctrl)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1170 *
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1171 * This is used very often, keep it fast!
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1172 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1173 void
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1174 getvcol(
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1175 win_T *wp,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1176 pos_T *pos,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1177 colnr_T *start,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1178 colnr_T *cursor,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1179 colnr_T *end)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1180 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1181 colnr_T vcol;
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1182 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	1183 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	1184 char_u *line; // start of the line
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1185 int incr;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1186 int head;
14175 2ad722003b36 patch 8.1.0105: all tab stops are the same Christian Brabandt <cb@256bit.org> parents: 14061 diff changeset	1187 #ifdef FEAT_VARTABS
2ad722003b36 patch 8.1.0105: all tab stops are the same Christian Brabandt <cb@256bit.org> parents: 14061 diff changeset	1188 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	1189 #endif
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1190 int ts = wp->w_buffer->b_p_ts;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1191 int c;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1192
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1193 vcol = 0;
5995 ef83b423ebf7 updated for version 7.4.338 Bram Moolenaar <bram@vim.org> parents: 5735 diff changeset	1194 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	1195 if (pos->col == MAXCOL)
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1196 posptr = NULL; // continue until the NUL
2108 3cdf2a653e00 updated for version 7.2.391 Bram Moolenaar <bram@zimbu.org> parents: 1979 diff changeset	1197 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	1198 {
26843 1e3c49c09260 patch 8.2.3950: going beyond the end of the line with /%V Bram Moolenaar <Bram@vim.org> parents: 26572 diff changeset	1199 colnr_T i;
1e3c49c09260 patch 8.2.3950: going beyond the end of the line with /%V Bram Moolenaar <Bram@vim.org> parents: 26572 diff changeset	1200
1e3c49c09260 patch 8.2.3950: going beyond the end of the line with /%V Bram Moolenaar <Bram@vim.org> parents: 26572 diff changeset	1201 // In a few cases the position can be beyond the end of the line.
1e3c49c09260 patch 8.2.3950: going beyond the end of the line with /%V Bram Moolenaar <Bram@vim.org> parents: 26572 diff changeset	1202 for (i = 0; i < pos->col; ++i)
1e3c49c09260 patch 8.2.3950: going beyond the end of the line with /%V Bram Moolenaar <Bram@vim.org> parents: 26572 diff changeset	1203 if (ptr[i] == NUL)
1e3c49c09260 patch 8.2.3950: going beyond the end of the line with /%V Bram Moolenaar <Bram@vim.org> parents: 26572 diff changeset	1204 {
1e3c49c09260 patch 8.2.3950: going beyond the end of the line with /%V Bram Moolenaar <Bram@vim.org> parents: 26572 diff changeset	1205 pos->col = i;
1e3c49c09260 patch 8.2.3950: going beyond the end of the line with /%V Bram Moolenaar <Bram@vim.org> parents: 26572 diff changeset	1206 break;
1e3c49c09260 patch 8.2.3950: going beyond the end of the line with /%V Bram Moolenaar <Bram@vim.org> parents: 26572 diff changeset	1207 }
2108 3cdf2a653e00 updated for version 7.2.391 Bram Moolenaar <bram@zimbu.org> parents: 1979 diff changeset	1208 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	1209 if (has_mbyte)
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1210 // 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	1211 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	1212 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1213
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1214 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1215 * 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	1216 * 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	1217 * use a simple loop.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1218 * Also use this when 'list' is set but tabs take their normal size.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1219 */
23952 44be09b25619 patch 8.2.2518: 'listchars' should be window-local Bram Moolenaar <Bram@vim.org> parents: 23533 diff changeset	1220 if ((!wp->w_p_list \|\| wp->w_lcs_chars.tab1 != NUL)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1221 #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	1222 && !wp->w_p_lbr && *get_showbreak_value(wp) == NUL && !wp->w_p_bri
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1223 #endif
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1224 )
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1225 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1226 for (;;)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1227 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1228 head = 0;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1229 c = *ptr;
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1230 // make sure we don't go past the end of the line
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1231 if (c == NUL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1232 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1233 incr = 1; // NUL at end of line only takes one column
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1234 break;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1235 }
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1236 // A tab gets expanded, depending on the current column
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1237 if (c == TAB)
14175 2ad722003b36 patch 8.1.0105: all tab stops are the same Christian Brabandt <cb@256bit.org> parents: 14061 diff changeset	1238 #ifdef FEAT_VARTABS
2ad722003b36 patch 8.1.0105: all tab stops are the same Christian Brabandt <cb@256bit.org> parents: 14061 diff changeset	1239 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	1240 #else
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1241 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	1242 #endif
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1243 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1244 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1245 if (has_mbyte)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1246 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1247 // 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	1248 // further bytes to find the cell width.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1249 if (enc_utf8 && c >= 0x80)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1250 incr = utf_ptr2cells(ptr);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1251 else
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	1252 incr = g_chartab[c] & CT_CELL_MASK;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1253
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1254 // 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	1255 // 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	1256 // cells wide.
1546 75f5889a5d8e updated for version 7.1-260 vimboss parents: 1369 diff changeset	1257 if (incr == 2 && wp->w_p_wrap && MB_BYTE2LEN(*ptr) > 1
75f5889a5d8e updated for version 7.1-260 vimboss parents: 1369 diff changeset	1258 && in_win_border(wp, vcol))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1259 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1260 ++incr;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1261 head = 1;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1262 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1263 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1264 else
7697 f04e2b6feea2 commit https://github.com/vim/vim/commit/88e8f9f14434a7cd538d0c159dc432bea869a5bd Christian Brabandt <cb@256bit.org> parents: 7447 diff changeset	1265 incr = g_chartab[c] & CT_CELL_MASK;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1266 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1267
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1268 if (posptr != NULL && ptr >= posptr) // character at pos->col
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1269 break;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1270
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1271 vcol += incr;
11127 506f5d8b7d8b patch 8.0.0451: some macros are in lower case Christian Brabandt <cb@256bit.org> parents: 11121 diff changeset	1272 MB_PTR_ADV(ptr);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1273 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1274 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1275 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1276 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1277 for (;;)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1278 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1279 // A tab gets expanded, depending on the current column
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1280 head = 0;
5995 ef83b423ebf7 updated for version 7.4.338 Bram Moolenaar <bram@vim.org> parents: 5735 diff changeset	1281 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	1282 // make sure we don't go past the end of the line
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1283 if (*ptr == NUL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1284 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1285 incr = 1; // NUL at end of line only takes one column
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1286 break;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1287 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1288
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1289 if (posptr != NULL && ptr >= posptr) // character at pos->col
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1290 break;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1291
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1292 vcol += incr;
11127 506f5d8b7d8b patch 8.0.0451: some macros are in lower case Christian Brabandt <cb@256bit.org> parents: 11121 diff changeset	1293 MB_PTR_ADV(ptr);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1294 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1295 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1296 if (start != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1297 *start = vcol + head;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1298 if (end != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1299 *end = vcol + incr - 1;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1300 if (cursor != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1301 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1302 if (*ptr == TAB
28773 d770568e6c98 patch 8.2.4911: the mode #defines are not clearly named Bram Moolenaar <Bram@vim.org> parents: 28013 diff changeset	1303 && (State & MODE_NORMAL)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1304 && !wp->w_p_list
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1305 && !virtual_active()
11121 778c10516955 patch 8.0.0448: some macros are in lower case Christian Brabandt <cb@256bit.org> parents: 10835 diff changeset	1306 && !(VIsual_active
778c10516955 patch 8.0.0448: some macros are in lower case Christian Brabandt <cb@256bit.org> parents: 10835 diff changeset	1307 && (p_sel == 'e' \|\| LTOREQ_POS(pos, VIsual)))
7 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 *cursor = vcol + incr - 1; // cursor at end
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1310 else
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1311 *cursor = vcol + head; // cursor at start
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1312 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1313 }
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 * Get virtual cursor column in the current window, pretending 'list' is off.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1317 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1318 colnr_T
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1319 getvcol_nolist(pos_T *posp)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1320 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1321 int list_save = curwin->w_p_list;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1322 colnr_T vcol;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1323
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1324 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	1325 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	1326 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	1327 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	1328 getvcol(curwin, posp, NULL, &vcol, NULL);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1329 curwin->w_p_list = list_save;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1330 return vcol;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1331 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1332
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1333 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1334 * Get virtual column in virtual mode.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1335 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1336 void
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1337 getvvcol(
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1338 win_T *wp,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1339 pos_T *pos,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1340 colnr_T *start,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1341 colnr_T *cursor,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1342 colnr_T *end)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1343 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1344 colnr_T col;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1345 colnr_T coladd;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1346 colnr_T endadd;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1347 char_u *ptr;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1348
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1349 if (virtual_active())
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1350 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1351 // For virtual mode, only want one value
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1352 getvcol(wp, pos, &col, NULL, NULL);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1353
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1354 coladd = pos->coladd;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1355 endadd = 0;
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1356 // Cannot put the cursor on part of a wide character.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1357 ptr = ml_get_buf(wp->w_buffer, pos->lnum, FALSE);
1869 720a59d79bcd updated for version 7.2-168 vimboss parents: 1687 diff changeset	1358 if (pos->col < (colnr_T)STRLEN(ptr))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1359 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1360 int c = (*mb_ptr2char)(ptr + pos->col);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1361
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1362 if (c != TAB && vim_isprintc(c))
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1363 {
1869 720a59d79bcd updated for version 7.2-168 vimboss parents: 1687 diff changeset	1364 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	1365 if (coladd > endadd) // past end of line
557 862863033fdd updated for version 7.0158 vimboss parents: 497 diff changeset	1366 endadd = 0;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1367 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1368 coladd = 0;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1369 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1370 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1371 col += coladd;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1372 if (start != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1373 *start = col;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1374 if (cursor != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1375 *cursor = col;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1376 if (end != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1377 *end = col + endadd;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1378 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1379 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1380 getvcol(wp, pos, start, cursor, end);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1381 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1382
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1383 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1384 * Get the leftmost and rightmost virtual column of pos1 and pos2.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1385 * Used for Visual block mode.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1386 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1387 void
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1388 getvcols(
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1389 win_T *wp,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1390 pos_T *pos1,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1391 pos_T *pos2,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1392 colnr_T *left,
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1393 colnr_T *right)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1394 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1395 colnr_T from1, from2, to1, to2;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1396
11121 778c10516955 patch 8.0.0448: some macros are in lower case Christian Brabandt <cb@256bit.org> parents: 10835 diff changeset	1397 if (LT_POSP(pos1, pos2))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1398 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1399 getvvcol(wp, pos1, &from1, NULL, &to1);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1400 getvvcol(wp, pos2, &from2, NULL, &to2);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1401 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1402 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1403 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1404 getvvcol(wp, pos2, &from1, NULL, &to1);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1405 getvvcol(wp, pos1, &from2, NULL, &to2);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1406 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1407 if (from2 < from1)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1408 *left = from2;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1409 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1410 *left = from1;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1411 if (to2 > to1)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1412 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1413 if (*p_sel == 'e' && from2 - 1 >= to1)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1414 *right = from2 - 1;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1415 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1416 *right = to2;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1417 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1418 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1419 *right = to1;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1420 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1421
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1422 /*
26572 9f7568104726 patch 8.2.3815: Vim9: cannot have a multi-line dict inside a block Bram Moolenaar <Bram@vim.org> parents: 26327 diff changeset	1423 * Skip over ' ' and '\t'.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1424 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1425 char_u *
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1426 skipwhite(char_u *q)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1427 {
1687 b2e037ed7e33 updated for version 7.2b-020 vimboss parents: 1654 diff changeset	1428 char_u *p = q;
b2e037ed7e33 updated for version 7.2b-020 vimboss parents: 1654 diff changeset	1429
26572 9f7568104726 patch 8.2.3815: Vim9: cannot have a multi-line dict inside a block Bram Moolenaar <Bram@vim.org> parents: 26327 diff changeset	1430 while (VIM_ISWHITE(*p))
9f7568104726 patch 8.2.3815: Vim9: cannot have a multi-line dict inside a block Bram Moolenaar <Bram@vim.org> parents: 26327 diff changeset	1431 ++p;
9f7568104726 patch 8.2.3815: Vim9: cannot have a multi-line dict inside a block Bram Moolenaar <Bram@vim.org> parents: 26327 diff changeset	1432 return p;
9f7568104726 patch 8.2.3815: Vim9: cannot have a multi-line dict inside a block Bram Moolenaar <Bram@vim.org> parents: 26327 diff changeset	1433 }
9f7568104726 patch 8.2.3815: Vim9: cannot have a multi-line dict inside a block Bram Moolenaar <Bram@vim.org> parents: 26327 diff changeset	1434
27018 268f6a3511df patch 8.2.4038: various code not used when features are disabled Bram Moolenaar <Bram@vim.org> parents: 26843 diff changeset	1435 #if defined(FEAT_EVAL) \|\| defined(PROTO)
26572 9f7568104726 patch 8.2.3815: Vim9: cannot have a multi-line dict inside a block Bram Moolenaar <Bram@vim.org> parents: 26327 diff changeset	1436 /*
9f7568104726 patch 8.2.3815: Vim9: cannot have a multi-line dict inside a block Bram Moolenaar <Bram@vim.org> parents: 26327 diff changeset	1437 * skip over ' ', '\t' and '\n'.
9f7568104726 patch 8.2.3815: Vim9: cannot have a multi-line dict inside a block Bram Moolenaar <Bram@vim.org> parents: 26327 diff changeset	1438 */
9f7568104726 patch 8.2.3815: Vim9: cannot have a multi-line dict inside a block Bram Moolenaar <Bram@vim.org> parents: 26327 diff changeset	1439 char_u *
9f7568104726 patch 8.2.3815: Vim9: cannot have a multi-line dict inside a block Bram Moolenaar <Bram@vim.org> parents: 26327 diff changeset	1440 skipwhite_and_nl(char_u *q)
9f7568104726 patch 8.2.3815: Vim9: cannot have a multi-line dict inside a block Bram Moolenaar <Bram@vim.org> parents: 26327 diff changeset	1441 {
9f7568104726 patch 8.2.3815: Vim9: cannot have a multi-line dict inside a block Bram Moolenaar <Bram@vim.org> parents: 26327 diff changeset	1442 char_u *p = q;
9f7568104726 patch 8.2.3815: Vim9: cannot have a multi-line dict inside a block Bram Moolenaar <Bram@vim.org> parents: 26327 diff changeset	1443
9f7568104726 patch 8.2.3815: Vim9: cannot have a multi-line dict inside a block Bram Moolenaar <Bram@vim.org> parents: 26327 diff changeset	1444 while (VIM_ISWHITE(p) \|\| p == NL)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1445 ++p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1446 return p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1447 }
27018 268f6a3511df patch 8.2.4038: various code not used when features are disabled Bram Moolenaar <Bram@vim.org> parents: 26843 diff changeset	1448 #endif
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1449
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1450 /*
12323 4dba3e4f3b01 patch 8.0.1041: bogus characters when indenting during visual-block append Christian Brabandt <cb@256bit.org> parents: 11337 diff changeset	1451 * 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	1452 * 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	1453 */
4dba3e4f3b01 patch 8.0.1041: bogus characters when indenting during visual-block append Christian Brabandt <cb@256bit.org> parents: 11337 diff changeset	1454 int
4dba3e4f3b01 patch 8.0.1041: bogus characters when indenting during visual-block append Christian Brabandt <cb@256bit.org> parents: 11337 diff changeset	1455 getwhitecols_curline()
4dba3e4f3b01 patch 8.0.1041: bogus characters when indenting during visual-block append Christian Brabandt <cb@256bit.org> parents: 11337 diff changeset	1456 {
4dba3e4f3b01 patch 8.0.1041: bogus characters when indenting during visual-block append Christian Brabandt <cb@256bit.org> parents: 11337 diff changeset	1457 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	1458 }
4dba3e4f3b01 patch 8.0.1041: bogus characters when indenting during visual-block append Christian Brabandt <cb@256bit.org> parents: 11337 diff changeset	1459
4dba3e4f3b01 patch 8.0.1041: bogus characters when indenting during visual-block append Christian Brabandt <cb@256bit.org> parents: 11337 diff changeset	1460 int
4dba3e4f3b01 patch 8.0.1041: bogus characters when indenting during visual-block append Christian Brabandt <cb@256bit.org> parents: 11337 diff changeset	1461 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	1462 {
4dba3e4f3b01 patch 8.0.1041: bogus characters when indenting during visual-block append Christian Brabandt <cb@256bit.org> parents: 11337 diff changeset	1463 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	1464 }
4dba3e4f3b01 patch 8.0.1041: bogus characters when indenting during visual-block append Christian Brabandt <cb@256bit.org> parents: 11337 diff changeset	1465
4dba3e4f3b01 patch 8.0.1041: bogus characters when indenting during visual-block append Christian Brabandt <cb@256bit.org> parents: 11337 diff changeset	1466 /*
293 f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1467 * skip over digits
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1468 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1469 char_u *
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1470 skipdigits(char_u *q)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1471 {
1687 b2e037ed7e33 updated for version 7.2b-020 vimboss parents: 1654 diff changeset	1472 char_u *p = q;
b2e037ed7e33 updated for version 7.2b-020 vimboss parents: 1654 diff changeset	1473
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1474 while (VIM_ISDIGIT(*p)) // skip to next non-digit
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1475 ++p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1476 return p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1477 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1478
741 ac1f1e69c50d updated for version 7.0222 vimboss parents: 557 diff changeset	1479 #if defined(FEAT_SYN_HL) \|\| defined(FEAT_SPELL) \|\| defined(PROTO)
301 006e9c8a6a8a updated for version 7.0079 vimboss parents: 293 diff changeset	1480 /*
7447 ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1481 * skip over binary digits
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1482 */
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1483 char_u *
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1484 skipbin(char_u *q)
7447 ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1485 {
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1486 char_u *p = q;
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1487
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1488 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	1489 ++p;
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1490 return p;
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1491 }
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1492
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1493 /*
301 006e9c8a6a8a updated for version 7.0079 vimboss parents: 293 diff changeset	1494 * skip over digits and hex characters
006e9c8a6a8a updated for version 7.0079 vimboss parents: 293 diff changeset	1495 */
006e9c8a6a8a updated for version 7.0079 vimboss parents: 293 diff changeset	1496 char_u *
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1497 skiphex(char_u *q)
301 006e9c8a6a8a updated for version 7.0079 vimboss parents: 293 diff changeset	1498 {
1687 b2e037ed7e33 updated for version 7.2b-020 vimboss parents: 1654 diff changeset	1499 char_u *p = q;
b2e037ed7e33 updated for version 7.2b-020 vimboss parents: 1654 diff changeset	1500
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1501 while (vim_isxdigit(*p)) // skip to next non-digit
301 006e9c8a6a8a updated for version 7.0079 vimboss parents: 293 diff changeset	1502 ++p;
006e9c8a6a8a updated for version 7.0079 vimboss parents: 293 diff changeset	1503 return p;
006e9c8a6a8a updated for version 7.0079 vimboss parents: 293 diff changeset	1504 }
006e9c8a6a8a updated for version 7.0079 vimboss parents: 293 diff changeset	1505 #endif
006e9c8a6a8a updated for version 7.0079 vimboss parents: 293 diff changeset	1506
293 f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1507 /*
7447 ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1508 * 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	1509 */
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1510 char_u *
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1511 skiptobin(char_u *q)
7447 ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1512 {
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1513 char_u *p = q;
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1514
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1515 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	1516 ++p;
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1517 return p;
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
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1520 /*
293 f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1521 * skip to digit (or NUL after the string)
f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1522 */
f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1523 char_u *
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1524 skiptodigit(char_u *q)
293 f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1525 {
1687 b2e037ed7e33 updated for version 7.2b-020 vimboss parents: 1654 diff changeset	1526 char_u *p = q;
b2e037ed7e33 updated for version 7.2b-020 vimboss parents: 1654 diff changeset	1527
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1528 while (p != NUL && !VIM_ISDIGIT(p)) // skip to next digit
293 f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1529 ++p;
f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1530 return p;
f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1531 }
f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1532
f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1533 /*
f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1534 * skip to hex character (or NUL after the string)
f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1535 */
f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 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 skiptohex(char_u *q)
293 f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1538 {
1687 b2e037ed7e33 updated for version 7.2b-020 vimboss parents: 1654 diff changeset	1539 char_u *p = q;
b2e037ed7e33 updated for version 7.2b-020 vimboss parents: 1654 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_isxdigit(p)) // skip to next digit
293 f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1542 ++p;
f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1543 return p;
f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1544 }
f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1545
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1546 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1547 * Variant of isdigit() that can handle characters > 0x100.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1548 * We don't use isdigit() here, because on some systems it also considers
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1549 * superscript 1 to be a digit.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1550 * Use the VIM_ISDIGIT() macro for simple arguments.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1551 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1552 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1553 vim_isdigit(int c)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1554 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1555 return (c >= '0' && c <= '9');
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1556 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1557
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1558 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1559 * Variant of isxdigit() that can handle characters > 0x100.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1560 * We don't use isxdigit() here, because on some systems it also considers
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1561 * superscript 1 to be a digit.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1562 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1563 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1564 vim_isxdigit(int c)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1565 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1566 return (c >= '0' && c <= '9')
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1567 \|\| (c >= 'a' && c <= 'f')
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1568 \|\| (c >= 'A' && c <= 'F');
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1569 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1570
7447 ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1571 /*
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1572 * 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	1573 * characters > 0x100.
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1574 */
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1575 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1576 vim_isbdigit(int c)
7447 ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1577 {
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1578 return (c == '0' \|\| c == '1');
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1579 }
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1580
23533 ee43d943c3bb patch 8.2.2309: 0o777 not recognized as octal Bram Moolenaar <Bram@vim.org> parents: 20782 diff changeset	1581 static int
ee43d943c3bb patch 8.2.2309: 0o777 not recognized as octal Bram Moolenaar <Bram@vim.org> parents: 20782 diff changeset	1582 vim_isodigit(int c)
ee43d943c3bb patch 8.2.2309: 0o777 not recognized as octal Bram Moolenaar <Bram@vim.org> parents: 20782 diff changeset	1583 {
ee43d943c3bb patch 8.2.2309: 0o777 not recognized as octal Bram Moolenaar <Bram@vim.org> parents: 20782 diff changeset	1584 return (c >= '0' && c <= '7');
ee43d943c3bb patch 8.2.2309: 0o777 not recognized as octal Bram Moolenaar <Bram@vim.org> parents: 20782 diff changeset	1585 }
ee43d943c3bb patch 8.2.2309: 0o777 not recognized as octal Bram Moolenaar <Bram@vim.org> parents: 20782 diff changeset	1586
492 81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1587 /*
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1588 * Vim's own character class functions. These exist because many library
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1589 * islower()/toupper() etc. do not work properly: they crash when used with
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1590 * invalid values or can't handle latin1 when the locale is C.
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1591 * Speed is most important here.
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1592 */
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1593 #define LATIN1LOWER 'l'
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1594 #define LATIN1UPPER 'U'
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1595
497 73f10d8124f4 updated for version 7.0136 vimboss parents: 492 diff changeset	1596 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	1597 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	1598 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	1599
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1600 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1601 vim_islower(int c)
492 81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1602 {
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1603 if (c <= '@')
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1604 return FALSE;
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1605 if (c >= 0x80)
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1606 {
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1607 if (enc_utf8)
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1608 return utf_islower(c);
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1609 if (c >= 0x100)
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1610 {
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1611 #ifdef HAVE_ISWLOWER
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1612 if (has_mbyte)
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1613 return iswlower(c);
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1614 #endif
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1615 // islower() can't handle these chars and may crash
492 81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1616 return FALSE;
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1617 }
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1618 if (enc_latin1like)
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1619 return (latin1flags[c] & LATIN1LOWER) == LATIN1LOWER;
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1620 }
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1621 return islower(c);
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1622 }
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1623
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1624 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1625 vim_isupper(int c)
492 81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1626 {
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1627 if (c <= '@')
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1628 return FALSE;
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1629 if (c >= 0x80)
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1630 {
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1631 if (enc_utf8)
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1632 return utf_isupper(c);
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1633 if (c >= 0x100)
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1634 {
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1635 #ifdef HAVE_ISWUPPER
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1636 if (has_mbyte)
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1637 return iswupper(c);
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1638 #endif
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1639 // islower() can't handle these chars and may crash
492 81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1640 return FALSE;
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1641 }
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1642 if (enc_latin1like)
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1643 return (latin1flags[c] & LATIN1UPPER) == LATIN1UPPER;
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1644 }
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1645 return isupper(c);
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1646 }
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1647
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1648 int
27784 bfce04a99561 patch 8.2.4418: crash when using special multi-byte character Bram Moolenaar <Bram@vim.org> parents: 27752 diff changeset	1649 vim_isalpha(int c)
bfce04a99561 patch 8.2.4418: crash when using special multi-byte character Bram Moolenaar <Bram@vim.org> parents: 27752 diff changeset	1650 {
bfce04a99561 patch 8.2.4418: crash when using special multi-byte character Bram Moolenaar <Bram@vim.org> parents: 27752 diff changeset	1651 return vim_islower(c) \|\| vim_isupper(c);
bfce04a99561 patch 8.2.4418: crash when using special multi-byte character Bram Moolenaar <Bram@vim.org> parents: 27752 diff changeset	1652 }
bfce04a99561 patch 8.2.4418: crash when using special multi-byte character Bram Moolenaar <Bram@vim.org> parents: 27752 diff changeset	1653
bfce04a99561 patch 8.2.4418: crash when using special multi-byte character Bram Moolenaar <Bram@vim.org> parents: 27752 diff changeset	1654 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1655 vim_toupper(int c)
492 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 (c <= '@')
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1658 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	1659 if (c >= 0x80 \|\| !(cmp_flags & CMP_KEEPASCII))
492 81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1660 {
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1661 if (enc_utf8)
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1662 return utf_toupper(c);
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1663 if (c >= 0x100)
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1664 {
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1665 #ifdef HAVE_TOWUPPER
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1666 if (has_mbyte)
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1667 return towupper(c);
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1668 #endif
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1669 // toupper() can't handle these chars and may crash
492 81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1670 return c;
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1671 }
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1672 if (enc_latin1like)
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1673 return latin1upper[c];
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1674 }
11337 f0fbebf19b80 patch 8.0.0554: toupper and tolower don't work properly for Turkish Christian Brabandt <cb@256bit.org> parents: 11333 diff changeset	1675 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	1676 return TOUPPER_ASC(c);
492 81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1677 return TOUPPER_LOC(c);
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1678 }
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1679
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1680 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1681 vim_tolower(int c)
492 81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1682 {
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1683 if (c <= '@')
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1684 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	1685 if (c >= 0x80 \|\| !(cmp_flags & CMP_KEEPASCII))
492 81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1686 {
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1687 if (enc_utf8)
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1688 return utf_tolower(c);
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1689 if (c >= 0x100)
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1690 {
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1691 #ifdef HAVE_TOWLOWER
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1692 if (has_mbyte)
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1693 return towlower(c);
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1694 #endif
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1695 // tolower() can't handle these chars and may crash
492 81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1696 return c;
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1697 }
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1698 if (enc_latin1like)
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1699 return latin1lower[c];
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1700 }
11337 f0fbebf19b80 patch 8.0.0554: toupper and tolower don't work properly for Turkish Christian Brabandt <cb@256bit.org> parents: 11333 diff changeset	1701 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	1702 return TOLOWER_ASC(c);
492 81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1703 return TOLOWER_LOC(c);
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1704 }
81c06952fb1d updated for version 7.0135 vimboss parents: 474 diff changeset	1705
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1706 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1707 * skiptowhite: skip over text until ' ' or '\t' or NUL.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1708 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1709 char_u *
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1710 skiptowhite(char_u *p)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1711 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1712 while (p != ' ' && p != '\t' && *p != NUL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1713 ++p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1714 return p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1715 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1716
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1717 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1718 * skiptowhite_esc: Like skiptowhite(), but also skip escaped chars
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1719 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1720 char_u *
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1721 skiptowhite_esc(char_u *p)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1722 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1723 while (p != ' ' && p != '\t' && *p != NUL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1724 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1725 if ((p == '\\' \|\| p == Ctrl_V) && *(p + 1) != NUL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1726 ++p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1727 ++p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1728 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1729 return p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1730 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1731
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1732 /*
26327 227543e4181f patch 8.2.3694: cannot use quotes in the count of an Ex command Bram Moolenaar <Bram@vim.org> parents: 25978 diff changeset	1733 * Get a number from a string and skip over it.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1734 * Note: the argument is a pointer to a char_u pointer!
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1735 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1736 long
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1737 getdigits(char_u **pp)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1738 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1739 char_u *p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1740 long retval;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1741
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1742 p = *pp;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1743 retval = atol((char *)p);
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1744 if (*p == '-') // skip negative sign
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1745 ++p;
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1746 p = skipdigits(p); // skip to next non-digit
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1747 *pp = p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1748 return retval;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1749 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1750
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1751 /*
26327 227543e4181f patch 8.2.3694: cannot use quotes in the count of an Ex command Bram Moolenaar <Bram@vim.org> parents: 25978 diff changeset	1752 * Like getdigits() but allow for embedded single quotes.
227543e4181f patch 8.2.3694: cannot use quotes in the count of an Ex command Bram Moolenaar <Bram@vim.org> parents: 25978 diff changeset	1753 */
227543e4181f patch 8.2.3694: cannot use quotes in the count of an Ex command Bram Moolenaar <Bram@vim.org> parents: 25978 diff changeset	1754 long
227543e4181f patch 8.2.3694: cannot use quotes in the count of an Ex command Bram Moolenaar <Bram@vim.org> parents: 25978 diff changeset	1755 getdigits_quoted(char_u **pp)
227543e4181f patch 8.2.3694: cannot use quotes in the count of an Ex command Bram Moolenaar <Bram@vim.org> parents: 25978 diff changeset	1756 {
227543e4181f patch 8.2.3694: cannot use quotes in the count of an Ex command Bram Moolenaar <Bram@vim.org> parents: 25978 diff changeset	1757 char_u p = pp;
227543e4181f patch 8.2.3694: cannot use quotes in the count of an Ex command Bram Moolenaar <Bram@vim.org> parents: 25978 diff changeset	1758 long retval = 0;
227543e4181f patch 8.2.3694: cannot use quotes in the count of an Ex command Bram Moolenaar <Bram@vim.org> parents: 25978 diff changeset	1759
227543e4181f patch 8.2.3694: cannot use quotes in the count of an Ex command Bram Moolenaar <Bram@vim.org> parents: 25978 diff changeset	1760 if (*p == '-')
227543e4181f patch 8.2.3694: cannot use quotes in the count of an Ex command Bram Moolenaar <Bram@vim.org> parents: 25978 diff changeset	1761 ++p;
227543e4181f patch 8.2.3694: cannot use quotes in the count of an Ex command Bram Moolenaar <Bram@vim.org> parents: 25978 diff changeset	1762 while (VIM_ISDIGIT(*p))
227543e4181f patch 8.2.3694: cannot use quotes in the count of an Ex command Bram Moolenaar <Bram@vim.org> parents: 25978 diff changeset	1763 {
227543e4181f patch 8.2.3694: cannot use quotes in the count of an Ex command Bram Moolenaar <Bram@vim.org> parents: 25978 diff changeset	1764 if (retval >= LONG_MAX / 10 - 10)
227543e4181f patch 8.2.3694: cannot use quotes in the count of an Ex command Bram Moolenaar <Bram@vim.org> parents: 25978 diff changeset	1765 retval = LONG_MAX;
227543e4181f patch 8.2.3694: cannot use quotes in the count of an Ex command Bram Moolenaar <Bram@vim.org> parents: 25978 diff changeset	1766 else
227543e4181f patch 8.2.3694: cannot use quotes in the count of an Ex command Bram Moolenaar <Bram@vim.org> parents: 25978 diff changeset	1767 retval = retval * 10 - '0' + *p;
227543e4181f patch 8.2.3694: cannot use quotes in the count of an Ex command Bram Moolenaar <Bram@vim.org> parents: 25978 diff changeset	1768 ++p;
227543e4181f patch 8.2.3694: cannot use quotes in the count of an Ex command Bram Moolenaar <Bram@vim.org> parents: 25978 diff changeset	1769 if (in_vim9script() && *p == '\'' && VIM_ISDIGIT(p[1]))
227543e4181f patch 8.2.3694: cannot use quotes in the count of an Ex command Bram Moolenaar <Bram@vim.org> parents: 25978 diff changeset	1770 ++p;
227543e4181f patch 8.2.3694: cannot use quotes in the count of an Ex command Bram Moolenaar <Bram@vim.org> parents: 25978 diff changeset	1771 }
227543e4181f patch 8.2.3694: cannot use quotes in the count of an Ex command Bram Moolenaar <Bram@vim.org> parents: 25978 diff changeset	1772 if (**pp == '-')
227543e4181f patch 8.2.3694: cannot use quotes in the count of an Ex command Bram Moolenaar <Bram@vim.org> parents: 25978 diff changeset	1773 {
227543e4181f patch 8.2.3694: cannot use quotes in the count of an Ex command Bram Moolenaar <Bram@vim.org> parents: 25978 diff changeset	1774 if (retval == LONG_MAX)
227543e4181f patch 8.2.3694: cannot use quotes in the count of an Ex command Bram Moolenaar <Bram@vim.org> parents: 25978 diff changeset	1775 retval = LONG_MIN;
227543e4181f patch 8.2.3694: cannot use quotes in the count of an Ex command Bram Moolenaar <Bram@vim.org> parents: 25978 diff changeset	1776 else
227543e4181f patch 8.2.3694: cannot use quotes in the count of an Ex command Bram Moolenaar <Bram@vim.org> parents: 25978 diff changeset	1777 retval = -retval;
227543e4181f patch 8.2.3694: cannot use quotes in the count of an Ex command Bram Moolenaar <Bram@vim.org> parents: 25978 diff changeset	1778 }
227543e4181f patch 8.2.3694: cannot use quotes in the count of an Ex command Bram Moolenaar <Bram@vim.org> parents: 25978 diff changeset	1779 *pp = p;
227543e4181f patch 8.2.3694: cannot use quotes in the count of an Ex command Bram Moolenaar <Bram@vim.org> parents: 25978 diff changeset	1780 return retval;
227543e4181f patch 8.2.3694: cannot use quotes in the count of an Ex command Bram Moolenaar <Bram@vim.org> parents: 25978 diff changeset	1781 }
227543e4181f patch 8.2.3694: cannot use quotes in the count of an Ex command Bram Moolenaar <Bram@vim.org> parents: 25978 diff changeset	1782
227543e4181f patch 8.2.3694: cannot use quotes in the count of an Ex command Bram Moolenaar <Bram@vim.org> parents: 25978 diff changeset	1783 /*
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1784 * Return TRUE if "lbuf" is empty or only contains blanks.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1785 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1786 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1787 vim_isblankline(char_u *lbuf)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1788 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1789 char_u *p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1790
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1791 p = skipwhite(lbuf);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1792 return (p == NUL \|\| p == '\r' \|\| *p == '\n');
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1793 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1794
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1795 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1796 * 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	1797 * 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	1798 * 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	1799 * 0 decimal
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1800 * '0' octal
20665 6ff992bf4c82 patch 8.2.0886: cannot use octal numbers in scriptversion 4 Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	1801 * 'O' octal
6ff992bf4c82 patch 8.2.0886: cannot use octal numbers in scriptversion 4 Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	1802 * 'o' octal
7447 ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1803 * 'B' bin
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1804 * 'b' bin
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1805 * 'X' hex
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1806 * 'x' hex
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1807 * If "len" is not NULL, the length of the number in characters is returned.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1808 * If "nptr" is not NULL, the signed result is returned in it.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1809 * 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	1810 * 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	1811 * 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	1812 * 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	1813 * 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	1814 * 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	1815 * 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	1816 * If strict is TRUE, check the number strictly. return *len = 0 if fail.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1817 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1818 void
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1819 vim_str2nr(
83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	1820 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	1821 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	1822 // 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	1823 // '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	1824 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	1825 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	1826 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	1827 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	1828 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	1829 int strict) // check strictly
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1830 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1831 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	1832 int pre = 0; // default is decimal
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1833 int negative = FALSE;
9389 32e34e574716 commit https://github.com/vim/vim/commit/22fcfad29276bd5f317faf516637dcd491b96a12 Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	1834 uvarnumber_T un = 0;
39 410fa1a31baf updated for version 7.0023 vimboss parents: 16 diff changeset	1835 int n;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1836
16706 77bcb5055fec patch 8.1.1355: obvious mistakes are accepted as valid expressions Bram Moolenaar <Bram@vim.org> parents: 16054 diff changeset	1837 if (len != NULL)
77bcb5055fec patch 8.1.1355: obvious mistakes are accepted as valid expressions Bram Moolenaar <Bram@vim.org> parents: 16054 diff changeset	1838 *len = 0;
77bcb5055fec patch 8.1.1355: obvious mistakes are accepted as valid expressions Bram Moolenaar <Bram@vim.org> parents: 16054 diff changeset	1839
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1840 if (ptr[0] == '-')
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1841 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1842 negative = TRUE;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1843 ++ptr;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1844 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1845
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1846 // Recognize hex, octal, and bin.
6927 58d9f967ae1a patch 7.4.782 Bram Moolenaar <bram@vim.org> parents: 6503 diff changeset	1847 if (ptr[0] == '0' && ptr[1] != '8' && ptr[1] != '9'
58d9f967ae1a patch 7.4.782 Bram Moolenaar <bram@vim.org> parents: 6503 diff changeset	1848 && (maxlen == 0 \|\| maxlen > 1))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1849 {
7447 ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1850 pre = ptr[1];
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1851 if ((what & STR2NR_HEX)
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1852 && (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	1853 && (maxlen == 0 \|\| maxlen > 2))
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1854 // hexadecimal
7447 ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1855 ptr += 2;
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1856 else if ((what & STR2NR_BIN)
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1857 && (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	1858 && (maxlen == 0 \|\| maxlen > 2))
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1859 // binary
7447 ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1860 ptr += 2;
20665 6ff992bf4c82 patch 8.2.0886: cannot use octal numbers in scriptversion 4 Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	1861 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	1862 && (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	1863 && (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	1864 // 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	1865 ptr += 2;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1866 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1867 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1868 // 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	1869 pre = 0;
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1870 if (what & STR2NR_OCT)
39 410fa1a31baf updated for version 7.0023 vimboss parents: 16 diff changeset	1871 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1872 // 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	1873 for (n = 1; n != maxlen && VIM_ISDIGIT(ptr[n]); ++n)
39 410fa1a31baf updated for version 7.0023 vimboss parents: 16 diff changeset	1874 {
410fa1a31baf updated for version 7.0023 vimboss parents: 16 diff changeset	1875 if (ptr[n] > '7')
410fa1a31baf updated for version 7.0023 vimboss parents: 16 diff changeset	1876 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1877 pre = 0; // can't be octal
39 410fa1a31baf updated for version 7.0023 vimboss parents: 16 diff changeset	1878 break;
410fa1a31baf updated for version 7.0023 vimboss parents: 16 diff changeset	1879 }
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1880 pre = '0'; // assume octal
39 410fa1a31baf updated for version 7.0023 vimboss parents: 16 diff changeset	1881 }
410fa1a31baf updated for version 7.0023 vimboss parents: 16 diff changeset	1882 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1883 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1884 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1885
16706 77bcb5055fec patch 8.1.1355: obvious mistakes are accepted as valid expressions Bram Moolenaar <Bram@vim.org> parents: 16054 diff changeset	1886 // Do the conversion manually to avoid sscanf() quirks.
6927 58d9f967ae1a patch 7.4.782 Bram Moolenaar <bram@vim.org> parents: 6503 diff changeset	1887 n = 1;
18082 1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1888 if (pre == 'B' \|\| pre == 'b'
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1889 \|\| ((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	1890 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1891 // bin
7447 ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1892 if (pre != 0)
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1893 n += 2; // skip over "0b"
7447 ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1894 while ('0' <= ptr && ptr <= '1')
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1895 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1896 // 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	1897 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	1898 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	1899 else
77d66e9ac0ab patch 8.0.0219: ubsan reports errors for overflow Christian Brabandt <cb@256bit.org> parents: 10549 diff changeset	1900 un = UVARNUM_MAX;
7447 ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1901 ++ptr;
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1902 if (n++ == maxlen)
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1903 break;
18082 1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1904 if ((what & STR2NR_QUOTE) && *ptr == '\''
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1905 && '0' <= ptr[1] && ptr[1] <= '1')
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1906 {
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1907 ++ptr;
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1908 if (n++ == maxlen)
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1909 break;
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1910 }
7447 ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1911 }
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1912 }
20665 6ff992bf4c82 patch 8.2.0886: cannot use octal numbers in scriptversion 4 Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	1913 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	1914 pre == '0' \|\| ((what & STR2NR_OCT) && (what & STR2NR_FORCE)))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1915 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1916 // octal
20665 6ff992bf4c82 patch 8.2.0886: cannot use octal numbers in scriptversion 4 Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	1917 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	1918 n += 2; // skip over "0o"
293 f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1919 while ('0' <= ptr && ptr <= '7')
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1920 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1921 // 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	1922 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	1923 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	1924 else
77d66e9ac0ab patch 8.0.0219: ubsan reports errors for overflow Christian Brabandt <cb@256bit.org> parents: 10549 diff changeset	1925 un = UVARNUM_MAX;
293 f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1926 ++ptr;
6927 58d9f967ae1a patch 7.4.782 Bram Moolenaar <bram@vim.org> parents: 6503 diff changeset	1927 if (n++ == maxlen)
58d9f967ae1a patch 7.4.782 Bram Moolenaar <bram@vim.org> parents: 6503 diff changeset	1928 break;
18082 1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1929 if ((what & STR2NR_QUOTE) && *ptr == '\''
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1930 && '0' <= ptr[1] && ptr[1] <= '7')
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1931 {
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1932 ++ptr;
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1933 if (n++ == maxlen)
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1934 break;
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1935 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1936 }
293 f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1937 }
18082 1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1938 else if (pre != 0 \|\| ((what & STR2NR_HEX) && (what & STR2NR_FORCE)))
293 f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1939 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1940 // hex
7447 ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1941 if (pre != 0)
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1942 n += 2; // skip over "0x"
293 f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1943 while (vim_isxdigit(*ptr))
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1944 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1945 // 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	1946 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	1947 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	1948 else
77d66e9ac0ab patch 8.0.0219: ubsan reports errors for overflow Christian Brabandt <cb@256bit.org> parents: 10549 diff changeset	1949 un = UVARNUM_MAX;
293 f811be6fa9b5 updated for version 7.0077 vimboss parents: 273 diff changeset	1950 ++ptr;
6927 58d9f967ae1a patch 7.4.782 Bram Moolenaar <bram@vim.org> parents: 6503 diff changeset	1951 if (n++ == maxlen)
58d9f967ae1a patch 7.4.782 Bram Moolenaar <bram@vim.org> parents: 6503 diff changeset	1952 break;
18082 1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1953 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	1954 {
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1955 ++ptr;
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1956 if (n++ == maxlen)
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1957 break;
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1958 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1959 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1960 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1961 else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1962 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1963 // decimal
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1964 while (VIM_ISDIGIT(*ptr))
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1965 {
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	1966 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	1967
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1968 // 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	1969 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	1970 \|\| (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	1971 un = 10 * un + digit;
10658 77d66e9ac0ab patch 8.0.0219: ubsan reports errors for overflow Christian Brabandt <cb@256bit.org> parents: 10549 diff changeset	1972 else
77d66e9ac0ab patch 8.0.0219: ubsan reports errors for overflow Christian Brabandt <cb@256bit.org> parents: 10549 diff changeset	1973 un = UVARNUM_MAX;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1974 ++ptr;
6927 58d9f967ae1a patch 7.4.782 Bram Moolenaar <bram@vim.org> parents: 6503 diff changeset	1975 if (n++ == maxlen)
58d9f967ae1a patch 7.4.782 Bram Moolenaar <bram@vim.org> parents: 6503 diff changeset	1976 break;
18082 1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1977 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	1978 {
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1979 ++ptr;
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1980 if (n++ == maxlen)
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1981 break;
1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1982 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1983 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1984 }
18082 1c7a91cf2356 patch 8.1.2036: the str2nr() tests fail Bram Moolenaar <Bram@vim.org> parents: 17809 diff changeset	1985
19195 2ef19eed524a patch 8.2.0156: various typos in source files and tests Bram Moolenaar <Bram@vim.org> parents: 18757 diff changeset	1986 // 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	1987 // 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	1988 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	1989 return;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1990
7447 ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1991 if (prep != NULL)
ad432f8f68fb commit https://github.com/vim/vim/commit/887c1fea4a114e7170091942d0446c8882701b5b Christian Brabandt <cb@256bit.org> parents: 7072 diff changeset	1992 *prep = pre;
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1993 if (len != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1994 *len = (int)(ptr - start);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	1995 if (nptr != NULL)
16 3ba373b54370 updated for version 7.0008 vimboss parents: 7 diff changeset	1996 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1997 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	1998 {
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18574 diff changeset	1999 // 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	2000 if (un > VARNUM_MAX)
77d66e9ac0ab patch 8.0.0219: ubsan reports errors for overflow Christian Brabandt <cb@256bit.org> parents: 10549 diff changeset	2001 *nptr = VARNUM_MIN;
77d66e9ac0ab patch 8.0.0219: ubsan reports errors for overflow Christian Brabandt <cb@256bit.org> parents: 10549 diff changeset	2002 else
77d66e9ac0ab patch 8.0.0219: ubsan reports errors for overflow Christian Brabandt <cb@256bit.org> parents: 10549 diff changeset	2003 *nptr = -(varnumber_T)un;
77d66e9ac0ab patch 8.0.0219: ubsan reports errors for overflow Christian Brabandt <cb@256bit.org> parents: 10549 diff changeset	2004 }
16 3ba373b54370 updated for version 7.0008 vimboss parents: 7 diff changeset	2005 else
10658 77d66e9ac0ab patch 8.0.0219: ubsan reports errors for overflow Christian Brabandt <cb@256bit.org> parents: 10549 diff changeset	2006 {
77d66e9ac0ab patch 8.0.0219: ubsan reports errors for overflow Christian Brabandt <cb@256bit.org> parents: 10549 diff changeset	2007 if (un > VARNUM_MAX)
77d66e9ac0ab patch 8.0.0219: ubsan reports errors for overflow Christian Brabandt <cb@256bit.org> parents: 10549 diff changeset	2008 un = VARNUM_MAX;
9389 32e34e574716 commit https://github.com/vim/vim/commit/22fcfad29276bd5f317faf516637dcd491b96a12 Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	2009 *nptr = (varnumber_T)un;
10658 77d66e9ac0ab patch 8.0.0219: ubsan reports errors for overflow Christian Brabandt <cb@256bit.org> parents: 10549 diff changeset	2010 }
16 3ba373b54370 updated for version 7.0008 vimboss parents: 7 diff changeset	2011 }
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2012 if (unptr != NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2013 *unptr = un;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2014 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2015
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2016 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2017 * Return the value of a single hex character.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2018 * Only valid when the argument is '0' - '9', 'A' - 'F' or 'a' - 'f'.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2019 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2020 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	2021 hex2nr(int c)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2022 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2023 if (c >= 'a' && c <= 'f')
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2024 return c - 'a' + 10;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2025 if (c >= 'A' && c <= 'F')
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2026 return c - 'A' + 10;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2027 return c - '0';
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2028 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2029
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2030 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2031 * Convert two hex characters to a byte.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2032 * Return -1 if one of the characters is not hex.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2033 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2034 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	2035 hexhex2nr(char_u *p)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2036 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2037 if (!vim_isxdigit(p[0]) \|\| !vim_isxdigit(p[1]))
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2038 return -1;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2039 return (hex2nr(p[0]) << 4) + hex2nr(p[1]);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2040 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2041
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2042 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2043 * 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	2044 * 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	2045 * backslash is not a normal file name character.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2046 * '$' is a valid file name character, we don't remove the backslash before
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2047 * it. This means it is not possible to use an environment variable after a
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2048 * backslash. "C:\$VIM\doc" is taken literally, only "$VIM\doc" works.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2049 * Although "\ name" is valid, the backslash in "Program\ files" must be
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2050 * removed. Assume a file name doesn't start with a space.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2051 * For multi-byte names, never remove a backslash before a non-ascii
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2052 * character, assume that all multi-byte characters are valid file name
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2053 * characters.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2054 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2055 int
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	2056 rem_backslash(char_u *str)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2057 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2058 #ifdef BACKSLASH_IN_FILENAME
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2059 return (str[0] == '\\'
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2060 && str[1] < 0x80
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2061 && (str[1] == ' '
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2062 \|\| (str[1] != NUL
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2063 && str[1] != '*'
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2064 && str[1] != '?'
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2065 && !vim_isfilec(str[1]))));
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2066 #else
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2067 return (str[0] == '\\' && str[1] != NUL);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2068 #endif
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2069 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2070
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2071 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2072 * Halve the number of backslashes in a file name argument.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2073 * For MS-DOS we only do this if the character after the backslash
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2074 * is not a normal file character.
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2075 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2076 void
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	2077 backslash_halve(char_u *p)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2078 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2079 for ( ; *p; ++p)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2080 if (rem_backslash(p))
1621 82b5078be2dd updated for version 7.2a vimboss parents: 1546 diff changeset	2081 STRMOVE(p, p + 1);
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2082 }
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2083
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2084 /*
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2085 * 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	2086 * However, returns "p" when out of memory.
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2087 */
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2088 char_u *
7817 83861277e6a3 commit https://github.com/vim/vim/commit/7454a06e2642d2b37afad1c5e71cec68081ca4ff Christian Brabandt <cb@256bit.org> parents: 7799 diff changeset	2089 backslash_halve_save(char_u *p)
7 3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2090 {
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2091 char_u *res;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2092
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2093 res = vim_strsave(p);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2094 if (res == NULL)
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2095 return p;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2096 backslash_halve(res);
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2097 return res;
3fc0f57ecb91 updated for version 7.0001 vimboss parents: diff changeset	2098 }

Mercurial > vim

annotate src/charset.c @ 28849:be5bc2060ee8