基于M实现的JWT解决方案

阿里云国内75折 回扣 微信号:monov8
阿里云国际,腾讯云国际,低至75折。AWS 93折 免费开户实名账号 代冲值 优惠多多 微信号:monov8 飞机:@monov6

基于 M实现的 JWT解决方案

简介

JWT 英文名是 Json Web Token 是一种用于通信双方之间传递安全信息的简洁的、URL安全的表述性声明规范经常用在跨域身份验证。

JWTJSON 对象的形式安全传递信息。因为存在数字签名因此所传递的信息是安全的。

现状

在讲解 JWT 之前我们先来看一个问题。我们都知道互联网服务的身份验正过程是这样的客户端向服务器发送登录名和登录密码服务器验证后将对应的相关信息保存到当前会话中这些信息包括权限、角色等数据。

服务器向客户端返回 Session Session 信息都会写入到客户端的 Cookie 中后面的请求都会从 Cookie 中读取 Session 发送给服务器服务器在收到 Session 后会对比保存的数据来确认客户端身份。

但是上述模式存在一个问题无法横向扩展。在服务器集群或者面向服务且跨域的结构中需要数据库来保存 Session 会话实现服务器之间的会话数据共享。

在单点登录中我们会遇到上述问题当有多个网站提供同一拨服务那么我们该怎么实现在甲网站登陆后其他网站也同时登录呢

其中一种方法是持久化 Session 数据也就是上面所说的将 Session 会话存到数据库中。这个方法的优点是架构清晰明了。

但是缺点也非常明显就是架构修改很困难验证逻辑需要重写并且整体依赖于数据库如果存储 Session 会话的数据库挂掉那么整个身份认证就无法使用进而导致系统无法登录。要解决这个问题我们就用到了 JWT

原理

客户端身份经过服务器验证通过后会生成带有签名的 JSON 对象并将它返回给客户端。客户端在收到这个 JSON 对象后存储起来。

在以后的请求中客户端将 JSON 对象连同请求内容一起发送给服务器服务器收到请求后通过 JSON 对象标识用户如果验证不通过则不返回请求的数据。

验证不通过的情况有很多比如签名不正确、无权限、过期等。在 JWT 中服务器不保存任何会话数据使得服务器更加容易扩展。

Base64URL 算法

在讲解 JWT 的组成结构前我们先来讲解一下 Base64URL 算法。这个算法和 Base64 算法类似但是有一点区别。

我们通过名字可以得知这个算法使用于 URL 的因此它将 Base64 中的 +/= 三个字符替换成了 -_ 删除掉了 = 。因为这个三个字符在 URL 中有特殊含义。

基于M实现的方法

ClassMethod Base64UrlEncryption(str As %String)
{
	s ret = $zcvt(str, "O", "UTF8")
	s ret = ##class(%SYSTEM.Encryption).Base64Encode(ret, 1)
	s ret = ..ConvertUrl(ret)
	q ret
}

ClassMethod ConvertUrl(str)
{
	q $tr(str, "+/=", "-_")
}

JWT 组成结构

JWT 是由三段字符串和两个 . 组成每个字符串和字符串之间没有换行类似于这样abc.def.xyz每个字符串代表了不同的功能我们将这三个字符串的功能按顺序列出来并讲解

头部Header

JWT 头描述了 JWT 元数据是一个 JSON 对象它的格式如下

{
	"alg": "HS256",
	"typ": "JWT"
}

这里的 alg 属性表示签名所使用的算法JWT 签名默认的算法为 HMAC SHA256 alg 属性值 HS256 就是 HMAC SHA256 算法。typ 属性表示令牌类型这里就是 JWT

基于M实现的方法

ClassMethod GenerateHeaderPart()
{
	s header = {}
	s header.alg = "HS256"
	s header.typ = "JWT"
	s headerPart = ..Base64UrlEncryption(header.%ToJSON())
	q headerPart
}
USER>w ##class(M.Jwt).GenerateHeaderPart()
eyJhbGciOiJIUzI1NiIsInR5cCI6IkpXVCJ9

有效载荷Payload

有效载荷是 JWT 的主体同样也是个 JSON 对象。

JWT指定七个默认字段供选择也可以省略一般建议使用。包括以下内容

  • issjwt的签发者/发行人
  • sub主题
  • aud接收方
  • expjwt过期时间
  • nbfjwt生效时间
  • iat签发时间
  • jtijwt唯一身份标识可以避免重放攻击

也可以自定义字段

