RemoteEdit

local event  = require 'event'
local bridge = require 'stem'
local server = bridge.connect('stem.fomalhaut.me', 5733)

server:subscribe 'oo-editor'

local _, _, file = event.pull 'stem_message'

local function read_file()
  local handle = io.open(file)
  local d = handle:read('*a')
  handle:close()
  return d
end

local function edit_file(_, _, file_text)
  if not file_text then return end
  if file_text:sub(1, 5) == '$STOP' then
    server:disconnect()
    print('Stem disconnected')

    return false
  end

  local handle = io.open(file, 'w')
  handle:write(file_text)
  handle:close()

  server:send('oo-editor', read_file())
end

server:send('oo-editor', read_file())

print('Stem connected')
event.listen('stem_message', edit_file)