SQL Server Base64函数

最新推荐文章于 2022-09-27 10:06:51 发布
最新推荐文章于 2022-09-27 10:06:51 发布
阅读量906 收藏
点赞数
分类专栏： T_Database 文章标签： 数据库
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/benwdm/article/details/84604510
版权 
IF OBJECT_ID(N'dbo.c_GetUTF8Code') IS NOT NULL

    DROP FUNCTION dbo.c_GetUTF8Code;

GO

CREATE FUNCTION [dbo].[c_GetUTF8Code]   

   (  
       @char Nchar 
   ) 

RETURNS int 

AS 

--UTF8转码 

BEGIN 

 Declare @Code int 
 Select @Code=Cast(Unicode(@char) as int) 
 Declare @Utf8Code int 
 Set @Utf8Code=0 
 if(@Code<128) 
 begin 
  --0-127 
  --0000-007F 
  --0xxxxxxx 
  --01100010 Unocide 
  --01100010 UTF-8 
  Set @Utf8Code=@Code  
 end 
 else if(@Code>127 and @Code<2048) 
 begin 
  --128-2047 
  --0080-07FF 
  --110xxx xx10xx xxxx 
  --110  7      F    F 
  Declare @C1 int 
  Declare @C2 int 
  Declare @C3 int 
  Select @C1=@Code/0x100  
  Select @C2=(@Code%0x100)/0x10 
  Select @C3=@Code%0x10 
  Select @Utf8Code=0xC080+0x400*@C1+0x100*(@C2/4)+0x10*(@C2%4)+@C3 
 end 
 else if(@Code>2047 and @Code<65536) 
 begin 
  --2047-65535 
  --0110 0010 0001 0001 
  --1110 xxxx 10xx xxxx 10xx xxxx 
  --1110 0110 1000 1000 1001 0001 
  Declare @C11 int 
  Declare @C12 int 
  Declare @C13 int 
  Declare @C14 int 
  Select @C11=@Code/0x1000 
  Select @C12=(@Code%0x1000)/0x100 
  Select @C13=(@Code%0x100)/0x10 
  Select @C14=@Code%0x10 
  Select @Utf8Code=0xE08080+0x10000*@C11+0x400*@C12+0x100*(@C13/4)+0x10*(@C13%4)+@C14  
 end 
 return @Utf8Code 
End 

GO 

-------加密函数[dbo].[base64_utf8encode]----

IF OBJECT_ID(N'dbo.base64_utf8encode') IS NOT NULL

    DROP FUNCTION dbo.base64_utf8encode;

GO
 
CREATE FUNCTION [dbo].[base64_utf8encode]   
(   
 @plain_text varchar(max)   
)   

RETURNS varchar(max)   

