1# frozen_string_literal: true
2
3require "simplecov"
4SimpleCov.start do
5 add_filter "/test/"
6 enable_coverage :branch
7end
8
9require "em_promise"
10require "fiber"
11require "minitest/autorun"
12require "rantly/minitest_extensions"
13require "sentry-ruby"
14require "webmock/minitest"
15begin
16 require "pry-rescue/minitest"
17 require "pry-reload"
18
19 module Minitest
20 class Test
21 alias old_capture_exceptions capture_exceptions
22 def capture_exceptions
23 old_capture_exceptions do
24 yield
25 rescue Minitest::Skip => e
26 failures << e
27 end
28 end
29 end
30 end
31rescue LoadError
32 # Just helpers for dev, no big deal if missing
33 nil
34end
35
36require "backend_sgx"
37require "tel_selections"
38
39$VERBOSE = nil
40Sentry.init
41
42def customer(
43 customer_id="test",
44 plan_name: nil,
45 jid: Blather::JID.new("#{customer_id}@example.net"),
46 expires_at: Time.now,
47 auto_top_up_amount: 0,
48 **kwargs
49)
50 plan = CustomerPlan.for(
51 customer_id,
52 plan_name: plan_name,
53 expires_at: expires_at,
54 auto_top_up_amount: auto_top_up_amount
55 )
56 Customer.new(customer_id, jid, plan: plan, **kwargs)
57end
58
59CONFIG = {
60 sgx: "sgx",
61 component: {
62 jid: "component"
63 },
64 creds: {
65 account: "test_bw_account",
66 username: "test_bw_user",
67 password: "test_bw_password"
68 },
69 notify_from: "notify_from@example.org",
70 activation_amount: 1,
71 activation_amount_accept: 1,
72 plans: [
73 {
74 name: "test_usd",
75 currency: :USD,
76 monthly_price: 10000,
77 messages: :unlimited,
78 minutes: { included: 10440, price: 87 }
79 },
80 {
81 name: "test_bad_currency",
82 currency: :BAD
83 },
84 {
85 name: "test_cad",
86 currency: :CAD,
87 monthly_price: 10000
88 }
89 ],
90 braintree: {
91 merchant_accounts: {
92 USD: "merchant_usd"
93 }
94 },
95 sip: {
96 realm: "sip.example.com",
97 app: "sipappid"
98 },
99 credit_card_url: ->(*) { "http://creditcard.example.com" },
100 electrum_notify_url: ->(*) { "http://notify.example.com" },
101 upstream_domain: "example.net",
102 approved_domains: {
103 "approved.example.com": nil,
104 "refer.example.com": "refer_to"
105 }
106}.freeze
107
108def panic(e)
109 raise e
110end
111
112LOG = Class.new {
113 def child(*)
114 Minitest::Mock.new
115 end
116}.new.freeze
117
118BLATHER = Class.new {
119 def <<(*); end
120}.new.freeze
121
122def execute_command(
123 iq=Blather::Stanza::Iq::Command.new.tap { |i| i.from = "test@example.com" },
124 blather: BLATHER,
125 &blk
126)
127 Command::Execution.new(
128 Minitest::Mock.new,
129 blather,
130 :to_s.to_proc,
131 iq
132 ).execute(&blk).sync
133end
134
135class Matching
136 def initialize(&block)
137 @block = block
138 end
139
140 def ===(other)
141 @block.call(other)
142 end
143end
144
145class PromiseMock < Minitest::Mock
146 def then(succ=nil, _=nil)
147 if succ
148 succ.call(self)
149 else
150 yield self
151 end
152 end
153end
154
155class FakeTelSelections
156 def initialize
157 @selections = {}
158 end
159
160 def set(jid, tel)
161 @selections[jid] = EMPromise.resolve(TelSelections::HaveTel.new(tel))
162 end
163
164 def delete(jid)
165 @selections.delete(jid)
166 EMPromise.resolve("OK")
167 end
168
169 def [](jid)
170 @selections.fetch(jid) do
171 TelSelections::ChooseTel.new
172 end
173 end
174end
175
176class FakeRedis
177 def initialize(values={})
178 @values = values
179 end
180
181 def set(key, value)
182 @values[key] = value
183 EMPromise.resolve("OK")
184 end
185
186 def setex(key, _expiry, value)
187 set(key, value)
188 end
189
190 def mget(*keys)
191 EMPromise.all(keys.map(&method(:get)))
192 end
193
194 def get(key)
195 EMPromise.resolve(@values[key])
196 end
197
198 def getbit(key, bit)
199 get(key).then { |v| v.to_i.to_s(2)[bit].to_i }
200 end
201
202 def hget(key, field)
203 @values.dig(key, field)
204 end
205
206 def hincrby(key, field, incrby)
207 @values[key] ||= {}
208 @values[key][field] ||= 0
209 @values[key][field] += incrby
210 end
211
212 def sadd(key, member)
213 @values[key] ||= Set.new
214 @values[key] << member
215 end
216
217 def srem(key, member)
218 @values[key].delete(member)
219 end
220
221 def scard(key)
222 @values[key]&.size || 0
223 end
224
225 def expire(_, _); end
226
227 def exists(*keys)
228 EMPromise.resolve(
229 @values.select { |k, _| keys.include? k }.size
230 )
231 end
232
233 def lindex(key, index)
234 get(key).then { |v| v&.fetch(index) }
235 end
236end
237
238class FakeDB
239 class MultiResult
240 def initialize(*args)
241 @results = args
242 end
243
244 def to_a
245 @results.shift
246 end
247 end
248
249 def initialize(items={})
250 @items = items
251 end
252
253 def query_defer(_, args)
254 EMPromise.resolve(@items.fetch(args, []).to_a)
255 end
256
257 def query_one(_, *args, field_names_as: :symbol, default: nil)
258 row = @items.fetch(args, []).to_a.first
259 row = row.transform_keys(&:to_sym) if row && field_names_as == :symbol
260 EMPromise.resolve(row || default)
261 end
262end
263
264class FakeLog
265 def initialize
266 @logs = []
267 end
268
269 def respond_to_missing?(*)
270 true
271 end
272
273 def method_missing(*args)
274 @logs << args
275 end
276end
277
278class FakeIBRRepo
279 def initialize(registrations={})
280 @registrations = registrations
281 end
282
283 def registered?(jid, from:)
284 @registrations.dig(jid.to_s, from.to_s) || false
285 end
286end
287
288module EventMachine
289 class << self
290 # Patch EM.add_timer to be instant in tests
291 alias old_add_timer add_timer
292 def add_timer(*args, &block)
293 args[0] = 0
294 old_add_timer(*args, &block)
295 end
296 end
297end
298
299module Minitest
300 class Test
301 def self.property(m, &block)
302 define_method("test_#{m}") do
303 property_of(&block).check { |args| send(m, *args) }
304 end
305 end
306
307 def self.em(m)
308 alias_method "raw_#{m}", m
309 define_method(m) do
310 EM.run do
311 Fiber.new {
312 begin
313 send("raw_#{m}")
314 ensure
315 EM.stop
316 end
317 }.resume
318 end
319 end
320 end
321 end
322end