1

こんにちは、Google API にアクセスするための oauth 2 ライブラリを作成しています。コードは次のとおりです。

    jwt_create() ->

    {ok,PemBin} = file:read_file("your-key-file.pem"),
    PemEntry = public_key:pem_decode(PemBin),
    [A,B] = PemEntry,
    io:format("A:: ~p ~n",[A]),
    PrivateKey = public_key:pem_entry_decode(PemEntry),
    JwtHeaderJson = encode_json(jwt_header()),
    JwtClaimsetJson = encode_json(jwt_claimset()),
    ComputeSignature = compute_signature(JwtHeaderJson, JwtClaimsetJson, PrivateKey),
    Z=binary:replace(
      binary:replace(<<JwtHeaderJson/binary, ".", JwtClaimsetJson/binary, ".", ComputeSignature/binary>>,
                     <<"+">>, <<"-">>, [global]),
      <<"/">>, <<"_">>, [global]),
    io:format("JWT:: ~p ~n",[Z]).
compute_signature(Header, ClaimSet,#'RSAPrivateKey'{publicExponent=Exponent

                                                          ,modulus=Modulus

                                                          ,privateExponent=PrivateExponent}) ->
    base64:encode(crypto:sign(rsa, sha256, <<Header/binary, ".", ClaimSet/binary>>, 
            [Exponent, Modulus, PrivateExponent])).
encode_json(JWToken) ->
    base64:encode(jsx:encode(JWToken)).

次のようにエラーが発生します。

例外エラー: public_key:pem_entry_decode([{'PrivateKeyInfo',<<48,130,4,191,2,1,0,48,13,6,9,42,134, 72,134,247,13,1,1,1,5 に一致する関数句がありません,0,4,130,4,...>>, not_encrypted}, {'証明書',<<48,130,3,96,48,130,2,72,160,3,2,1,2,2,8, 79,59,244 ,35,60,15,3,155,48,...>>, not_encrypted}]) (public_key.erl、123 行目) 関数内 googleoauth:jwt_create/0 (src/googleoauth.erl、55 行目)

Google APIにアクセスするためのOAUTH 2用のJWSとJWTの生成を手伝ってください

4

1 に答える 1

1

public_key:pem_entry_decode/1 に間違ったものを渡しています:

これで問題が解決します：

PrivateKey = public_key:pem_entry_decode(A),

public_key:pem_entry_decode/1 は単一の pem_entry() を取りますが、PEM ファイルには多くのエントリを含めることができます。おそらく、コードは代わりにPemEntry = public_key:pem_decode(PemBin)読み取る必要がありますか?PemEntries = public_key:pem_decode(PemBin)

また、前の行は 2 つのリスト エントリを想定していることにも注意してください。

[A|B] = PemEntry,
于 2015-11-06T12:13:31.390 に答える