app.rb

require 'rubygems'
require 'sinatra'
require 'twilio-ruby'
require 'json/ext'
require 'mongoid'

# Create new app of type Sinatra
class MyApp < Sinatra::Base
  
  # CORS
  before do
     content_type :json    
     headers 'Access-Control-Allow-Origin' => '*', 
             'Access-Control-Allow-Methods' => ['OPTIONS', 'GET', 'POST'],
             'Access-Control-Allow-Headers' => 'Content-Type'  
  end

  set :protection, false
  
  # Load mongoHQ credentials from the mongoid.yml file
  Mongoid.load!("mongoid.yml")
  
  # Create MongoDB collection
  class Message
    include Mongoid::Document
    field :from
    field :to
    field :body
    field :time, type: Time, default: ->{ Time.now }
  end
  
  class Contact
    include Mongoid::Document
    field :sender
    field :receiver
    field :nickname
  end
  
  # Twilio Ruby Gem Credentials
  account_sid   = "AC5e0e37adaf556c3ef136e9ba71536c74"
  auth_token    = "f5ca2a5df3edfbf3c1f81014d11de97b"
  $client       = Twilio::REST::Client.new account_sid, auth_token
  $twilioNumber = "+17606421123" # Anthony's Twilio number

  
  def create_contact(params)
    # do not allow duplicates here
    contact = Contact.new(
      sender: params[:From][2..11],
      receiver: params[:Body].split(" ")[1],
      nickname: params[:Body].split(" ")[2].downcase
    )
    contact.upsert
  end
  
  def send_to_contact(params)
    fromNumber = params[:From][2..11]
    nickname   = params[:Body].split(" ")[0].downcase
    toNumber   = Contact.where(sender: fromNumber, nickname: nickname[1..nickname.length-1]).first[:receiver]
    body       = params[:Body]
    body.slice! /^\S+\s+/
    
    send(toNumber, body)
    save_message(toNumber, fromNumber, body)
  end
  
  def send_to_number(params)
    fromNumber = params[:From][2..11]
    body       = params[:Body]
    toNumber   = extract_phone_number(params[:Body])
    ###### SEVERE ISSUE HERE ######
    # This is only slicing up to the first space, it needs to slice up to the first 
    body.slice! /^\S+\s+/
    
    send(toNumber, body)
    save_message(toNumber, fromNumber, body)
  end
  
  def respond(params)
    fromNumber = params[:From][2..11]
    body       = params[:Body]
    
    #Find latest message sent to you
    sender = Message.where(to: fromNumber).asc(:time).last
    
    puts "fromNumber #{fromNumber}"
    puts "sender: #{sender}"

    if !sender.nil?
      send(sender[:from], body)
      save_message(sender[:from], fromNumber, body)
    else
      # This person doesn't know what they're doing
      puts "========= BEGIN - RESPONSE FROM SOMEONE WHO DOESN'T KNOW WHAT'S GOING ON ==========="
      puts fromNumber
      puts body
      puts "========= END  -  RESPONSE FROM SOMEONE WHO DOESN'T KNOW WHAT'S GOING ON ==========="
      # return error to sender
    end
  end
  
  def send(toNumber, body)
    # Check to see if the body is just a URL, then send them the image if it is
    if(body =~ URI::regexp)
      # We're working with a URL
      send_mms(toNumber, body)
    else
      # Great, we have a properly formed messaged. Send it
      send_sms(toNumber, body)
    end
  end
  
  def send_mms(toNumber, body)
    $client.account.messages.create(
      :from     => $twilioNumber,
      :to       => toNumber,
      :MediaUrl => body
    )
  end
  
  def send_sms(toNumber, body)
    $client.account.messages.create(
        :from => $twilioNumber,
        :to   => toNumber,
        :body => body
    )
  end
  
  def save_message(toNumber, fromNumber, body)
    Message.create(
        to: toNumber,
        from: fromNumber,
        body: body
    )
  end
  
  # create a duplicate of the body and send it into this method
  def extract_phone_number(input)
    firstCharIndex = input =~ /[a-zA-Z#]/
    number         = input[0..firstCharIndex-1]
    return clean_phone_number(number)
  end
  
  def clean_phone_number(input)
    if input.gsub(/\D/, "").match(/^1?(\d{3})(\d{3})(\d{4})/)
      [$1, $2, $3].join()
    end
  end
  
  # GET route at root. Messages sent here will be forwarded to specified 
  # destination number. 
  get '/' do
    
    keyword = params[:Body].split(" ")[0]
    
    # Make method calls based on the first keyword
    if keyword.downcase == "setcontact"
      create_contact(params)
      
    elsif keyword[0] == '#'
      send_to_contact(params)
      
    elsif extract_phone_number(params[:Body]).length == 10
      send_to_number(params)
      
    else
      respond(params)
      puts "Keywork that broke shit: #{keyword}"
      puts "Params that broke shit: #{params}"
    end
  end
  
  # GET return all the messages
  get '/messages/?' do
    content_type :json
    messages = Message.all
    messages.to_json
  end
  
end