Lua

Decode Microsoft Graph ID Token

See more Microsoft Graph Examples

Demonstrates how to decode a Microsoft Graph ID token. Lua

local chilkat = require("chilkat")

-- This example requires the Chilkat API to have been previously unlocked.
-- See Global Unlock Sample for sample code.

-- This example loads an id_token and decodes it.

-- Our Microsoft Graph OAuth2 token looks like this:

-- {
--   "token_type": "Bearer",
--   "scope": "openid profile User.ReadWrite Mail.ReadWrite Mail.Send Files.ReadWrite User.Read Calendars.ReadWrite Group.ReadWrite.All",
--   "expires_in": 3600,
--   "ext_expires_in": 3600,
--   "access_token": "EwCQA8l6...0HhMKYwC",
--   "refresh_token": "MCWulIvzi2yD0S...igEFn51mqcByhZtAJg",
--   "id_token": "eyJ0eXAiOiJKV1...Q7lRDaR-7A",
--   "expires_on": "1562862714"
-- }

local jsonToken = chilkat.JsonObject.new()
local success = jsonToken:load_file("qa_data/tokens/microsoftGraph.json")
if not success then
    print("Failed to load the JSON file...")
    return
end

-- Use Chilkat's JWT API to examine the id_token..
local jwt = chilkat.Jwt.new()
local idToken = jsonToken:string_of("id_token")

-- Extract the JOSE header..
local jose = jwt:get_header(idToken)

local jsonHeader = chilkat.JsonObject.new()
jsonHeader:load(jose)
jsonHeader.emit_compact = false
print(jsonHeader:emit())

-- The JOSE header looks like this:

-- {
--   "typ": "JWT",
--   "alg": "RS256",
--   "kid": "1LTMzakihiRla_8z2BEJVXeWMqo"
-- }

local claims = jwt:get_payload(idToken)

local jsonClaims = chilkat.JsonObject.new()
jsonClaims:load(claims)
jsonClaims.emit_compact = false
print(jsonClaims:emit())

-- The claims look like this:

-- {
--   "ver": "2.0",
--   "iss": "https://login.microsoftonline.com/9188040d-6c67-4c5b-b112-36a304b66dad/v2.0",
--   "sub": "AAAAAAAAAAAAAAAAAAAAAHJFryd6Gydo-XtTd1nhUNQ",
--   "aud": "18c456bd-db75-43fe-9724-9e5d821c68ff",
--   "exp": 1562945513,
--   "iat": 1562858813,
--   "nbf": 1562858813,
--   "name": "Matt Chilkat",
--   "preferred_username": "matt@example.com",
--   "oid": "00000000-0000-0000-3a33-fceb9b74cc15",
--   "tid": "9188040d-6c67-4c5b-b112-36a304b66dad",
--   "aio": "DfibJqKnWC1c0FS6G ... W6pvTrQuYzyq16ghY$"
-- }
--

-- Use this online tool to generate parsing code from sample JSON:
-- Generate Parsing Code from JSON

-- Get each of the claims..
local ver = jsonClaims:string_of("ver")
local iss = jsonClaims:string_of("iss")
local s_sub = jsonClaims:string_of("sub")
local aud = jsonClaims:string_of("aud")
local exp = jsonClaims:int_of("exp")
local iat = jsonClaims:int_of("iat")
local nbf = jsonClaims:int_of("nbf")
local name = jsonClaims:string_of("name")
local preferred_username = jsonClaims:string_of("preferred_username")
local oid = jsonClaims:string_of("oid")
local tid = jsonClaims:string_of("tid")
local aio = jsonClaims:string_of("aio")