#!/usr/bin/env ruby

require 'openssl'
require 'securerandom'
require 'sinatra'

set :port, 4568

Service = "Mail"
ServicePassword = "{FvM<kgG}VpHxKJO;6Zo"

def decrypt(ticket)
  ticket = [ticket].pack("H*").unpack("C*").pack("c*")
  cipher = OpenSSL::Cipher::AES.new(256, :CBC).decrypt
  cipher.key = Digest::SHA2.digest(ServicePassword)
  p = cipher.update(ticket) + cipher.final
  p.split(?\0)
end

post '/login' do
  request.body.rewind
  data = JSON.parse(request.body.read)
  next "Invalid request\n" unless data.keys.sort == %w(ticket username)
  un, ws, sn = decrypt(data["ticket"])
  next "Invalid ticket\n" unless sn == Service
  next "Invalid ticket\n" unless un == data["username"]
  next "Invalid ticket\n" unless ws == request.ip
  "Login okay! You have no mail.\n"
end