1 // (c) Bernhard Tittelbach, 2013
7 pubsub "github.com/tuxychandru/pubsub"
12 r3events "svn.spreadspace.org/realraum/go.svn/r3events"
15 type SpaceState struct {
17 buttonpress_until int64
23 xmpp_presence_events_chan_ chan interface{}
24 xmpp_login_ struct {jid string; pass string}
25 xmpp_bot_authstring_ string
26 xmpp_state_save_dir_ string
27 r3eventssub_port_ string
28 button_press_timeout_ int64 = 3600
29 brain_connect_addr_ string
30 enable_syslog_, enable_debug_ bool
36 flag.StringVar(&xmpp_login_.jid, "xjid", "realrauminfo@realraum.at/Tuer", "XMPP Bot Login JID")
37 flag.StringVar(&xmpp_login_.pass, "xpass", "", "XMPP Bot Login Password")
38 flag.StringVar(&xmpp_bot_authstring_, "xbotauth", "", "String that user use to authenticate themselves to the bot")
39 flag.StringVar(&xmpp_state_save_dir_,"xstatedir","/flash/var/lib/r3netstatus/", "Directory to save XMPP bot state in")
40 flag.StringVar(&r3eventssub_port_, "eventsubport", "tcp://wuzzler.realraum.at:4244", "zmq address to subscribe r3events")
41 flag.StringVar(&brain_connect_addr_, "brainconnect", "tcp://wuzzler.realraum.at:4245", "address to ask about most recent stored events")
42 flag.BoolVar(&enable_syslog_, "syslog", false, "enable logging to syslog")
43 flag.BoolVar(&enable_debug_, "debug", false, "enable debug output")
49 func IfThenElseStr(c bool, strue, sfalse string) string {
50 if c {return strue} else {return sfalse}
53 func composeDoorLockMessage(locked bool, doorcmd r3events.DoorCommandEvent, ts int64) string {
54 if ts - doorcmd.Ts < 30 {
55 if len(doorcmd.Who) == 0 || doorcmd.Who == "-" {
56 return fmt.Sprintf("The frontdoor was %s by %s at %s.", IfThenElseStr(locked, "locked","unlocked"), doorcmd.Using, time.Unix(ts,0).String())
58 return fmt.Sprintf("%s %s the frontdoor by %s at %s.",doorcmd.Who, IfThenElseStr(locked, "locked","unlocked"), doorcmd.Using, time.Unix(ts,0).String())
61 return fmt.Sprintf("The frontdoor was %s manually at %s.", IfThenElseStr(locked, "locked","unlocked"), time.Unix(ts,0).String())
65 func EventToXMPP(ps *pubsub.PubSub, xmpp_presence_events_chan_ chan <- interface{}) {
66 events := ps.Sub("presence","door","buttons","updateinterval")
69 if x := recover(); x != nil {
70 Syslog_.Printf("handleIncomingXMPPStanzas: run time panic: %v", x)
71 ps.Unsub(events, "presence","door","buttons","updateinterval")
72 close(xmpp_presence_events_chan_)
76 var present bool = false
77 var last_buttonpress int64 = 0
78 var last_door_cmd r3events.DoorCommandEvent;
79 button_msg := "Dooom ! The button has been pressed ! Propably someone is bored and in need of company ! ;-)"
80 present_status := r3xmppbot.XMPPStatusEvent{r3xmppbot.ShowOnline,"Somebody is present"}
81 notpresent_status := r3xmppbot.XMPPStatusEvent{r3xmppbot.ShowNotAvailabe,"Nobody is here"}
82 button_status := r3xmppbot.XMPPStatusEvent{r3xmppbot.ShowFreeForChat, "The button has been pressed :-)"}
84 xmpp_presence_events_chan_ <- r3xmppbot.XMPPStatusEvent{r3xmppbot.ShowNotAvailabe, "Nobody is here"}
86 for eventinterface := range(events) {
87 Debug_.Printf("event2xmpp: %T %+v", eventinterface, eventinterface)
88 switch event := eventinterface.(type) {
89 case r3events.PresenceUpdate:
90 present = event.Present
92 xmpp_presence_events_chan_ <- present_status
94 xmpp_presence_events_chan_ <- notpresent_status
96 case r3events.DoorCommandEvent:
98 xmpp_presence_events_chan_ <- fmt.Sprintln("DoorCommand:",event.Command, "using", event.Using, "by", event.Who, time.Unix(event.Ts,0))
99 case r3events.DoorLockUpdate:
100 xmpp_presence_events_chan_ <- r3xmppbot.XMPPMsgEvent{Msg: composeDoorLockMessage(present, last_door_cmd, event.Ts), DistributeLevel: r3xmppbot.R3OnlineOnlyInfo, RememberAsStatus: true}
101 case r3events.DoorAjarUpdate:
102 xmpp_presence_events_chan_ <- r3xmppbot.XMPPMsgEvent{Msg: fmt.Sprintf("Frontdoor is %s (%s)",IfThenElseStr(event.Shut,"now shut.","ajar."),time.Unix(event.Ts,0).String()), DistributeLevel: r3xmppbot.R3DebugInfo, RememberAsStatus: false}
103 case r3events.BackdoorAjarUpdate:
104 xmpp_presence_events_chan_ <- r3xmppbot.XMPPMsgEvent{Msg: fmt.Sprintf("Backdoor is %s (%s)",IfThenElseStr(event.Shut,"now shut.","ajar!"),time.Unix(event.Ts,0).String()), DistributeLevel: r3xmppbot.R3OnlineOnlyInfo, RememberAsStatus: false}
105 case r3events.BoreDoomButtonPressEvent:
106 xmpp_presence_events_chan_ <- r3xmppbot.XMPPMsgEvent{Msg: button_msg, DistributeLevel: r3xmppbot.R3OnlineOnlyInfo}
107 xmpp_presence_events_chan_ <- button_status
108 last_buttonpress = event.Ts
109 case r3events.TimeTick:
110 if present && last_buttonpress > 0 && time.Now().Unix() - last_buttonpress > button_press_timeout_ {
111 xmpp_presence_events_chan_ <- present_status
118 func ParseZMQr3Event(lines [][]byte, ps *pubsub.PubSub) {
119 evnt, pubsubcat, err := r3events.UnmarshalByteByte2Event(lines)
120 Debug_.Printf("ParseZMQr3Event: %s %s %s", evnt, pubsubcat, err)
121 if err != nil { return }
122 ps.Pub(evnt, pubsubcat)
126 if enable_syslog_ { LogEnableSyslog(); r3xmppbot.LogEnableSyslog() }
127 if enable_debug_ { LogEnableDebuglog(); r3xmppbot.LogEnableDebuglog() }
128 Syslog_.Print("started")
129 defer Syslog_.Print("exiting")
130 zmqctx, zmqsub := ZmqsInit(r3eventssub_port_)
132 if zmqsub != nil {defer zmqsub.Close()}
134 panic("zmq sockets must not be nil !!")
138 var bot *r3xmppbot.XmppBot
139 bot, xmpp_presence_events_chan_, xmpperr = r3xmppbot.NewStartedBot(xmpp_login_.jid, xmpp_login_.pass, xmpp_bot_authstring_, xmpp_state_save_dir_, true)
143 //~ brn := brain.New()
144 //~ defer brn.Shutdown()
149 go EventToXMPP(ps, xmpp_presence_events_chan_)
152 fmt.Println("XMPP Bot disabled")
153 Syslog_.Printf("XMPP Bot disabled due to error: %s", xmpperr.Error())
156 // --- get update on most recent events ---
157 answ := ZmqsAskQuestionsAndClose(zmqctx, brain_connect_addr_, [][][]byte{[][]byte{[]byte("DoorCommandEvent")}, [][]byte{[]byte("DoorLockUpdate")}, [][]byte{[]byte("DoorAjarUpdate")}, [][]byte{[]byte("PresenceUpdate")}, [][]byte{[]byte("IlluminationSensorUpdate")}, [][]byte{[]byte("TempSensorUpdate")}})
158 for _, a := range(answ) {
159 ParseZMQr3Event(a, ps)
162 // --- receive and distribute events ---
163 ticker := time.NewTicker(time.Duration(7) * time.Minute)
166 case e := <-zmqsub.In():
167 ParseZMQr3Event(e, ps) //, brn)
169 ps.Pub(r3events.TimeTick{time.Now().Unix()}, "updateinterval")