-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathrsb-transport-spread.asd
94 lines (71 loc) · 3.68 KB
/
rsb-transport-spread.asd
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
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
;;;; rsb-transport-spread.asd --- System containing the Spread-based transport.
;;;;
;;;; Copyright (C) 2011-2018 Jan Moringen
;;;;
;;;; Author: Jan Moringen <[email protected]>
#.(unless (find-package '#:rsb-system)
(load (merge-pathnames "rsb.asd" *load-truename*))
(values))
(cl:in-package #:rsb-system)
(defparameter *spread-port*
(or (let ((value (uiop:getenv "SPREAD_PORT")))
(when value (read-from-string value)))
5678))
(defsystem "rsb-transport-spread"
:description "RSB transport based on the Spread group communication system."
:license "LGPLv3" ; see COPYING file for details.
:author "Jan Moringen <[email protected]>"
:maintainer "Jan Moringen <[email protected]>"
:version #.(version/string)
:depends-on ("nibbles"
"ironclad"
"cl-protobuf"
(:version "network.spread" "0.3")
(:version "rsb" #.(version/string :revision? t))
(:version "rsb-protocol" #.(version/string :revision? t)))
:components ((:module "spread"
:pathname "src/transport/spread"
:serial t
:components ((:file "package")
(:file "notifications")
(:file "conditions")
(:file "protocol")
(:file "util")
(:file "fragmentation")
(:file "conversion")
(:file "transport")
(:file "connection")
(:file "sender-receiver")
(:file "bus-mixins")
(:file "bus")
(:file "connector")
(:file "in-connector")
(:file "in-push-connector")
(:file "in-pull-connector")
(:file "out-connector"))))
:in-order-to ((test-op (test-op "rsb-transport-spread/test"))))
(defsystem "rsb-transport-spread/test"
:description "Unit tests for the rsb-transport-spread system."
:license "LGPLv3" ; see COPYING file for details.
:author "Jan Moringen <[email protected]>"
:maintainer "Jan Moringen <[email protected]>"
:version #.(version/string)
:depends-on ((:version "lift" "1.7.1")
(:version "rsb" #.(version/string))
(:version "rsb-transport-spread" #.(version/string))
(:version "rsb/test" #.(version/string)))
:components ((:module "spread"
:pathname "test/transport/spread"
:serial t
:components ((:file "package")
(:file "util")
(:file "fragmentation")
(:file "connection")
(:file "sender-receiver")
(:file "connectors"))))
:perform (test-op (operation component)
(eval (read-from-string "(log:config :warn)")) ; less noise
(eval (read-from-string
"(network.spread.daemon:with-daemon (:port rsb-system::*spread-port*)
(lift:run-tests :config (lift::lift-relative-pathname
\"lift-transport-spread.config\")))"))))