Software / code / prosody
Annotate
spec/util_dbuffer_spec.lua @ 11226:b3ae48362f78 0.11
mod_s2s: Prevent whitespace keepalives the stream has been opened
This will result in the stream timing out instead, which is probably
correct if the stream has not been opened yet.
This was already done for c2s in e69df8093387
Thanks Ge0rG
| author | Kim Alvefur <zash@zash.se> |
|---|---|
| date | Thu, 10 Dec 2020 11:53:10 +0100 |
| parent | 11156:a8ef69f7fc35 |
| child | 11158:3a72cb126d6c |
| rev | line source |
|---|---|
| 11105 | 1 local dbuffer = require "util.dbuffer"; |
| 2 describe("util.dbuffer", function () | |
| 3 describe("#new", function () | |
| 4 it("has a constructor", function () | |
| 5 assert.Function(dbuffer.new); | |
| 6 end); | |
| 7 it("can be created", function () | |
| 8 assert.truthy(dbuffer.new()); | |
| 9 end); | |
| 10 it("won't create an empty buffer", function () | |
| 11 assert.falsy(dbuffer.new(0)); | |
| 12 end); | |
| 13 it("won't create a negatively sized buffer", function () | |
| 14 assert.falsy(dbuffer.new(-1)); | |
| 15 end); | |
| 16 end); | |
| 17 describe(":write", function () | |
| 18 local b = dbuffer.new(); | |
| 19 it("works", function () | |
| 20 assert.truthy(b:write("hi")); | |
| 21 end); | |
| 22 end); | |
| 23 | |
| 24 describe(":read", function () | |
| 25 it("supports optional bytes parameter", function () | |
| 26 -- should return the frontmost chunk | |
| 27 local b = dbuffer.new(); | |
| 28 assert.truthy(b:write("hello")); | |
| 29 assert.truthy(b:write(" ")); | |
| 30 assert.truthy(b:write("world")); | |
| 31 assert.equal("h", b:read(1)); | |
| 32 | |
| 33 assert.equal("ello", b:read()); | |
| 34 assert.equal(" ", b:read()); | |
| 35 assert.equal("world", b:read()); | |
| 36 end); | |
| 37 end); | |
| 38 | |
| 39 describe(":discard", function () | |
| 40 local b = dbuffer.new(); | |
| 41 it("works", function () | |
| 42 assert.truthy(b:write("hello world")); | |
| 43 assert.truthy(b:discard(6)); | |
| 44 assert.equal(5, b:length()); | |
|
11156
a8ef69f7fc35
util.dbuffer: Expose length as :len() method, like strings
Kim Alvefur <zash@zash.se>
parents:
11105
diff
changeset
|
45 assert.equal(5, b:len()); |
| 11105 | 46 assert.equal("world", b:read(5)); |
| 47 end); | |
| 48 end); | |
| 49 | |
| 50 describe(":collapse()", function () | |
| 51 it("works on an empty buffer", function () | |
| 52 local b = dbuffer.new(); | |
| 53 b:collapse(); | |
| 54 end); | |
| 55 end); | |
| 56 | |
| 57 describe(":sub", function () | |
| 58 -- Helper function to compare buffer:sub() with string:sub() | |
| 59 local s = "hello world"; | |
| 60 local function test_sub(b, x, y) | |
| 61 local string_result, buffer_result = s:sub(x, y), b:sub(x, y); | |
| 62 assert.equals(string_result, buffer_result, ("buffer:sub(%d, %s) does not match string:sub()"):format(x, y and ("%d"):format(y) or "nil")); | |
| 63 end | |
| 64 | |
| 65 it("works", function () | |
| 66 local b = dbuffer.new(); | |
| 67 assert.truthy(b:write("hello world")); | |
| 68 assert.equals("hello", b:sub(1, 5)); | |
| 69 end); | |
| 70 | |
| 71 it("works after discard", function () | |
| 72 local b = dbuffer.new(256); | |
| 73 assert.truthy(b:write("foobar")); | |
| 74 assert.equals("foobar", b:sub(1, 6)); | |
| 75 assert.truthy(b:discard(3)); -- consume "foo" | |
| 76 assert.equals("bar", b:sub(1, 3)); | |
| 77 end); | |
| 78 | |
| 79 it("supports optional end parameter", function () | |
| 80 local b = dbuffer.new(); | |
| 81 assert.truthy(b:write("hello world")); | |
| 82 assert.equals("hello world", b:sub(1)); | |
| 83 assert.equals("world", b:sub(-5)); | |
| 84 end); | |
| 85 | |
| 86 it("is equivalent to string:sub", function () | |
| 87 local b = dbuffer.new(11); | |
| 88 assert.truthy(b:write(s)); | |
| 89 for i = -13, 13 do | |
| 90 for j = -13, 13 do | |
| 91 test_sub(b, i, j); | |
| 92 end | |
| 93 end | |
| 94 end); | |
| 95 end); | |
| 96 | |
| 97 describe(":byte", function () | |
| 98 -- Helper function to compare buffer:byte() with string:byte() | |
| 99 local s = "hello world" | |
| 100 local function test_byte(b, x, y) | |
| 101 local string_result, buffer_result = {s:byte(x, y)}, {b:byte(x, y)}; | |
| 102 assert.same(string_result, buffer_result, ("buffer:byte(%d, %s) does not match string:byte()"):format(x, y and ("%d"):format(y) or "nil")); | |
| 103 end | |
| 104 | |
| 105 it("is equivalent to string:byte", function () | |
| 106 local b = dbuffer.new(11); | |
| 107 assert.truthy(b:write(s)); | |
| 108 test_byte(b, 1); | |
| 109 test_byte(b, 3); | |
| 110 test_byte(b, -1); | |
| 111 test_byte(b, -3); | |
| 112 for i = -13, 13 do | |
| 113 for j = -13, 13 do | |
| 114 test_byte(b, i, j); | |
| 115 end | |
| 116 end | |
| 117 end); | |
| 118 | |
| 119 it("works with characters > 127", function () | |
| 120 local b = dbuffer.new(); | |
| 121 b:write(string.char(0, 140)); | |
| 122 local r = { b:byte(1, 2) }; | |
| 123 assert.same({ 0, 140 }, r); | |
| 124 end); | |
| 125 | |
| 126 it("works on an empty buffer", function () | |
| 127 local b = dbuffer.new(); | |
| 128 assert.equal("", b:sub(1,1)); | |
| 129 end); | |
| 130 end); | |
| 131 end); |