AS BEGIN 
--Base64解密 
 DECLARE @output varchar(max) 
 DECLARE @block_start integer 
 DECLARE @map char(64)   
 SET @map='ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/'  
 SET @output='' 
 SET @block_start=0 
 Declare @plain_textLength int 
 Set @plain_textLength=Len(@plain_text) 
 Declare @RestTransfer int--转码数累积 
 Declare @RestTransferLenth int 
 Set @RestTransfer=0 
 Set @RestTransferLenth=0 
 Declare @CodeInt int 
 Declare @block_val BINARY(3) 
 WHILE @block_start<@plain_textLength 
 BEGIN  
  Set @CodeInt=0 
  SELECT @CodeInt= [dbo].[c_GetUTF8Code](SubString(@plain_text,@block_start+1,1)) 
  Declare @CodeTransfer int 
  Set @CodeTransfer=0 
  --0-127 1位 
  --128-2047 2位 
  --2047-65535 3位 
  if(@CodeInt<128) 
  begin 
   --+1位 
   if(@RestTransferLenth=0 or @RestTransferLenth=1) 
   begin 
    Set @RestTransfer=@RestTransfer*0x100+@CodeInt 
    Set @RestTransferLenth=@RestTransferLenth+1 
   end 
   else if(@RestTransferLenth=2) 
   begin 
    Set @CodeTransfer=@RestTransfer*0x100+@CodeInt 
    Set @RestTransfer=0 
    Set @RestTransferLenth=0 
   end 
  end 
  else if(@CodeInt>127 and @CodeInt<2048) 
  begin 
   --+2位 
   if(@RestTransferLenth=0) 
   begin 
    Set @RestTransfer=@CodeInt 
    Set @RestTransferLenth=2 
   end 
   else if(@RestTransferLenth=1) 
   begin 
    Set @CodeTransfer=0x10000*@RestTransfer+@CodeInt 
    Set @RestTransfer=0 
    Set @RestTransferLenth=0 
   end 
   else if(@RestTransferLenth=2) 
   begin 
    Set @CodeTransfer=0x100*@RestTransfer+@CodeInt/0x100 
    Set @RestTransfer=@CodeInt%0x100 
    Set @RestTransferLenth=1 
   end 
  end 
  else if(@CodeInt>2047) 
  begin 
   --+3位 
   if(@RestTransferLenth=0) 
   begin 
    Set @CodeTransfer=@CodeInt 
    Set @RestTransfer=0 
    Set @RestTransferLenth=0 
   end 
   else if(@RestTransferLenth=1) 
   begin 
    Set @CodeTransfer=0x10000*@RestTransfer+@CodeInt/0x100 
    Set @RestTransfer=@CodeInt%0x100 
    Set @RestTransferLenth=1 
   end 
   else if(@RestTransferLenth=2) 
   begin 
    --剩余部分十六进制右移两位与新数据前两位之和 
    Set @CodeTransfer=0x100*@RestTransfer+@CodeInt/0x10000 
    Set @RestTransfer=@CodeInt%0x10000 
    Set @RestTransferLenth=2 
   end 
  end 
  ---累积到3位，执行加密转换 
  if(@CodeTransfer>0x100000) 
  begin 
   SET @block_val = CAST(@CodeTransfer AS BINARY(3))   
   SET @output = @output 
   + SUBSTRING(@map , @block_val/262144  +1,1) 
   + SUBSTRING(@map ,(@block_val/4096&63)+1,1) 
   + SUBSTRING(@map ,(@block_val/64  &63)+1,1) 
   + SUBSTRING(@map ,(@block_val&63)     +1,1) 
  end 
  SET @block_start=@block_start+1   
 END  
 IF @RestTransferLenth>0   
  BEGIN  
  SET @block_val=Cast(@RestTransfer*(Case @RestTransferLenth When 1 Then 65536 Else 256 end) as BINARY(3)) 
  SET @output=@output  
   +SUBSTRING(@map , @block_val/262144+1,    1)   
   +SUBSTRING(@map ,(@block_val/4096  &63)+1,1)   
   +CASE WHEN @RestTransferLenth =1 
   THEN REPLACE(SUBSTRING(@map ,(@block_val/64&63)+1,1),'A','=')   
   ELSE SUBSTRING(@map ,(@block_val/64&63)+1,1) 
    END 
   +CASE WHEN @RestTransferLenth=1   
   THEN '='  
   ELSE REPLACE(SUBSTRING(@map ,(@block_val&63)+1,1),'A','=') 
    END  
  END 
 RETURN @output  
END 

GO 
----------解密函数----------
IF OBJECT_ID(N'dbo.base64_utf8decode') IS NOT NULL

    DROP FUNCTION dbo.base64_utf8decode;

GO

CREATE FUNCTION [dbo].[base64_utf8decode]   
   (   
       @encoded_text varchar(max)   
   )   
   RETURNS varchar(max)   

   AS BEGIN 

--BASE64加密 
DECLARE @output varchar(max) 
DECLARE @block_start int 
DECLARE @encoded_length int 
DECLARE @decoded_length int 
DECLARE @mapr binary(122)   
 
SET @output = ''  
SET @mapr =   
  0xFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF    --    1-33   
  +0xFFFFFFFFFFFFFFFFFFFF3EFFFFFF3F3435363738393A3B3C3DFFFFFF00FFFFFF    --    33-64   
  +0x000102030405060708090A0B0C0D0E0F10111213141516171819FFFFFFFFFFFF    --    65-96   
  +0x1A1B1C1D1E1F202122232425262728292A2B2C2D2E2F30313233--    97-122   