{
	"name": "yx",
	"code": "yaoxin",
	"desc": "engineer",
}

下面这个代码段就是定义了一个有效载荷

{
	"iss": "yx",
	"jti": "78006423",
	"exp": "2023-01-15 09:30:04",
	"nbf": "2023-01-08 09:30:04",
	"iat": "2023-01-08 09:30:04"
}

基于M实现的方法

Parameter Sign = "yx";

ClassMethod GeneratePayloadPart()
{
	s payload = {}
	s payload.iss = ..#Sign
	s payload.jti = ##class(%SYSTEM.Encryption).GenCryptToken()
	s payload.exp = $zd(($h + 7), 3) _ " " _$zt($p($h, ",", 2), 1)
	s payload.nbf = $zdt($h, 3)
	s payload.iat = $zdt($h, 3)
	s payloadPart = ..Base64UrlEncryption(payload.%ToJSON())
	q payloadPart
}
USER>w ##class(M.Jwt).GeneratePayloadPart()
eyJpc3MiOiJ5eCIsImp0aSI6IjYzMjg1OTgyIiwiZXhwIjoiMjAyMy0wMS0yNSAwOTozNTozMCIsIm5iZiI6IjIwMjMtMDEtMTggMDk6MzU6MzAiLCJpYXQiOiIyMDIzLTAxLTE4IDA5OjM1OjMwIn0

哈希签名Signature

哈希签名的算法主要是确保数据不会被篡改。它主要是对前面所讲的两个部分进行签名通过 JWT 头定义的算法生成哈希。哈希签名的过程如下:

  1. 指定密码密码保存在服务器中不能向客户端公开。

  2. 使用JWT 头指定的算法进行签名进行签名前需要对 JWTHeader和有效载荷payload进行 Base64URL 编码结果之间需要用 . 来连接。

示例如下

HMACSHA256(base64UrlEncode(header)+"."+base64UrlEncode(payload),secret)

基于M实现的方法

Parameter DOT = ".";

Parameter Key = 00000000111111112222222233333333;

