if !has('python')echo "Sorry, Microsoft Translator requires python support"finish
endifpython << EOFimport json
import string
import time
import urllib
import urllib2
import xml.dom.minidom
import vimclass MicrosoftTranslator:def __init__(self, client_id, client_secret):self.client_id = client_idself.client_secret = client_secretself.from_lang = Noneself.access_token = Noneself.token_expires_at = 0.0self.to_lang = 'zh-CHS'self.__renew_access_token()def __generate_auth_params(self):auth_params = {'grant_type': 'client_credentials','scope': 'http://api.microsofttranslator.com','client_id' : self.client_id,'client_secret' : self.client_secret}return urllib.urlencode(auth_params)def __renew_access_token(self):auth_url = 'https://datamarket.accesscontrol.windows.net/v2/OAuth2-13'try:resp = urllib2.urlopen(auth_url, self.__generate_auth_params())resp_json = json.loads(resp.read())self.access_token = resp_json['access_token']self.token_expires_at = time.time() + string.atof(resp_json['expires_in'])except urllib2.URLError, e:print "Error: %s" % (e.reason)def __current_access_token(self):if time.time() > self.token_expires_at:self.__renew_access_token()return self.access_tokendef set_lang(self, to_lang, from_lang=None):self.from_lang = from_langself.to_lang = to_langdef translate(self, text):url = 'http://api.microsofttranslator.com/v2/Http.svc/Translate?'data = {'text': text,'to': self.to_lang,}if self.from_lang != None:data['from'] = self.from_langtry:request = urllib2.Request(url + urllib.urlencode(data))request.add_header('Authorization', 'Bearer ' + self.__current_access_token())response = urllib2.urlopen(request)dom = xml.dom.minidom.parseString(response.read())result = dom.documentElement.childNodes[0].nodeValuereturn resultexcept urllib2.URLError, e:errinfo = "Error: %s" % (e.reason)return errinfo
EOFif exists('g:MSTranslator_ID') && exists('g:MSTranslator_SECRET')python << EOF
tr = MicrosoftTranslator(vim.eval('g:MSTranslator_ID'), vim.eval('g:MSTranslator_SECRET'))
EOFfunction! s:Translate(text)
python << EOF
print tr.translate(vim.eval("a:text"))
EOF
endfunctionfunction! TranslateCWORD()call s:Translate(expand("<cword>"))
endfunctionfunction! TranslateVISUAL()call s:Translate(getline("'<")[getpos("'<")[2]-1:getpos("'>")[2]-1])
endfunctionfunction! TranslateEOL()call s:Translate(strpart(getline("."), col(".")-1))
endfunctionendif