SET @encoded_length=LEN(@encoded_text)   
SET @decoded_length=@encoded_length/4*3 
SET @block_start=1   
Declare @Code int 
Set @Code=0 
Declare @CodeLength int--累计连接数，1，2，3 
Set @CodeLength =0 
WHILE @block_start<@encoded_length 
BEGIN 
 Declare @Integer Integer 
 Set @Integer=substring(@mapr,Unicode(substring(@encoded_text,@block_start  ,1)),1)*262144   
     + substring(@mapr,Unicode(substring(@encoded_text,@block_start+1,1)),1)*4096   
     + substring(@mapr,Unicode(substring(@encoded_text,@block_start+2,1)),1)*64   
     + substring(@mapr,Unicode(substring(@encoded_text,@block_start+3,1)),1) 

 Declare @C1 int 
 Declare @C2 int 
 Declare @C3 int 
 --0xFF FF FF 
 Set @C1=@Integer/0x10000 
 Set @C2=(@Integer/0x100)%0x100 
 Set @C3=@Integer%0x100 
 -------------------------------------@C1 
 if(@C1<0x80) 
 begin 
  if(@CodeLength=2) 
  begin 
   --128-2047 
   --0080-07FF 
   --110x xx xx 10xx xxxx 
   Set @Code=((@Code%0x2000)/0x100)*0x10+@Code%0x40 
   SET @output=@output+NCHAR(@Code) 
   --print @Code  
   Set @Code=0 
   Set @CodeLength=0 
  end 
  SET @output=@output+CAST(Cast(@C1 AS BINARY(1))AS VARCHAR(1)) 
 end 
 else 
 begin 
  --码字连接 
  Set @Code=@Code*0x100+@C1 
  SET @CodeLength=@CodeLength+1 
  if(@CodeLength=3) 
  begin 
   --0110 0010 0001 0001 
   --1110 xxxx 10xx xxxx 10xx xxxx 
   --1110 0110 1000 1000 1001 0001 
   Set @Code=((@Code%0x100000)/0x10000)*0x1000+((@Code%0x4000)/0x100)*0x40+@Code%0x40 
   SET @output=@output+NCHAR(@Code) 
   Set @Code=0 
   Set @CodeLength=0 
  end 
 end 

 -------------------------------------@C2 
 if(@C2<0x80) 
 begin 
  if(@CodeLength=2) 
  begin 
   --128-2047 
   --0080-07FF 
   --110x xx xx 10xx xxxx 
   Set @Code=((@Code%0x2000)/0x100)*0x10+@Code%0x40 
   SET @output=@output+NCHAR(@Code) 
   --print @Code  
   Set @Code=0 
   Set @CodeLength=0 
  end 
  SET @output=@output+CAST(Cast(@C2 AS BINARY(1))AS VARCHAR(1)) 
 end 
 else 
 begin 
  --码字连接 
  Set @Code=@Code*0x100+@C2 
  SET @CodeLength=@CodeLength+1 
  if(@CodeLength=3) 
  begin 
   --0110 0010 0001 0001 
   --1110 xxxx 10xx xxxx 10xx xxxx 
   --1110 0110 1000 1000 1001 0001 
   Set @Code=((@Code%0x100000)/0x10000)*0x1000+((@Code%0x4000)/0x100)*0x40+@Code%0x40 
   SET @output=@output+NCHAR(@Code) 
   Set @Code=0 
   Set @CodeLength=0 
  end 
 end 
 -------------------------------------@C3 
 if(@C3<0x80) 
 begin 
  if(@CodeLength=2) 
  begin 
   --128-2047 
   --0080-07FF 
   --110x xx xx 10xx xxxx 
   Set @Code=((@Code%0x2000)/0x100)*0x10+@Code%0x40 
   SET @output=@output+NCHAR(@Code) 
   --print @Code  
   Set @Code=0 
   Set @CodeLength=0 
  end 
  SET @output=@output+CAST(Cast(@C3 AS BINARY(1))AS VARCHAR(1)) 
 end 
 else 
 begin 
  --码字连接 
  Set @Code=@Code*0x100+@C3 
  SET @CodeLength=@CodeLength+1 
  if(@CodeLength=3) 
  begin 
   --0110 0010 0001 0001 
   --1110 xxxx 10xx xxxx 10xx xxxx 
   --1110 0110 1000 1000 1001 0001 
   Set @Code=((@Code%0x100000)/0x10000)*0x1000+((@Code%0x4000)/0x100)*0x40+@Code%0x40 
   SET @output=@output+NCHAR(@Code) 
   Set @Code=0 
   Set @CodeLength=0 
  end 
 end 
 SET @block_start = @block_start + 4   
END  
IF RIGHT(@encoded_text,2)='==' 
 SET @decoded_length=@decoded_length-2 
ELSE IF RIGHT(@encoded_text,1)='=' 
 SET @decoded_length=@decoded_length-1 
RETURN LEFT(@output ,@decoded_length)   
END

 

