一区二区三区在线-一区二区三区亚洲视频-一区二区三区亚洲-一区二区三区午夜-一区二区三区四区在线视频-一区二区三区四区在线免费观看

腳本之家,腳本語言編程技術及教程分享平臺!
分類導航

Python|VBS|Ruby|Lua|perl|VBA|Golang|PowerShell|Erlang|autoit|Dos|bat|

服務器之家 - 腳本之家 - Erlang - Erlang實現(xiàn)的百度云推送Android服務端實例

Erlang實現(xiàn)的百度云推送Android服務端實例

2020-05-26 11:02腳本之家 Erlang

這篇文章主要介紹了Erlang實現(xiàn)的百度云推送Android服務端實例,本文先是講解了實現(xiàn)步驟,然后給出實現(xiàn)代碼,需要的朋友可以參考下

百度云推送官方地址http://developer.baidu.com/wiki/index.php?title=docs/cplat/push

簡單的介紹下原理:

  百度云推送支持IOS和Android的云推送。Android支持的還不錯,但是IOS一般很難調通。百度云對于IOS的推送來說,他只是做了一個中間的代理,為用戶提供接口,優(yōu)點是使用百度云推送,Android和IOS可以統(tǒng)一管理;缺點是:調通不容易,用戶的IOS證書需要上傳驗證,會直接暴露給第三方,并且IOS的apns支持用戶自己構建provider服務器,與apns直接通信。

  個人建議:Android使用百度云推送,IOS的使用自己構建的provider與IOS的apns直接通信。與IOS的apns直接通信有許多實現(xiàn),Java、PHP、object-c、c++,在我的博客中有一篇是使用erlang實現(xiàn)的,有興趣的可以看看。

  Android實現(xiàn)推送功能百度云有自己的demo,大家可以根據官網(http://developer.baidu.com/wiki/index.php?title=docs/cplat/push)的步驟,首先注冊一個百度開發(fā)者賬號,然后創(chuàng)建自己的一個應用,根據例子百度云服務器會自己生產一個客戶端的demo,可以運行在Android的手機上。然后在頁面進行推送實驗。當然也可以下載百度云推送服務器,然后通過運行使用服務器推送,官網中有php、Java、Python、node.js、c#實現(xiàn)。

  鑒于需要,個人使用erlang實現(xiàn)的服務端推送功能。

  步驟:1、首先將上面你建立的工程中百度云服務器為你生產的例子demo安裝到手機上,然后以自己注冊的開發(fā)者賬號登陸,里面有一個userid和channelId,channelId記錄下來,UserId和開發(fā)者上的對應一下,然后決定使用哪一個,如果一樣,那沒問題,不一樣的話一般采用注冊者頁面中的那個。也可以通過Android服務端獲取的數(shù)據分析出userid。

  2、獲取token也就是channelid,具體設備的id,

  3、獲取用戶的apikey

  4、獲取用戶的secretekey

  給用戶發(fā)送消息分幾種情況分別如下:給某個用戶的所有設備發(fā)送信息此時需要用戶的userid;給用戶的某個設備發(fā)送信息此時需要用戶的userid和channelid;給某類用戶發(fā)送信息,需要tag分類,也就是給該類的所有用戶發(fā)送信息。

  簡單示例,給用戶某一設備發(fā)送信息

 

復制代碼 代碼如下:


start() ->

 

    inets:start(),

    {Mega,Sec,_} = now(),

    ApiKey = "apikey=aghjklpoikmnbhjklpoijnbfd",%%用戶的APIkey
    %% 我的設備
    % Channel_Id = "channel_id=1234567890098765432",%% 用戶的某一設備channelid,也就是客戶端demo安裝在的手機的channelid
    %% 模擬器
    Channel_Id = "channel_id=3959774938927755088",%%客戶端模擬器的channelid
    Device_Type = "device_type=3",%%類型,細節(jié)在官方文檔中查看,1:瀏覽器設備;2:PC設備;3:Android設備;4:IOS設備;5:Windows phone設備
    Message_Type = "message_type=1",%% 0:消息;1:通知;默認為0
    TitleStr = " :kkkk,嘎嘎嘎阿 達航空 件阿 斯頓,,,,哈哈哈,erlang",
    DescriptionStr = "行不:行啊!",
    Messages0 = "messages={\"title\":\"",
    Messages1 = TitleStr,
    Messages2 = "\",\"description\":\"",
    Messages3 = DescriptionStr,
    Messages4 = "\",\"notification_builder_id\":0,"
    ++ "\"notification_basic_style\":2,\"open_type\":2,\"url\":\"\",\"user_confirm\":0,\"pkg_content\":\"\",\"custom_content\":\"\"}",
    Messages = Messages0 ++ Messages1 ++ Messages2 ++ Messages3 ++ Messages4,
    Method = "method=push_msg",
    Msg_keys= "msg_keys=erlang_keys",
    Push_Type = "push_type=1",
    Time = "timestamp="++ integer_to_list((Mega * 1000000 + Sec)),
    User_Id = "user_id=213123123",%%用戶的userid
    Url = "http://channel.api.duapp.com/rest/2.0/channel/channel",
    Http_Method = "POST",
    SecretKey = "123weqwe12wq12eqweqweqwe",%%用戶的secretekey
    Str0 = Http_Method ++ Url ++ ApiKey ++ Channel_Id ++ Device_Type ++ Message_Type ++ Messages0,
    Str1 = Messages2,
    Str2 = Messages4 ++ Method ++ Msg_keys ++ Push_Type ++ Time ++ User_Id ++ SecretKey,
    TitleBin = list_to_binary(TitleStr),
    TIntegerU = unicode:characters_to_list(TitleBin,utf8),
    TChanges = utf8(TIntegerU,[]),
    Title_Utf8 =
      lists:foldl(fun(Change,Acc) ->
        case Change of
          [Term] when Term >= $a, Term =< $z ->
            Acc ++ Change;
          [Term] when Term >= $A, Term =< $Z ->
            Acc ++ Change;
          [Term] when Term >= $0, Term =< $9 ->
            Acc ++ Change;
          [Term] when Term =:= $. ->
            Acc ++ Change;
          [Term] when Term =:= $_ ->
            Acc ++ Change;
          [Term] when Term =:= $- ->
            Acc ++ Change;
          [Term] when Term =:= 32 ->
            Acc ++ [43];
          _ ->
            Acc ++ list_to_hex_s(Change)
        end
      end,[],TChanges),
    DesBin = list_to_binary(DescriptionStr),
    DIntegerU = unicode:characters_to_list(DesBin,utf8),
    DChanges = utf8(DIntegerU,[]),
    Des_Utf8 =
      lists:foldl(fun(Change,Acc) ->
        case Change of
          [Term] when Term >= $a, Term =< $z ->
            Acc ++ Change;
          [Term] when Term >= $A, Term =< $Z ->
            Acc ++ Change;
          [Term] when Term >= $0, Term =< $9 ->
            Acc ++ Change;
          [Term] when Term =:= $. ->
            Acc ++ Change;
          [Term] when Term =:= $_ ->
            Acc ++ Change;
          [Term] when Term =:= $- ->
            Acc ++ Change; 
          _ ->
            Acc ++ list_to_hex_s(Change)
        end
      end,[],DChanges),
    StrValue = escape_uri(Str0) ++ Title_Utf8 ++ escape_uri(Str1) ++ Des_Utf8 ++ escape_uri(Str2),
    Md5Str = md5_hex(StrValue),
    Sign = "sign=" ++ Md5Str,
    PostInfo = ApiKey ++ "&" ++ Sign ++ "&" ++ User_Id ++ "&"
    ++ Channel_Id ++ "&" ++ Device_Type ++ "&" ++ Message_Type ++ "&" ++ Messages
    ++ "&" ++ Method ++ "&" ++ Msg_keys ++ "&" ++ Push_Type ++ "&" ++ Time,
    timer:sleep(30*1000),
    Result = httpc:request(post,{Url,[],"application/x-www-form-urlencoded",PostInfo},[],[]),
    case Result of
      {ok,{{"HTTP/1.1",200,"OK"},_,_}} ->
        nothing;
      _ ->
        io:format("Result:~p~n",[Result])
    end.

 

延伸 · 閱讀

精彩推薦
主站蜘蛛池模板: 欧美国产日产精品免费视频 | 日韩精品免费一区二区 | 精品国产一级毛片大全 | 白丝尤物的下面被疯狂蹂躏 | 日韩三及片 | 韩日一区二区三区 | 91精品国产91热久久p | 男人边吃奶边做好爽视频免费 | 久草在线福利资站免费视频 | 国产午夜亚洲精品一区网站 | 欧美18-19| aa视频免费 | 狠狠色狠狠色综合日日小蛇 | 天天草天天 | 四虎影视在线影院在线观看 | 青青青久在线视频免费观看 | 亚洲h片| 国产亚洲自愉自愉 | caopren免费视频国产 | hd最新国产人妖ts视频 | 色综合久久天天综合 | 女人全身裸露无遮挡免费观看 | 爽好紧别夹宝贝叫大声点护士 | 国产巨大bbbb俄罗斯 | 成年人免费观看的视频 | 免费a视频在线观看 | 国产精品青青青高清在线 | 欧美猛男同志同性video | 天天色影视综合网 | 1717国产精品视频免费 | 美味情缘韩国在线观看视频 | 国产免费精彩视频 | 婚色阿花在线全文免费笔 | 国产美女亚洲精品久久久久久 | 91制片厂制作传媒网站破解 | 87影院在线观看视频在线观看 | 国产成人综合一区人人 | 亚洲国产日韩制服在线观看 | 日本xxxxxxxxx高清hd | 明星梦淫 | 性色xxx |