poke/lib/server.rb

require 'fileutils'

class Server < Routes

  enable :logging
  disable :show_exceptions
  
  get '/sinatra' do
    return 'sinatra running'
  end

  get '/proxied' do
    return haml :proxied
  end
  
  get '/pseudo' do
    return Client.new.hit 'get',
                          'http://localhost:4567/proxied',
                          { 'Accept' => 'text/html' }
  end
  
  get '/api/json/masked' do
    puts request.env['HTTP_AUTHORIZATION']
    return '{"result":"masked"}'
  end
  
  get '/page/masked' do
    Fx::pipe({ 'Accept'        => 'application/json',
               'Authorization' => "Bearer #{request.cookies['token']}" },
             -> (t) {
               Client.new.hit 'get',
                              'http://localhost:4567/api/json/masked',
                              t
             },
             -> (t) {
               haml :page,
                    {
                      locals: {
                        data: t
                      }
                    }
             })
  end
  
  get '/upload' do
    haml :upload
  end
  
  post '/upload' do
    puts params
    FileUtils.copy(params[:data][:tempfile],
                   "#{Dir.pwd}/upload.tmp")
    return 'OK'
  end

  get '/uploads' do
    Fx::pipe(Dir.pwd.concat('/upload.*'),
             -> (t) { Dir.glob(t) },
             -> (t) {
               t.each { |f| File.delete f }
               haml :uploads, {
                      locals: {
                        data: t
                      }
                    }
             })
  end  
end