benwdm
关注
  • 0
    点赞
  • 踩
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
专栏目录
sqlserver2005的base64加密解密函数
08-03
NULL 博文链接：https://nannan408.iteye.com/blog/1995714
C# Sql server中的image数据转base64
最新发布
文都龙哥
07-01 245
Sql server 2019数据库中有一个抓拍照片 captureImage，类型为image，现在将传送到第三方平台，对方使用 base64接收。
sql server base64解密函数
ankg83749的博客
05-26 623
USE [LVP] GO /****** Object: UserDefinedFunction [dbo].[base64_decode] Script Date: 2016/5/26 10:47:27 ******/ SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO Create FUNCTION [db...
Ms SqlServer Base64字符串解码函数
搁浅的博客
09-08 1391
一、SqlServer 代码 USE[数据库名称] GO /******Object:UserDefinedFunction[dbo].[Base64StrDecode]ScriptDate:2020/4/716:57:00******/ SETANSI_NULLSON GO SETQUOTED_IDENTIFIERON GO CREATEFUNCTION[dbo].[Base64StrDecode](@Base64Strvarchar(max)) RETURNs...
轻松实现Sql Server 2005下的Base64、MD5、SHA1算法函数
11-09
三种算法都可以很简单地实现，拒绝冗长的函数代码。 自己整理的东东，决不是随手粘贴来的，多收点分哈。如果正能对你的项目有所帮助，相信是值得滴～
Sql Server Base64加密解密角本
12-25
非常实用的Base64加密，解密角本。基于UTF8，支持中文加解密。
SqlServerBase64 加密解密.rar
04-02
通过理解Base64的工作原理和SQL Server的相关函数，我们可以灵活地在数据库中处理加密和解密操作，满足数据安全的需求。在实际应用中，还需要根据具体场景选择合适的加密策略，以确保数据的完整性和安全性。
springboot+mybatis+sqlserver
04-12
【标题】"springboot+mybatis+sqlserver"是一个基于Spring Boot、MyBatis和Microsoft SQL Server构建的基础开发框架，适用于快速开发企业级应用。这个框架整合了三个关键组件，旨在简化开发流程，提高开发效率。 ...
SQL Server Base64编码、解码
weixin_30307921的博客
07-26 2288
--BASE64编码CREATE FUNCTION [dbo].[FnBase64Encode](@src varchar(max)) 　　RETURNS VARCHAR(max)as begin 　　declare @bin varbinary(max) 　　set @bin=Convert(varbinary(max), @src) 　　return cast(N'' as xml).valu...
SQLServer T-SQL 二进制值与base64串相互转换
weixin_42297366的博客
03-27 2788
之前查到有文章介绍借助xs:base64Binary()函数，这里提供另一种、可能还更简单的表达式，示例如下： -------------------------------二进制数据base64编码 (SELECT [二进制值] FOR XML PATH(''),TYPE).value('text()[1]', 'varchar(max)') -------------------------------base64串还原二进制数据 CAST([base64串] as xml).value('text(
java对sql数据库存取图片代码
09-15
java对sql数据库存取图片代码的简单示例。
用SQL实现的BASE64加密及解密函数（SQL2005以上有效）
aitiao7316的博客
10-30 1309
CREATE FUNCTION [dbo].[f_base64_encode] (@bin varbinary(max)) returns varchar(max) as begin return cast(N'' as xml).value('xs:base64Binary(xs:hexBinary(sql:variable("@bin")))', 'varchar(max...
sqlserver BASE 64加密
代码的专栏
10-08 2345
CREATE    FUNCTION    base64_encode       (           @plain_text    varchar(6000)       )       RETURNS                             varchar(8000)       AS    BEGIN       --local    variables
Oracle、SQL Server下MD5+Base64密码加密实现
风在身后的专栏
08-20 8545
写在前面： MD5和Base64的函数实现并不是本文的重点，重点是在实现过程中遇到的字符集转换的麻烦   最近由于工作需要，要将BIEE与公司现有的ERP系统做集成，使用外部表的方式。 现有系统基于.Net平台，数据库为SQL Server 2008 R2，用户密码采用先
Sql对表字段做base64加解密
weixin_44366140的博客
09-27 1861
Sql做base64——加密
前端对SQL语句进行base64加密后端解密
liweiweili126的博客
04-07 1960
npm安装base64包 npm install -Sjs-base64 import { Base64 } from 'js-base64'; 使用base64: 　　编码：Base64.encode(); 　　译码：Base64.decode(); #js import { Base64 } from 'js-base64'; formData['sql_content'] = Base64.encode(sql_content); #python import ba...
sqlserver varbinary to base64
lisai的专栏
02-09 4244
select top 1 cast('' as xml).value( 'xs:base64Binary(sql:column("二进制字段"))', 'varchar(max)' ) 二进制字段 from tablename
sqlserver base64加密
08-06
在SQL Server中，可以使用内置的函数来进行Base64加密和解密操作。具体操作如下： 加密操作： 1. 首先，需要确保数据库中已经创建了`VARBINARY(MAX)`类型的列来存储加密后的结果。 2. 使用`CONVERT`函数将需要加密...
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值