app.js

var express = require('express');
var request = require('request');
var async = require('async');

// redis
var redis = require("redis");
var url = require('url');
var redisURL = url.parse(process.env.REDISCLOUD_URL);
var redisClient = redis.createClient(redisURL.port, redisURL.hostname, {no_ready_check: true});
redisClient.auth(redisURL.auth.split(":")[1]);

// slack
var Slack = require('slack-client');
var token = 'xoxb-10023260468-Ye69IQtL8pCJNlSOJGbUysKa';
var slack = new Slack(token, true, true);
var slackIncomingToken = 'YCQTpcBsvWVdoUXgvMKlWz48';

// destiny code stuff
var shuffle = require('shuffle-array');
Array.prototype.sample = require('array-sample');
var getHeaders = function(url) {
  return {
    url: 'http://www.bungie.net/Platform/Destiny'+url,
    headers: {
      'X-API-Key': '607f90a5823649b0b3781df292ae5181'
    }
  };
};
var guardianClasses = {'671679327': 'Hunter','2271682572': 'Warlock','3655393761': 'Titan'};
var app = express();

var makeMention = function(userId) {
  return '<@' + userId + '>';
};

var getGamertag = function(text) {
  return text.substring(text.indexOf('[')+1,text.indexOf(']'));
};

var isDirect = function(userId, messageText) {
  var userTag = makeMention(userId);
  return messageText &&
         messageText.length >= userTag.length &&
         messageText.substr(0, userTag.length) === userTag;
};

var getOnlineHumansForChannel = function(channel) {
  if (!channel) return [];

  return (channel.members || [])
      .map(function(id) { return slack.users[id]; })
      .filter(function(u) { return !!u && !u.is_bot && u.presence === 'active'; });
};

var parseSlackMessage = function(trimmedMessage, channel, user){
  var keywords = ["help","characters","grimoire","inventory","destiny code","redbull code","has han"];
  var somethingWorked = false;
  keywords.forEach(function(key){
    if (trimmedMessage.toLowerCase().indexOf(key) >= 0){
      somethingWorked = true;
      switch(key){
        case 'help':
          channel.send(user.name + ', what would you like to know? I can currently assist you with:\n1. Character list\n2. Grimoire score\n3. Destiny codes\n4. Has Han played yet\n5. Inventory list (soon)\n\n'+
            'Make a call using a keyword and the gamertag in brackets.\nExample: What\'s [NightSurgeX2]\'s grimoire score? (grimoire is the keyword)\n'+
            'Example Response: NightSurgeX2\'s grimoire score is 2450\n\nKeywords: ["characters","grimoire","redbull code","destiny code","has han","inventory"]');
          break;
        case 'characters':
          var gamertag = getGamertag(trimmedMessage);
          getMembershipIdByGamertag(gamertag, function(result){
            if (result.Response.length){
              var membershipId = result.Response[0].membershipId;
              request.get(getHeaders('/1/Account/'+membershipId+'/Summary'), function(error, response, body){
                var characters = JSON.parse(response.body).Response.data.characters.map( function(k){
                  return {
                    id: k.characterBase.characterId,
                    classType: guardianClasses[k.characterBase.classHash],
                    level: k.characterLevel,
                    emblem: 'http://www.bungie.net'+k.emblemPath,
                    background: 'http://www.bungie.net'+k.backgroundPath};
                } );
                channel.send(gamertag + "\'s characters are: " + JSON.stringify(characters));
              });
            } else {
              channel.send("It looks like "+gamertag+" doesn't have any characters (or Destiny account, for that matter).");
            }
          });
          break;
        case 'grimoire':
          var gamertag = getGamertag(trimmedMessage);
          getMembershipIdByGamertag(gamertag, function(result){
            if (result.Response.length){
              var membershipId = result.Response[0].membershipId;
              request.get(getHeaders('/Vanguard/Grimoire/1/'+membershipId), function(error, response, body){
                var grimoireScore = JSON.parse(response.body).Response.data.score;
                channel.send(gamertag + "\'s grimoire score is: " + grimoireScore);
              });
            } else {
              channel.send("It looks like "+gamertag+" doesn't have any grimoire (or Destiny account, for that matter).");
            }
          });
          break;
        case 'inventory':
          channel.send('Inventory is still a work in progress.');
          // var gamertag = getGamertag(trimmedMessage);
          // request.get(getHeaders('/SearchDestinyPlayer/1/'+gamertag), function(error, response, body){
          //   var membershipId = JSON.parse(response.body).Response[0].membershipId;
          //   request.get(getHeaders('/1/Account/'+membershipId+'/Summary'), function(error, response, body){
          //     var characters = JSON.parse(response.body).Response.data.characters.map( function(k){
          //       return {id: k.characterBase.characterId, emblem: 'http://www.bungie.net/'+k.emblemPath, background: 'http://www.bungie.net/'+k.backgroundPath};
          //     } );
          //     channel.send(gamertag + "\'s grimoire score is: "+grimoireScore);
          //   });
          // });
          break;
        case 'has han':
          getMembershipIdByGamertag('Vermillion33', function(result){
            var hanPlayed = 'Unfortunatley, no, Han has not graced Destiny with his presence.';
            if (result.Response.length){
              hanPlayed = 'By the beard of Zeus (or Pocket Dave)! Han has finally played Destiny. Let us dance! http://xboxdvr.com/gamer/Tufo/video/8494678#t=9';
            }
            channel.send(hanPlayed);
          });
          break;
        case 'destiny code':
        case 'redbull code':
          var codes = [];
          var numbers = ["3", "4", "7","3", "4", "7","3", "4", "7"];
          var letters = ["C", "K", "F", "H", "L"];
          for(var i=0; i<100; i++){
            var quest = letters.sample(2).concat(numbers.sample(6));
            shuffle(quest);
            codes.push(quest.join(""));
          }
          channel.send('Did someone say Destiny Codes?! Here\'s some for FREE: \n'+ codes.join("\n"));
          break;
        default:
          channel.send("I'm sorry, "+user.name+", I'm too dumb to handle '"+ trimmedMessage+"'");
          break;
      }
    }
  });

  if (!somethingWorked) {
    channel.send("I'm sorry, "+user.name+", I'm too dumb to handle '"+ trimmedMessage+"'");
  }
};

