vim: src/charset.c annotate

annotate src/charset.c @ 19237:1a3ebc75cf39 v8.2.0177

patch 8.2.0177: memory leak in get_tags() Commit: https://github.com/vim/vim/commit/70b3e706b40fc2c84c1f9f33fa64945a481df395 Author: Bram Moolenaar <Bram@vim.org> Date: Wed Jan 29 22:38:45 2020 +0100 patch 8.2.0177: memory leak in get_tags() Problem: Memory leak in get_tags(). Solution: Free matches when finding a pseudo-tag line. (Dominique Pelle, closes #5553)

author	Bram Moolenaar <Bram@vim.org>
date	Wed, 29 Jan 2020 22:45:08 +0100
parents	2ef19eed524a
children	aadd1cae2ff5

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

Mercurial > vim

annotate src/charset.c @ 19237:1a3ebc75cf39 v8.2.0177