1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
  | 
local helpers = require("test.unit.helpers")(after_each)
local itp = helpers.gen_itp(it)
local to_cstr = helpers.to_cstr
local eq      = helpers.eq
local search = helpers.cimport("./src/nvim/search.h")
local globals = helpers.cimport('./src/nvim/globals.h')
local ffi = helpers.ffi
itp('pat_has_uppercase', function()
  -- works on empty string
  eq(false, search.pat_has_uppercase(to_cstr("")))
  -- works with utf uppercase
  eq(false, search.pat_has_uppercase(to_cstr("ä")))
  eq(true, search.pat_has_uppercase(to_cstr("Ä")))
  eq(true, search.pat_has_uppercase(to_cstr("äaÅ")))
  -- works when pat ends with backslash
  eq(false, search.pat_has_uppercase(to_cstr("\\")))
  eq(false, search.pat_has_uppercase(to_cstr("ab$\\")))
  -- skips escaped characters
  eq(false, search.pat_has_uppercase(to_cstr("\\Ab")))
  eq(true, search.pat_has_uppercase(to_cstr("\\AU")))
  -- skips _X escaped characters
  eq(false, search.pat_has_uppercase(to_cstr("\\_Ab")))
  eq(true, search.pat_has_uppercase(to_cstr("\\_AU")))
  -- skips %X escaped characters
  eq(false, search.pat_has_uppercase(to_cstr("aa\\%Ab")))
  eq(true, search.pat_has_uppercase(to_cstr("aab\\%AU")))
end)
describe('search_regcomp', function()
  local search_regcomp = function(pat, pat_save, pat_use, options )
    local regmatch = ffi.new("regmmatch_T")
    local fail = search.search_regcomp(to_cstr(pat), nil, pat_save, pat_use, options, regmatch)
    return fail, regmatch
  end
  local get_search_pat = function()
    return helpers.internalize(search.get_search_pat())
  end
  itp("accepts regexp pattern with invalid utf", function()
    --crafted to call reverse_text with invalid utf
    globals.curwin.w_onebuf_opt.wo_rl = 1
    globals.curwin.w_onebuf_opt.wo_rlc = to_cstr('s')
    globals.cmdmod.cmod_flags = globals.CMOD_KEEPPATTERNS
    local fail = search_regcomp("a\192", 0,0,0)
    eq(1, fail)
    eq("\192a", get_search_pat())
  end)
end)
  |