ClassMethod GenerateSignaturePart(headerPart, payloadPart)
{
	s content = headerPart _ ..#DOT _ payloadPart
	s signaturePart = ..HMACSHABase64Encode(content, ..#Key)
	q signaturePart
}

JWT完整结果

JWT由3部分组成标头(Header)、有效载荷(Payload)和签名(Signature)。在传输的时候会将JWT的3部分分别进行Base64编码后用.进行连接形成最终传输的字符串。

Base64(Header).Base64(Payload).HMACSHA256(base64UrlEncode(header)+"."+base64UrlEncode(payload),secret)

基于M实现的方法

ClassMethod GenerateJwt()
{
	s headerPart = ..GenerateHeaderPart()
	s payloadPart = ..GeneratePayloadPart()
	s signaturePart = ..GenerateSignaturePart(headerPart, payloadPart)
	s jwt = headerPart _ ..#DOT _ payloadPart _ ..#DOT _ signaturePart
	q jwt
}
USER>w ##class(M.Jwt).GenerateJwt()
eyJhbGciOiJIUzI1NiIsInR5cCI6IkpXVCJ9.eyJpc3MiOiJ5eCIsImp0aSI6IjA0MzYzNzA1IiwiZXhwIjoiMjAyMy0wMS0yNSAwOTo0ODowMSIsIm5iZiI6IjIwMjMtMDEtMTggMDk6NDg6MDEiLCJpYXQiOiIyMDIzLTAxLTE4IDA5OjQ4OjAxIn0.XxgI9PG8AznJIyS6neze2UC4XNG-V0dP46pkp_JNhBY

可以在jwt.io(地址https://jwt.io/)上验证一下

在这里插入图片描述

JWT基于M的使用流程

在这里插入图片描述

  1. 首先创建后端门面接口用户处理通用权限校验和接收反射需要调用的方法
Class M.Broker Extends (%CSP.Page, %CSP.REST)
{
/// desc返回页面数据方法
ClassMethod OnPage() As %Status
{
	s pClassName = $g(%request.Data("ClassName",1))
	s pMethodName = $g(%request.Data("MethodName",1)) 
	
	/* 输出返回值到页面上 */
	w ..RunMethod(pClassName, pMethodName)
	q $$$OK
}

/// desc运行通用方法
ClassMethod RunMethod(pClassName, pMethodName) [ ProcedureBlock = 0 ]
{
	s $zt = "Error"
	d ..GetInfo()
	
	q:(pMethodName'="Login")&&('$d(%request.CgiEnvs("HTTP_AUTHORIZATION"))) ..Failure2Json("请求头中AUTHORIZATION不存在")
	
	q:(pClassName = "") ..Failure2Json("类不能为空")
	q:(pMethodName = "") ..Failure2Json("方法不能为空")
	
	d:(pMethodName'="Login") ##class(M.Jwt).VerifyJwt()
	
	
	s requestMethod = $lb("POST", "GET")
	q:('$lf(requestMethod, %request.CgiEnvs("REQUEST_METHOD")))
	
	try {
		
		s result = $classmethod(pClassName, pMethodName)
		
	} catch e {
		
		s msg = e.Name _ e.Location _ " *" _ data _ $ze
		ret ..Failure2Json(msg)
	}
	
    q ..Success2Json(result)
Error 
	s $zt = ""
	ret ..Failure2Json("意外没有捕捉错误的错误" _ $ze)
}
}
  1. 模拟客户端使用用户名和密码请求登录返回Jwt。服务端收到请求验证用户名和密码。验证成功后服务端会签发一个 JWT token再把这个JWT token返回给客户端。

后端登录方法

Class M.Jwt Extends %RegisteredObject
{

ClassMethod Login()
{
	#; todo 验证用户密码信息
	#; 返回JWT
	q ..GenerateJwt()
}

}

使用PostMan模拟接口登录

在这里插入图片描述

{
    "code": 200,
    "msg": "",
    "data": "eyJhbGciOiJIUzI1NiIsInR5cCI6IkpXVCJ9.eyJpc3MiOiJ5eCIsImp0aSI6IjQ3MDY0MDQ3IiwiZXhwIjoiMjAyMy0wMS0yNSAxMDoyMzo1NCIsIm5iZiI6IjIwMjMtMDEtMTggMTA6MjM6NTQiLCJpYXQiOiIyMDIzLTAxLTE4IDEwOjIzOjU0In0.IcYRp5BqGtslB94lNYmgIrvIwuyne347HjmHkNmAceo"
}
  1. 客户端收到token后可以把它存储起来比如放到sessionStorage中。客户端每次向服务端请求资源时需要携带服务端签发的JWT token可以在header中携带。

使用PostMan模拟请求数据

  • 把请求到的JWT信息放到 PostMan -> Authorization -> TYPE = Bear Token -> 设置Token 中。
  • 前端在每次请求时将JWT Token放入HTTP请求头中的Authorization属性中(解决XSSXSRF问题)。

在这里插入图片描述

  1. 服务端收到请求然后去验证客户端请求里面带着的JWT token如果验证成功就向客户端返回请求数据。

解析验证JWT后端方法

ClassMethod VerifyJwt()
{
	#; 验证是否携带JWT
	q:'$d(%request) ""
	q:'$d(%request.CgiEnvs("HTTP_AUTHORIZATION")) $$$JwtException("请求头中AUTHORIZATION不存在")
	
	#; 获取JWT
	s token = %request.CgiEnvs("HTTP_AUTHORIZATION")
	s jwt = $p(token," " ,2)
	s headerPart = $p(jwt, ".", 1)
	s payloadPart = $p(jwt, ".", 2)
	s signaturePart = $p(jwt, ".", 3)
	
	#; 解析header部分
	s header = ..Base64Decryption(headerPart)
	s headerObj = {}.%FromJSON(header)
	
	#; 解析payload部分
	s payload = ..Base64Decryption(payloadPart)
	s payloadObj = {}.%FromJSON(payload)
	
	#; 解析重新验签判断数据是否被修改过
	s content = headerPart _ ..#DOT _ payloadPart
	s signatureConetent = ..HMACSHABase64Encode(content, ..#Key)
	q:(signatureConetent '= signaturePart) $$$JwtException("签名校验异常")
	
	#; 其他验证信息根据需求自行判断
	q:(payloadObj.iss '= ..#Sign) $$$JwtException("IIS发行人校验异常")
	s exp = payloadObj.exp
	#; 这里只计算了日期需要对比时间根据需要自行判断
	q:(+$zdth(exp, 3) < +$h) $$$JwtException("JWT已经过期")
	 
	q $$$OK
}

在这里插入图片描述

后端数据方法

ClassMethod Data()
{
	q $$$OK
}

总结

使用场景

  • 支持跨域访问cookie是无法跨域的而token由于没有用到cookie(前提是将token放到请求头中)所以跨域后不会存在信息丢失问题。
  • 无状态token机制在服务端不需要存储session信息因为token自身包含了所有登录用户的信息所以可以减轻服务端压力。
  • 更适用于移动端当客户端是非浏览器平台时cookie是不被支持的此时采用token认证方式会简单很多。
  • 无需考虑CSRF由于不再依赖cookie所以采用token认证方式不会发生CSRF所以也就无需考虑CSRF的防御。
  • 单点登录。

在使用 JWT 时需要注意以下事项

  1. JWT 默认不加密如果要写入敏感信息必须加密可以用生成的原始令牌再次对内容进行加密。

  2. JWT无法使服务器保存会话状态当令牌生成后在有效期内无法取消也不能更改。

  3. JWT 包含认证信息如果泄露了任何人都可以获得令牌所有的权限因此 JWT 有效期不能太长对于重要操作每次请求都必须进行身份验证。

完整代码

  • M.Broker.cls
Class M.Broker Extends (%CSP.Page, %CSP.REST)
{

/// 设置为"utf-8",否则中文乱码
Parameter CHARSET = "utf-8";

ClassMethod OnPreHTTP() As %Boolean
{
	#dim %response as %CSP.Response
	#dim %session as %CSP.Session
	#; js是否可读cookie
	#; s %response.UseHttpOnly = 1
	
	
	/* 星号表示所有的域都可以接受 */
	d %response.SetHeader("Access-Control-Allow-Origin", ..GetOrigin())
	
	#; 允许请求方式例如get。post
	d %response.SetHeader("Access-Control-Allow-Methods", "*")
	
	#; 允许头信息
	d %response.SetHeader("Access-Control-Allow-Headers", "x-requested-with,content-type")
	
	#; 允许验证
	d %response.SetHeader("Access-Control-Allow-Credentials", "true")
	
	#; 额外暴露头信息
	#;d %response.SetHeader("Access-Control-Expose-Headers", "cookie")
	
	#; 超时时间
	d %response.SetHeader("Access-Control-Max-Age", 3600)
	
	/* 设置返回结构为Json */
	d %response.SetHeader("Content-Type", "application/json")
	
	#; 每次请求将Session超时时间重新设置
	s %session.AppTimeout = 900

	if ($zv [ "IRIS") {
		#; 确定是否应该使用 sessionId cookie 发送 "Secure" 标志的内部属性
		s %session.SecureSessionCookie = 1
		
		#; 确定如何严格限制 sessionId cookie 域的属性。选项有 None (0)Lax (1)Strict (2)其中 Strict 表示 cookie 只能在当前应用程序中使用。默认为 CSP 应用程序的相应设置。除非另有配置否则应用程序默认为 Strict。请注意None 对于不安全 (HTTP) 连接无效
		s %session.SessionScope = 0
		
		#; 用于确定要与用户创建的 cookie 一起发送的 SameSite 属性的属性。选项有 None (0)Lax (1)Strict (2)。默认为 CSP 应用程序的相应设置。除非另有配置否则应用程序默认为 Strict。请注意None 对于不安全 (HTTP) 连接无效。
		s %session.UserCookieScope = 0
	}


	q 1
}

/// desc返回页面数据方法
ClassMethod OnPage() As %Status
{
	s pClassName = $g(%request.Data("ClassName",1))
	s pMethodName = $g(%request.Data("MethodName",1)) 
	
	/* 输出返回值到页面上 */
	w ..RunMethod(pClassName, pMethodName)
	q $$$OK
}

/// desc运行通用方法
ClassMethod RunMethod(pClassName, pMethodName) [ ProcedureBlock = 0 ]
{
	s $zt = "Error"
	d ..GetInfo()
	
	q:(pMethodName'="Login")&&('$d(%request.CgiEnvs("HTTP_AUTHORIZATION"))) ..Failure2Json("请求头中AUTHORIZATION不存在")
	
	q:(pClassName = "") ..Failure2Json("类不能为空")
	q:(pMethodName = "") ..Failure2Json("方法不能为空")
	
	d:(pMethodName'="Login") ##class(M.Jwt).VerifyJwt()
	
	
	s requestMethod = $lb("POST", "GET")
	q:('$lf(requestMethod, %request.CgiEnvs("REQUEST_METHOD")))
	
	try {
		
		s result = $classmethod(pClassName, pMethodName)
		
	} catch e {
		
		s msg = e.Name _ e.Location _ " *" _ data _ $ze
		ret ..Failure2Json(msg)
	}
	
    q ..Success2Json(result)
Error 
	s $zt = ""
	ret ..Failure2Json("意外没有捕捉错误的错误" _ $ze)
}

/// 返回消息Json
ClassMethod Msg(code, msg = "", data = "") As %DynamicObject
{
    s ret = {}
    s ret.code = code
    s ret.msg = msg
    s ret.data = data
    q ret
}

/// 无Session判断
ClassMethod Session() As %DynamicObject
{
    q ..Msg(-2, "", "")
}

/// 返回前台的成功消息转Json
ClassMethod Session2Json() As %String
{
    q ..Session().%ToJSON()
}

/// 返回前台的成功消息
ClassMethod Success(data) As %DynamicObject
{
    q ..Msg(200, "", data)
}

/// 返回前台的成功消息转Json
ClassMethod Success2Json(data) As %String
{
    q ..Success(data).%ToJSON()
}

/// 返回前台分页数据的成功消息转Json
ClassMethod Success2Json4Page(data, total) As %String
{
    s ret = ..Success(data)
    d ret.%Set("size" ,$g(%request.Data("size", 1)) ,"number")
    d ret.%Set("current" ,$g(%request.Data("current", 1)) ,"number")
    d ret.%Set("total" ,total ,"number")
    q ret.%ToJSON()
}

/// 返回前台的失败消息
ClassMethod Failure(msg, data = "") As %DynamicObject
{
    q ..Msg(-1, msg, data)
}

/// 返回前台的失败消息转Json
ClassMethod Failure2Json(msg, data = "") As %String
{
    q ..Failure(msg, data).%ToJSON()
}

/// 返回前台的警告消息
ClassMethod Warning(msg, data = "") As %DynamicObject
{
    q ..Msg(0, msg, data)
}

/// 返回前台的警告消息转Json
ClassMethod Warning2Json(msg, data = "") As %String
{
    q ..Warning(msg, data).%ToJSON()
}

ClassMethod GetOrigin()
{
	q:'$d(%request) ""
	q:'$d(%request.CgiEnvs("HTTP_ORIGIN")) ""
	s origin = %request.CgiEnvs("HTTP_ORIGIN")
	q origin
}

ClassMethod GetAuthorization()
{
	q:'$d(%request) ""
	q:'$d(%request.CgiEnvs("HTTP_AUTHORIZATION")) ""
	s token = %request.CgiEnvs("HTTP_AUTHORIZATION")
	q token
}

}

  • M.Jwt.cls
Include M.Jwt

Class M.Jwt Extends %RegisteredObject
{

ClassMethod Login()
{
	#; todo 验证用户密码信息
	#; 返回JWT
	q ..GenerateJwt()
}

ClassMethod Data()
{
	q $$$OK
}

Parameter DOT = ".";

Parameter Sign = "yx";

Parameter Key = 00000000111111112222222233333333;

/// w ##class(M.Jwt).GetJwt()
ClassMethod VerifyJwt()
{
	#; 验证是否携带JWT
	q:'$d(%request) ""
	q:'$d(%request.CgiEnvs("HTTP_AUTHORIZATION")) $$$JwtException("请求头中AUTHORIZATION不存在")
	
	#; 获取JWT
	s token = %request.CgiEnvs("HTTP_AUTHORIZATION")
	s jwt = $p(token," " ,2)
	s headerPart = $p(jwt, ".", 1)
	s payloadPart = $p(jwt, ".", 2)
	s signaturePart = $p(jwt, ".", 3)
	
	#; 解析header部分
	s header = ..Base64Decryption(headerPart)
	s headerObj = {}.%FromJSON(header)
	
	#; 解析payload部分
	s payload = ..Base64Decryption(payloadPart)
	s payloadObj = {}.%FromJSON(payload)
	
	#; 解析重新验签判断数据是否被修改过
	s content = headerPart _ ..#DOT _ payloadPart
	s signatureConetent = ..HMACSHABase64Encode(content, ..#Key)
	q:(signatureConetent '= signaturePart) $$$JwtException("签名校验异常")
	
	#; 其他验证信息根据需求自行判断
	q:(payloadObj.iss '= ..#Sign) $$$JwtException("IIS发行人校验异常")
	s exp = payloadObj.exp
	#; 这里只计算了日期需要对比时间根据需要自行判断
	q:(+$zdth(exp, 3) < +$h) $$$JwtException("JWT已经过期")
	 
	q $$$OK
}

/// w ##class(M.Jwt).SetJwt()
ClassMethod GenerateJwt()
{
	s headerPart = ..GenerateHeaderPart()
	s payloadPart = ..GeneratePayloadPart()
	s signaturePart = ..GenerateSignaturePart(headerPart, payloadPart)
	s jwt = headerPart _ ..#DOT _ payloadPart _ ..#DOT _ signaturePart
	q jwt
}

/// w ##class(M.Jwt).GenerateHeaderPart()
/// eyJ0eXAiOiJKV1QiLCJhbGciOiJIUzI1NiJ9.eyJpc3MiOiJ0aHJvd3giLCJqaWQiOjEwMDg3LCJleHAiOjE2MTMyMjc0NjgxNjh9.7skduDGxV-BP2p_CXyr3Na7WBvENNl--Pm4HQ8cJuEs
/// eyJhbGciOiJIUzI1NiIsInR5cCI6IkpXVCJ9.eyJpc3MiOiJ0aHJvd3giLCJqaWQiOjEwMDg3LCJleHAiOjE2MTMyMjc0NjgxNjh9.RkVBMjAwOEYwNzIwRDdENzI0MURCMzUxRjhGMzcyOUI5Mjc3MEYzOENFMjgxQjcyNTdDRTU3QTBEQTJDNTlCMw==
ClassMethod GenerateHeaderPart()
{
	s header = {}
	s header.alg = "HS256"
	s header.typ = "JWT"
	s headerPart = ..Base64UrlEncryption(header.%ToJSON())
	q headerPart
}

/// w ##class(M.Jwt).GeneratePayloadPart()
ClassMethod GeneratePayloadPart()
{
	s payload = {}
	s payload.iss = ..#Sign
	s payload.jti = ##class(%SYSTEM.Encryption).GenCryptToken()
	s payload.exp = $zd(($h + 7), 3) _ " " _$zt($p($h, ",", 2), 1)
	s payload.nbf = $zdt($h, 3)
	s payload.iat = $zdt($h, 3)
	s payloadPart = ..Base64UrlEncryption(payload.%ToJSON())
	q payloadPart
}

/// w ##class(M.Jwt).GenerateSignaturePart()
/// eyJhbGciOiJIUzI1NiIsInR5cCI6IkpXVCJ9.eyJpc3MiOiJ0aHJvd3giLCJqaWQiOjEwMDg3LCJleHAiOjE2MTMyMjc0NjgxNjh9._qIAjwcg19ckHbNR-PNym5J3DzjOKBtyV85XoNosWbM
ClassMethod GenerateSignaturePart(headerPart, payloadPart)
{
	s content = headerPart _ ..#DOT _ payloadPart
	s signaturePart = ..HMACSHABase64Encode(content, ..#Key)
	q signaturePart
}

ClassMethod Base64UrlEncryption(str As %String)
{
	s ret = $zcvt(str, "O", "UTF8")
	s ret = ##class(%SYSTEM.Encryption).Base64Encode(ret, 1)
	s ret = ..ConvertUrl(ret)
	q ret
}

ClassMethod ConvertUrl(str)
{
	q $tr(str, "+/=", "-_")
}

ClassMethod Base64Decryption(str As %String)
{
	s ret = ##class(%SYSTEM.Encryption).Base64Decode(str)
	q ret
}

/// w ##class(M.Jwt).HMACSHABase64Encode("eyJhbGciOiJIUzI1NiIsInR5cCI6IkpXVCJ9.eyJpc3MiOiJ5eCIsImp0aSI6IjY2MzkyMTU5IiwiZXhwIjoiMjAyMy0wMS0xOSAxMjoxNDozNCIsIm5iZiI6IjIwMjMtMDEtMTIgMTI6MTQ6MzQiLCJpYXQiOiIyMDIzLTAxLTEyIDEyOjE0OjM0In0","00000000111111112222222233333333")
ClassMethod HMACSHABase64Encode(str As %Text, key As %String) As %String
{
	s str = $zcvt(str, "O", "UTF8")
	s key = $zcvt(key, "O", "UTF8")
	s ret = ##class(%SYSTEM.Encryption).HMACSHA("256", str, key)
	
	s ret = ##class(%SYSTEM.Encryption).Base64Encode(ret, 1)
	s ret = ..ConvertUrl(ret)
	q ret
}

}
  • M.Jwt.inc
#define JwtException(%msg) ##class(M.JwtException).%New("",-100, %msg)
阿里云国内75折 回扣 微信号:monov8
阿里云国际,腾讯云国际,低至75折。AWS 93折 免费开户实名账号 代冲值 优惠多多 微信号:monov8 飞机:@monov6

“基于M实现的JWT解决方案” 的相关文章