slack.on('open', function () {
  var channels = Object.keys(slack.channels)
      .map(function (k) { return slack.channels[k]; })
      .filter(function (c) { return c.is_member; })
      .map(function (c) { return c.name; });

  var groups = Object.keys(slack.groups)
      .map(function (k) { return slack.groups[k]; })
      .filter(function (g) { return g.is_open && !g.is_archived; })
      .map(function (g) { return g.name; });

  console.log('Welcome to Slack. You are ' + slack.self.name + ' of ' + slack.team.name);

  if (channels.length > 0) {
    console.log('You are in: ' + channels.join(', '));
  }
  else {
    console.log('You are not in any channels.');
  }

  if (groups.length > 0) {
    console.log('As well as: ' + groups.join(', '));
  }
});

slack.on('message', function(message) {
  var channel = slack.getChannelGroupOrDMByID(message.channel);
  var user = slack.getUserByID(message.user);

  if (message.type === 'message' && isDirect(slack.self.id, message.text)) {
    var trimmedMessage = message.text.substr(makeMention(slack.self.id).length).replace(':','').trim();
    var onlineUsers = getOnlineHumansForChannel(channel)
        .filter(function(u) { return u.id != user.id; })
        .map(function(u) { return makeMention(u.id); });

    parseSlackMessage(trimmedMessage, channel, user);
  }
});

slack.login();

//-------------------------------------------------------------------
//-------------------------------------------------------------------
var getMembershipIdByGamertag = function(gamertag, callback){
  var membershipId;
  redisClient.get("membership_id_"+gamertag, function (err, reply) {
    // console.log("Error: "+ err + "\nReply: "+ reply);
    if (reply){
      membershipId = reply.toString();
    }
    if(!(!!membershipId)){
      request.get(getHeaders('/SearchDestinyPlayer/1/'+gamertag), function(error, response, body){
        membershipId = JSON.parse(response.body);
        redisClient.set("membership_id_"+gamertag, JSON.stringify(membershipId), function(err, reply){
          // console.log("Error: "+ err + "\nReply: "+ reply);

          redisClient.expire("membership_id_"+gamertag, 300);
          callback(membershipId);
        });
      });
    } else {
      callback(membershipId);
    }
  });
};

app.get('/', function (req, res) {
  res.send('Hello World!');
});

app.get('/guardian/:gamertag', function (req, res) {
  var membershipId;
  getMembershipIdByGamertag(req.params.gamertag, function(result){
    res.send(result);
  });
});

app.get('/guardian/:gamertag/grimoire', function (req, res) {
  var membershipId = '';
  getMembershipIdByGamertag(req.params.gamertag, function(result){
    if (JSON.parse(result).Response.length){
      membershipId = JSON.parse(result).Response[0].membershipId;
      request.get(getHeaders('/Vanguard/Grimoire/1/'+membershipId), function(error, response, body){
        var grimoireScore = JSON.parse(response.body).Response.data.score;
        res.send("Your score is: "+grimoireScore);
      });
    } else {
      res.send("It looks like "+req.params.gamertag+" doesn't have any grimoire (or Destiny account, for that matter).");
    }
  });
});

var server = app.listen(process.env.PORT || 3002, function () {
  var host = server.address().address;
  var port = server.address().port;

  console.log('Example app listening at http://%s:%s', host, port);
});