Software `/` code `/` prosody

Annotate

spec/util_cache_spec.lua @ 12480:7e9ebdc75ce4

net: isolate LuaSec-specifics For this, various accessor functions are now provided directly on the sockets, which reach down into the LuaSec implementation to obtain the information. While this may seem of little gain at first, it hides the implementation detail of the LuaSec+LuaSocket combination that the actual socket and the TLS layer are separate objects. The net gain here is that an alternative implementation does not have to emulate that specific implementation detail and "only" has to expose LuaSec-compatible data structures on the new functions.

author	Jonas Schäfer <jonas@wielicki.name>
date	Wed, 27 Apr 2022 17:44:14 +0200
parent	11366:618ab9bba1c2
child	12571:c4337ff4f1c4

rev	line source
8236 4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	1
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	2 local cache = require "util.cache";
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	3
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	4 describe("util.cache", function()
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	5 describe("#new()", function()
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	6 it("should work", function()
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	7
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	8 local c = cache.new(5);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	9
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	10 local function expect_kv(key, value, actual_key, actual_value)
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	11 assert.are.equal(key, actual_key, "key incorrect");
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	12 assert.are.equal(value, actual_value, "value incorrect");
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	13 end
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	14
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	15 expect_kv(nil, nil, c:head());
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	16 expect_kv(nil, nil, c:tail());
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	17
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	18 assert.are.equal(c:count(), 0);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	19
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	20 c:set("one", 1)
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	21 assert.are.equal(c:count(), 1);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	22 expect_kv("one", 1, c:head());
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	23 expect_kv("one", 1, c:tail());
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	24
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	25 c:set("two", 2)
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	26 expect_kv("two", 2, c:head());
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	27 expect_kv("one", 1, c:tail());
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	28
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	29 c:set("three", 3)
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	30 expect_kv("three", 3, c:head());
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	31 expect_kv("one", 1, c:tail());
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	32
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	33 c:set("four", 4)
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	34 c:set("five", 5);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	35 assert.are.equal(c:count(), 5);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	36 expect_kv("five", 5, c:head());
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	37 expect_kv("one", 1, c:tail());
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	38
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	39 c:set("foo", nil);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	40 assert.are.equal(c:count(), 5);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	41 expect_kv("five", 5, c:head());
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	42 expect_kv("one", 1, c:tail());
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	43
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	44 assert.are.equal(c:get("one"), 1);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	45 expect_kv("five", 5, c:head());
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	46 expect_kv("one", 1, c:tail());
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	47
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	48 assert.are.equal(c:get("two"), 2);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	49 assert.are.equal(c:get("three"), 3);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	50 assert.are.equal(c:get("four"), 4);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	51 assert.are.equal(c:get("five"), 5);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	52
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	53 assert.are.equal(c:get("foo"), nil);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	54 assert.are.equal(c:get("bar"), nil);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	55
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	56 c:set("six", 6);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	57 assert.are.equal(c:count(), 5);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	58 expect_kv("six", 6, c:head());
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	59 expect_kv("two", 2, c:tail());
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	60
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	61 assert.are.equal(c:get("one"), nil);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	62 assert.are.equal(c:get("two"), 2);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	63 assert.are.equal(c:get("three"), 3);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	64 assert.are.equal(c:get("four"), 4);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	65 assert.are.equal(c:get("five"), 5);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	66 assert.are.equal(c:get("six"), 6);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	67
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	68 c:set("three", nil);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	69 assert.are.equal(c:count(), 4);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	70
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	71 assert.are.equal(c:get("one"), nil);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	72 assert.are.equal(c:get("two"), 2);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	73 assert.are.equal(c:get("three"), nil);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	74 assert.are.equal(c:get("four"), 4);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	75 assert.are.equal(c:get("five"), 5);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	76 assert.are.equal(c:get("six"), 6);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	77
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	78 c:set("seven", 7);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	79 assert.are.equal(c:count(), 5);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	80
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	81 assert.are.equal(c:get("one"), nil);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	82 assert.are.equal(c:get("two"), 2);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	83 assert.are.equal(c:get("three"), nil);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	84 assert.are.equal(c:get("four"), 4);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	85 assert.are.equal(c:get("five"), 5);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	86 assert.are.equal(c:get("six"), 6);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	87 assert.are.equal(c:get("seven"), 7);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	88
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	89 c:set("eight", 8);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	90 assert.are.equal(c:count(), 5);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	91
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	92 assert.are.equal(c:get("one"), nil);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	93 assert.are.equal(c:get("two"), nil);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	94 assert.are.equal(c:get("three"), nil);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	95 assert.are.equal(c:get("four"), 4);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	96 assert.are.equal(c:get("five"), 5);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	97 assert.are.equal(c:get("six"), 6);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	98 assert.are.equal(c:get("seven"), 7);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	99 assert.are.equal(c:get("eight"), 8);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	100
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	101 c:set("four", 4);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	102 assert.are.equal(c:count(), 5);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	103
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	104 assert.are.equal(c:get("one"), nil);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	105 assert.are.equal(c:get("two"), nil);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	106 assert.are.equal(c:get("three"), nil);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	107 assert.are.equal(c:get("four"), 4);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	108 assert.are.equal(c:get("five"), 5);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	109 assert.are.equal(c:get("six"), 6);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	110 assert.are.equal(c:get("seven"), 7);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	111 assert.are.equal(c:get("eight"), 8);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	112
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	113 c:set("nine", 9);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	114 assert.are.equal(c:count(), 5);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	115
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	116 assert.are.equal(c:get("one"), nil);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	117 assert.are.equal(c:get("two"), nil);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	118 assert.are.equal(c:get("three"), nil);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	119 assert.are.equal(c:get("four"), 4);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	120 assert.are.equal(c:get("five"), nil);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	121 assert.are.equal(c:get("six"), 6);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	122 assert.are.equal(c:get("seven"), 7);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	123 assert.are.equal(c:get("eight"), 8);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	124 assert.are.equal(c:get("nine"), 9);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	125
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	126 do
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	127 local keys = { "nine", "four", "eight", "seven", "six" };
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	128 local values = { 9, 4, 8, 7, 6 };
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	129 local i = 0;
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	130 for k, v in c:items() do
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	131 i = i + 1;
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	132 assert.are.equal(k, keys[i]);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	133 assert.are.equal(v, values[i]);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	134 end
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	135 assert.are.equal(i, 5);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	136
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	137 c:set("four", "2+2");
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	138 assert.are.equal(c:count(), 5);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	139
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	140 assert.are.equal(c:get("one"), nil);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	141 assert.are.equal(c:get("two"), nil);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	142 assert.are.equal(c:get("three"), nil);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	143 assert.are.equal(c:get("four"), "2+2");
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	144 assert.are.equal(c:get("five"), nil);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	145 assert.are.equal(c:get("six"), 6);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	146 assert.are.equal(c:get("seven"), 7);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	147 assert.are.equal(c:get("eight"), 8);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	148 assert.are.equal(c:get("nine"), 9);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	149 end
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	150
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	151 do
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	152 local keys = { "four", "nine", "eight", "seven", "six" };
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	153 local values = { "2+2", 9, 8, 7, 6 };
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	154 local i = 0;
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	155 for k, v in c:items() do
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	156 i = i + 1;
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	157 assert.are.equal(k, keys[i]);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	158 assert.are.equal(v, values[i]);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	159 end
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	160 assert.are.equal(i, 5);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	161
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	162 c:set("foo", nil);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	163 assert.are.equal(c:count(), 5);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	164
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	165 assert.are.equal(c:get("one"), nil);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	166 assert.are.equal(c:get("two"), nil);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	167 assert.are.equal(c:get("three"), nil);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	168 assert.are.equal(c:get("four"), "2+2");
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	169 assert.are.equal(c:get("five"), nil);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	170 assert.are.equal(c:get("six"), 6);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	171 assert.are.equal(c:get("seven"), 7);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	172 assert.are.equal(c:get("eight"), 8);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	173 assert.are.equal(c:get("nine"), 9);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	174 end
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	175
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	176 do
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	177 local keys = { "four", "nine", "eight", "seven", "six" };
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	178 local values = { "2+2", 9, 8, 7, 6 };
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	179 local i = 0;
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	180 for k, v in c:items() do
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	181 i = i + 1;
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	182 assert.are.equal(k, keys[i]);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	183 assert.are.equal(v, values[i]);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	184 end
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	185 assert.are.equal(i, 5);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	186
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	187 c:set("four", nil);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	188
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	189 assert.are.equal(c:get("one"), nil);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	190 assert.are.equal(c:get("two"), nil);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	191 assert.are.equal(c:get("three"), nil);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	192 assert.are.equal(c:get("four"), nil);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	193 assert.are.equal(c:get("five"), nil);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	194 assert.are.equal(c:get("six"), 6);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	195 assert.are.equal(c:get("seven"), 7);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	196 assert.are.equal(c:get("eight"), 8);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	197 assert.are.equal(c:get("nine"), 9);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	198 end
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	199
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	200 do
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	201 local keys = { "nine", "eight", "seven", "six" };
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	202 local values = { 9, 8, 7, 6 };
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	203 local i = 0;
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	204 for k, v in c:items() do
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	205 i = i + 1;
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	206 assert.are.equal(k, keys[i]);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	207 assert.are.equal(v, values[i]);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	208 end
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	209 assert.are.equal(i, 4);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	210 end
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	211
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	212 do
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	213 local evicted_key, evicted_value;
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	214 local c2 = cache.new(3, function (_key, _value)
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	215 evicted_key, evicted_value = _key, _value;
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	216 end);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	217 local function set(k, v, should_evict_key, should_evict_value)
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	218 evicted_key, evicted_value = nil, nil;
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	219 c2:set(k, v);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	220 assert.are.equal(evicted_key, should_evict_key);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	221 assert.are.equal(evicted_value, should_evict_value);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	222 end
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	223 set("a", 1)
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	224 set("a", 1)
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	225 set("a", 1)
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	226 set("a", 1)
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	227 set("a", 1)
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	228
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	229 set("b", 2)
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	230 set("c", 3)
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	231 set("b", 2)
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	232 set("d", 4, "a", 1)
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	233 set("e", 5, "c", 3)
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	234 end
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	235
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	236 do
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	237 local evicted_key, evicted_value;
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	238 local c3 = cache.new(1, function (_key, _value)
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	239 evicted_key, evicted_value = _key, _value;
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	240 if _key == "a" then
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	241 -- Sanity check for what we're evicting
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	242 assert.are.equal(_key, "a");
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	243 assert.are.equal(_value, 1);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	244 -- We're going to block eviction of this key/value, so set to nil...
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	245 evicted_key, evicted_value = nil, nil;
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	246 -- Returning false to block eviction
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	247 return false
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	248 end
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	249 end);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	250 local function set(k, v, should_evict_key, should_evict_value)
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	251 evicted_key, evicted_value = nil, nil;
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	252 local ret = c3:set(k, v);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	253 assert.are.equal(evicted_key, should_evict_key);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	254 assert.are.equal(evicted_value, should_evict_value);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	255 return ret;
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	256 end
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	257 set("a", 1)
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	258 set("a", 1)
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	259 set("a", 1)
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	260 set("a", 1)
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	261 set("a", 1)
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	262
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	263 -- Our on_evict prevents "a" from being evicted, causing this to fail...
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	264 assert.are.equal(set("b", 2), false, "Failed to prevent eviction, or signal result");
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	265
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	266 expect_kv("a", 1, c3:head());
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	267 expect_kv("a", 1, c3:tail());
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	268
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	269 -- Check the final state is what we expect
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	270 assert.are.equal(c3:get("a"), 1);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	271 assert.are.equal(c3:get("b"), nil);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	272 assert.are.equal(c3:count(), 1);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	273 end
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	274
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	275
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	276 local c4 = cache.new(3, false);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	277
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	278 assert.are.equal(c4:set("a", 1), true);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	279 assert.are.equal(c4:set("a", 1), true);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	280 assert.are.equal(c4:set("a", 1), true);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	281 assert.are.equal(c4:set("a", 1), true);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	282 assert.are.equal(c4:set("b", 2), true);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	283 assert.are.equal(c4:set("c", 3), true);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	284 assert.are.equal(c4:set("d", 4), false);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	285 assert.are.equal(c4:set("d", 4), false);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	286 assert.are.equal(c4:set("d", 4), false);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	287
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	288 expect_kv("c", 3, c4:head());
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	289 expect_kv("a", 1, c4:tail());
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	290
9323 3259653512e7 util.cache tests: Add annotation to fix [luacheck] warning Matthew Wild <mwild1@gmail.com> parents: 8236 diff changeset	291 local c5 = cache.new(3, function (k, v) --luacheck: ignore 212/v
8236 4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	292 if k == "a" then
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	293 return nil;
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	294 elseif k == "b" then
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	295 return true;
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	296 end
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	297 return false;
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	298 end);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	299
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	300 assert.are.equal(c5:set("a", 1), true);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	301 assert.are.equal(c5:set("a", 1), true);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	302 assert.are.equal(c5:set("a", 1), true);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	303 assert.are.equal(c5:set("a", 1), true);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	304 assert.are.equal(c5:set("b", 2), true);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	305 assert.are.equal(c5:set("c", 3), true);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	306 assert.are.equal(c5:set("d", 4), true); -- "a" evicted (cb returned nil)
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	307 assert.are.equal(c5:set("d", 4), true); -- nop
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	308 assert.are.equal(c5:set("d", 4), true); -- nop
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	309 assert.are.equal(c5:set("e", 5), true); -- "b" evicted (cb returned true)
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	310 assert.are.equal(c5:set("f", 6), false); -- "c" won't evict (cb returned false)
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	311
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	312 expect_kv("e", 5, c5:head());
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	313 expect_kv("c", 3, c5:tail());
11366 618ab9bba1c2 util.cache: Add test for :table (fails on Lua 5.1) Kim Alvefur <zash@zash.se> parents: 9323 diff changeset	314
618ab9bba1c2 util.cache: Add test for :table (fails on Lua 5.1) Kim Alvefur <zash@zash.se> parents: 9323 diff changeset	315 end);
618ab9bba1c2 util.cache: Add test for :table (fails on Lua 5.1) Kim Alvefur <zash@zash.se> parents: 9323 diff changeset	316
618ab9bba1c2 util.cache: Add test for :table (fails on Lua 5.1) Kim Alvefur <zash@zash.se> parents: 9323 diff changeset	317 (_VERSION=="Lua 5.1" and pending or it)(":table works", function ()
618ab9bba1c2 util.cache: Add test for :table (fails on Lua 5.1) Kim Alvefur <zash@zash.se> parents: 9323 diff changeset	318 local t = cache.new(3):table();
618ab9bba1c2 util.cache: Add test for :table (fails on Lua 5.1) Kim Alvefur <zash@zash.se> parents: 9323 diff changeset	319 assert.is.table(t);
618ab9bba1c2 util.cache: Add test for :table (fails on Lua 5.1) Kim Alvefur <zash@zash.se> parents: 9323 diff changeset	320 t["a"] = "1";
618ab9bba1c2 util.cache: Add test for :table (fails on Lua 5.1) Kim Alvefur <zash@zash.se> parents: 9323 diff changeset	321 assert.are.equal(t["a"], "1");
618ab9bba1c2 util.cache: Add test for :table (fails on Lua 5.1) Kim Alvefur <zash@zash.se> parents: 9323 diff changeset	322 t["b"] = "2";
618ab9bba1c2 util.cache: Add test for :table (fails on Lua 5.1) Kim Alvefur <zash@zash.se> parents: 9323 diff changeset	323 assert.are.equal(t["b"], "2");
618ab9bba1c2 util.cache: Add test for :table (fails on Lua 5.1) Kim Alvefur <zash@zash.se> parents: 9323 diff changeset	324 t["c"] = "3";
618ab9bba1c2 util.cache: Add test for :table (fails on Lua 5.1) Kim Alvefur <zash@zash.se> parents: 9323 diff changeset	325 assert.are.equal(t["c"], "3");
618ab9bba1c2 util.cache: Add test for :table (fails on Lua 5.1) Kim Alvefur <zash@zash.se> parents: 9323 diff changeset	326 t["d"] = "4";
618ab9bba1c2 util.cache: Add test for :table (fails on Lua 5.1) Kim Alvefur <zash@zash.se> parents: 9323 diff changeset	327 assert.are.equal(t["d"], "4");
618ab9bba1c2 util.cache: Add test for :table (fails on Lua 5.1) Kim Alvefur <zash@zash.se> parents: 9323 diff changeset	328 assert.are.equal(t["a"], nil);
618ab9bba1c2 util.cache: Add test for :table (fails on Lua 5.1) Kim Alvefur <zash@zash.se> parents: 9323 diff changeset	329
618ab9bba1c2 util.cache: Add test for :table (fails on Lua 5.1) Kim Alvefur <zash@zash.se> parents: 9323 diff changeset	330 local i = spy.new(function () end);
618ab9bba1c2 util.cache: Add test for :table (fails on Lua 5.1) Kim Alvefur <zash@zash.se> parents: 9323 diff changeset	331 for k, v in pairs(t) do
618ab9bba1c2 util.cache: Add test for :table (fails on Lua 5.1) Kim Alvefur <zash@zash.se> parents: 9323 diff changeset	332 i(k,v)
618ab9bba1c2 util.cache: Add test for :table (fails on Lua 5.1) Kim Alvefur <zash@zash.se> parents: 9323 diff changeset	333 end
618ab9bba1c2 util.cache: Add test for :table (fails on Lua 5.1) Kim Alvefur <zash@zash.se> parents: 9323 diff changeset	334 assert.spy(i).was_called();
618ab9bba1c2 util.cache: Add test for :table (fails on Lua 5.1) Kim Alvefur <zash@zash.se> parents: 9323 diff changeset	335 assert.spy(i).was_called_with("b", "2");
618ab9bba1c2 util.cache: Add test for :table (fails on Lua 5.1) Kim Alvefur <zash@zash.se> parents: 9323 diff changeset	336 assert.spy(i).was_called_with("c", "3");
618ab9bba1c2 util.cache: Add test for :table (fails on Lua 5.1) Kim Alvefur <zash@zash.se> parents: 9323 diff changeset	337 assert.spy(i).was_called_with("d", "4");
8236 4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	338 end);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	339 end);
4878e4159e12 Port tests to the `busted` test runner Waqas Hussain <waqas20@gmail.com> parents: diff changeset	340 end);

prosody

7e9ebdc75ce4

spec/util_cache_spec.lua

Software / code / prosody

Annotate

spec/util_cache_spec.lua @ 12480:7e9ebdc75ce4

Software `/` code `/` prosody