github.com/tul/gopher-lua@v0.0.0-20181008131706-f6fcaab0c612/_lua5.1-tests/strings.lua (about) 1 print('testing strings and string library') 2 3 assert('alo' < 'alo1') 4 assert('' < 'a') 5 assert('alo\0alo' < 'alo\0b') 6 assert('alo\0alo\0\0' > 'alo\0alo\0') 7 assert('alo' < 'alo\0') 8 assert('alo\0' > 'alo') 9 assert('\0' < '\1') 10 assert('\0\0' < '\0\1') 11 assert('\1\0a\0a' <= '\1\0a\0a') 12 assert(not ('\1\0a\0b' <= '\1\0a\0a')) 13 assert('\0\0\0' < '\0\0\0\0') 14 assert(not('\0\0\0\0' < '\0\0\0')) 15 assert('\0\0\0' <= '\0\0\0\0') 16 assert(not('\0\0\0\0' <= '\0\0\0')) 17 assert('\0\0\0' <= '\0\0\0') 18 assert('\0\0\0' >= '\0\0\0') 19 assert(not ('\0\0b' < '\0\0a\0')) 20 print('+') 21 assert(string.sub("123456789",2,4) == "234") 22 assert(string.sub("123456789",7) == "789") 23 assert(string.sub("123456789",7,6) == "") 24 assert(string.sub("123456789",7,7) == "7") 25 assert(string.sub("123456789",0,0) == "") 26 assert(string.sub("123456789",-10,10) == "123456789") 27 assert(string.sub("123456789",1,9) == "123456789") 28 assert(string.sub("123456789",-10,-20) == "") 29 assert(string.sub("123456789",-1) == "9") 30 assert(string.sub("123456789",-4) == "6789") 31 assert(string.sub("123456789",-6, -4) == "456") 32 assert(string.sub("\000123456789",3,5) == "234") 33 assert(("\000123456789"):sub(8) == "789") 34 print('+') 35 36 assert(string.find("123456789", "345") == 3) 37 a,b = string.find("123456789", "345") 38 assert(string.sub("123456789", a, b) == "345") 39 assert(string.find("1234567890123456789", "345", 3) == 3) 40 assert(string.find("1234567890123456789", "345", 4) == 13) 41 assert(string.find("1234567890123456789", "346", 4) == nil) 42 assert(string.find("1234567890123456789", ".45", -9) == 13) 43 assert(string.find("abcdefg", "\0", 5, 1) == nil) 44 assert(string.find("", "") == 1) 45 assert(string.find('', 'aaa', 1) == nil) 46 assert(('alo(.)alo'):find('(.)', 1, 1) == 4) 47 48 assert(string.len("") == 0) 49 assert(string.len("\0\0\0") == 3) 50 assert(string.len("1234567890") == 10) 51 52 assert(#"" == 0) 53 assert(#"\0\0\0" == 3) 54 assert(#"1234567890" == 10) 55 56 assert(string.byte("a") == 97) 57 assert(string.byte("á") > 127) 58 assert(string.byte(string.char(255)) == 255) 59 assert(string.byte(string.char(0)) == 0) 60 assert(string.byte("\0") == 0) 61 assert(string.byte("\0\0alo\0x", -1) == string.byte('x')) 62 assert(string.byte("ba", 2) == 97) 63 assert(string.byte("\n\n", 2, -1) == 10) 64 assert(string.byte("\n\n", 2, 2) == 10) 65 assert(string.byte("") == nil) 66 assert(string.byte("hi", -3) == nil) 67 assert(string.byte("hi", 3) == nil) 68 assert(string.byte("hi", 9, 10) == nil) 69 assert(string.byte("hi", 2, 1) == nil) 70 assert(string.char() == "") 71 assert(string.char(0, 255, 0) == "\0\255\0") 72 assert(string.char(0, string.byte("á"), 0) == "\0á\0") 73 assert(string.char(string.byte("ál\0óu", 1, -1)) == "ál\0óu") 74 assert(string.char(string.byte("ál\0óu", 1, 0)) == "") 75 assert(string.char(string.byte("ál\0óu", -10, 100)) == "ál\0óu") 76 print('+') 77 78 assert(string.upper("ab\0c") == "AB\0C") 79 assert(string.lower("\0ABCc%$") == "\0abcc%$") 80 assert(string.rep('teste', 0) == '') 81 assert(string.rep('tés\00tê', 2) == 'tés\0têtés\000tê') 82 assert(string.rep('', 10) == '') 83 84 assert(string.reverse"" == "") 85 assert(string.reverse"\0\1\2\3" == "\3\2\1\0") 86 assert(string.reverse"\0001234" == "4321\0") 87 88 for i=0,30 do assert(string.len(string.rep('a', i)) == i) end 89 90 assert(type(tostring(nil)) == 'string') 91 assert(type(tostring(12)) == 'string') 92 assert(''..12 == '12' and type(12 .. '') == 'string') 93 assert(string.find(tostring{}, 'table:')) 94 assert(string.find(tostring(print), 'function:')) 95 assert(tostring(1234567890123) == '1234567890123') 96 assert(#tostring('\0') == 1) 97 assert(tostring(true) == "true") 98 assert(tostring(false) == "false") 99 print('+') 100 101 x = '"ílo"\n\\' 102 -- assert(string.format('%q%s', x, x) == '"\\"ílo\\"\\\n\\\\""ílo"\n\\') 103 -- assert(string.format('%q', "\0") == [["\000"]]) 104 --assert(string.format("\0%c\0%c%x\0", string.byte("á"), string.byte("b"), 140) == 105 -- "\0á\0b8c\0") 106 assert(string.format('') == "") 107 assert(string.format("%c",34)..string.format("%c",48)..string.format("%c",90)..string.format("%c",100) == 108 string.format("%c%c%c%c", 34, 48, 90, 100)) 109 assert(string.format("%s\0 is not \0%s", 'not be', 'be') == 'not be\0 is not \0be') 110 assert(string.format("%%%d %010d", 10, 23) == "%10 0000000023") 111 assert(tonumber(string.format("%f", 10.3)) == 10.3) 112 x = string.format('"%-50s"', 'a') 113 assert(#x == 52) 114 assert(string.sub(x, 1, 4) == '"a ') 115 116 assert(string.format("-%.20s.20s", string.rep("%", 2000)) == "-"..string.rep("%", 20)..".20s") 117 assert(string.format('"-%20s.20s"', string.rep("%", 2000)) == 118 string.format("%q", "-"..string.rep("%", 2000)..".20s")) 119 120 121 -- longest number that can be formated 122 assert(string.len(string.format('%99.99f', -1e308)) >= 100) 123 124 -- assert(loadstring("return 1\n--comentário sem EOL no final")() == 1) 125 126 assert(table.concat{} == "") 127 assert(table.concat({}, 'x') == "") 128 assert(table.concat({'\0', '\0\1', '\0\1\2'}, '.\0.') == "\0.\0.\0\1.\0.\0\1\2") 129 local a = {}; for i=1,3000 do a[i] = "xuxu" end 130 assert(table.concat(a, "123").."123" == string.rep("xuxu123", 3000)) 131 assert(table.concat(a, "b", 20, 20) == "xuxu") 132 assert(table.concat(a, "", 20, 21) == "xuxuxuxu") 133 assert(table.concat(a, "", 22, 21) == "") 134 assert(table.concat(a, "3", 2999) == "xuxu3xuxu") 135 136 a = {"a","b","c"} 137 assert(table.concat(a, ",", 1, 0) == "") 138 assert(table.concat(a, ",", 1, 1) == "a") 139 assert(table.concat(a, ",", 1, 2) == "a,b") 140 assert(table.concat(a, ",", 2) == "b,c") 141 assert(table.concat(a, ",", 3) == "c") 142 assert(table.concat(a, ",", 4) == "") 143 144 local locales = { "ptb", "ISO-8859-1", "pt_BR" } 145 local function trylocale (w) 146 for _, l in ipairs(locales) do 147 if os.setlocale(l, w) then return true end 148 end 149 return false 150 end 151 152 if not trylocale("collate") then 153 print("locale not supported") 154 else 155 assert("alo" < "álo" and "álo" < "amo") 156 end 157 158 if not trylocale("ctype") then 159 print("locale not supported") 160 else 161 assert(string.gsub("áéíóú", "%a", "x") == "xxxxx") 162 assert(string.gsub("áÁéÉ", "%l", "x") == "xÁxÉ") 163 assert(string.gsub("áÁéÉ", "%u", "x") == "áxéx") 164 assert(string.upper"áÁé{xuxu}ção" == "ÁÁÉ{XUXU}ÇÃO") 165 end 166 167 -- os.setlocale("C") 168 -- assert(os.setlocale() == 'C') 169 -- assert(os.setlocale(nil, "numeric") == 'C') 170 171 print('OK') 172 173