tweaked the speak script so that it works with the newer OAuth token format, couldn't figure out how to run tests opened issue #801

Author: Chris DaMour

src/scripts/speak.coffee

@@ -5,7 +5,8 @@
 #   None
 #
 # Configuration:
-#   HUBOT_MSTRANSLATE_APIKEY
+#   HUBOT_MSTRANSLATE_CLIENT_ID
+#   HUBOT_MSTRANSLATE_CLIENT_SECRET
 #
 # Commands:
 #   speak me <phrase> - Detects the language 'phrase' is written in, then sends back a spoken version of that phrase
@@ -16,32 +17,53 @@
 module.exports = (robot) ->
   robot.hear /(speak)( me)? (.*)/i, (msg) ->
     term   = "\"#{msg.match[3]}\""
-    apiKey = process.env.HUBOT_MSTRANSLATE_APIKEY
+    clientId = process.env.HUBOT_MSTRANSLATE_CLIENT_ID
+    clientSecret = process.env.HUBOT_MSTRANSLATE_CLIENT_SECRET
     langs = ["en"]
 
+    #MS changed their token service, have to use this oauth thing see http://msdn.microsoft.com/en-us/library/hh454950.aspx
+    tokenService = "https://datamarket.accesscontrol.windows.net/v2/OAuth2-13"
+    tokenScope = "http://api.microsofttranslator.com"
     getLanguagesForSpeak = "http://api.microsofttranslator.com/V2/Ajax.svc/GetLanguagesForSpeak"
     detect = "http://api.microsofttranslator.com/V2/Ajax.svc/Detect"
     speak = "http://api.microsofttranslator.com/V2/Ajax.svc/Speak"
 
-    unless apiKey
-      msg.send "MS Translate API key isn't set, get a key at http://www.bing.com/developers/appids.aspx"
-      msg.send "Then, set the HUBOT_MSTRANSLATE_APIKEY environment variable"
+    unless clientId
+      msg.send "MS Translate Client ID isn't set, follow steps at http://msdn.microsoft.com/en-us/library/hh454950.aspx"
+      msg.send "Then, set the HUBOT_MSTRANSLATE_CLIENT_ID environment variable"
       return
 
-    msg.http(getLanguagesForSpeak)
-      .query({ appId: apiKey })
-      .get() (err, res, body) ->
-        langs = eval(body) unless err
+    unless clientSecret
+      msg.send "MS Translate Client Secret isn't set, follow steps at http://msdn.microsoft.com/en-us/library/hh454950.aspx"
+      msg.send "Then, set the HUBOT_MSTRANSLATE_CLIENT_SECRET environment variable"
+      return
+
+    clientId = encodeURIComponent(clientId)
+    clientSecret  = encodeURIComponent(clientSecret)
 
-        msg.http(detect)
-          .query({appId: apiKey, text: term})
+    msg.http(tokenService)
+      .header('Content-Type', 'application/x-www-form-urlencoded')
+      #can you do this by passing in an object literal? i tried but it didn't work...
+      .post( "client_id=#{clientId}&client_secret=#{clientSecret}&scope=#{tokenScope}&grant_type=client_credentials") (err, res, body) ->
+        parsedBody = JSON.parse(body)
+        if err or parsedBody.error
+          msg.send "Unable to get token, #{err or parsedBody.error_description}"
+          return
+        accessToken = "Bearer " + parsedBody.access_token 
+        msg.http(getLanguagesForSpeak)
+          .query({ appId: accessToken })
           .get() (err, res, body) ->
-            if err or (langs.indexOf(eval(body)) == -1)
-              msg.send "Sorry, I can't speak #{err or eval(body)}"
-              return
-            lang = eval(body)
+            langs = eval(body) unless err
 
-            msg.http(speak)
-              .query({ appId: apiKey, text: term, language: lang, format: "audio/wav" })
+            msg.http(detect)
+              .query({appId: accessToken, text: term})
               .get() (err, res, body) ->
-                msg.send(eval(body)) unless err
+                if err or (langs.indexOf(eval(body)) == -1)
+                  msg.send "Sorry, I can't speak #{err or eval(body)}"
+                  return
+                lang = eval(body)
+
+                msg.http(speak)
+                  .query({ appId: accessToken, text: term, language: lang, format: "audio/wav" })
+                  .get() (err, res, body) ->
+                    msg.send(eval(body)) unless err