UTF8编码的Base64解密 MSSQL实现-mysql教程-PHP中文网

首页

数据库

mysql教程

UTF8编码的Base64解密 MSSQL实现

WBOYWBOYWBOYWBOYWBOYWBOYWBOYWBOYWBOYWBOYWBOYWBOYWB

Jun 07, 2016 pm 02:57 PM

base64 mssql utf8 实现编码解密

加密解密UTF8编码的BASE64串无 GOCREATE FUNCTION [dbo].[c_GetUTF8Code] ( @char Nchar )RETURNS intAS--UTF8转码BEGIN Declare @Code int Select @Code=Cast(Unicode(@char) as int) Declare @Utf8Code int Set @Utf8Code=0 if(@Code128) begin --0-127 --

加密解密UTF8编码的BASE64串 UTF8编码的Base64解密 MSSQL实现

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

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

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

登录后复制

本站声明

本文内容由网友自发贡献，版权归原作者所有，本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容，请联系admin@php.cn

热AI工具

Undresser.AI Undress

人工智能驱动的应用程序，用于创建逼真的裸体照片

AI Clothes Remover

用于从照片中去除衣服的在线人工智能工具。

Undress AI Tool

免费脱衣服图片

Clothoff.io

AI脱衣机

AI Hentai Generator

免费生成ai无尽的。

显示更多

热工具

记事本++7.3.1

好用且免费的代码编辑器

SublimeText3汉化版

中文版，非常好用

禅工作室 13.0.1

功能强大的PHP集成开发环境

Dreamweaver CS6

视觉化网页开发工具

SublimeText3 Mac版

神级代码编辑软件(SublimeText3)

显示更多

热门话题

gmail邮箱登陆入口在哪里

7476

CakePHP 教程

1377

steam的账户名称是什么格式

win11激活密钥永久

NYT连接提示和答案

显示更多

Related knowledge

华为手机如何实现双微信登录？ Mar 24, 2024 am 11:27 AM

华为手机如何实现双微信登录？随着社交媒体的兴起，微信已经成为人们日常生活中不可或缺的沟通工具之一。然而，许多人可能会遇到一个问题：在同一部手机上同时登录多个微信账号。对于华为手机用户来说，实现双微信登录并不困难，本文将介绍华为手机如何实现双微信登录的方法。首先，华为手机自带的EMUI系统提供了一个很便利的功能——应用双开。通过应用双开功能，用户可以在手机上同

Ubuntu安装PHP并配置MSSQL连接的详细指南 Feb 29, 2024 am 11:15 AM

Ubuntu是一款流行的开源操作系统，常用于服务器运行。在Ubuntu上安装PHP并配置MSSQL连接是许多开发者和系统管理员经常需要做的操作之一。本文将为读者提供一份详细的指南，步骤包含安装PHP、设置Apache、安装MSSQLServer等内容，并附上具体的代码示例。第一步：安装PHP及相关扩展首先，我们需要安装PHP及其相关扩展，以便支持PHP连接

PHP编程指南：实现斐波那契数列的方法 Mar 20, 2024 pm 04:54 PM

编程语言PHP是一种用于Web开发的强大工具，能够支持多种不同的编程逻辑和算法。其中，实现斐波那契数列是一个常见且经典的编程问题。在这篇文章中，将介绍如何使用PHP编程语言来实现斐波那契数列的方法，并附上具体的代码示例。斐波那契数列是一个数学上的序列，其定义如下：数列的第一个和第二个元素为1，从第三个元素开始，每个元素的值等于前两个元素的和。数列的前几个元

如何在华为手机上实现微信分身功能 Mar 24, 2024 pm 06:03 PM

如何在华为手机上实现微信分身功能随着社交软件的普及和人们对隐私安全的日益重视，微信分身功能逐渐成为人们关注的焦点。微信分身功能可以帮助用户在同一台手机上同时登录多个微信账号，方便管理和使用。在华为手机上实现微信分身功能并不困难，只需要按照以下步骤操作即可。第一步：确保手机系统版本和微信版本符合要求首先，确保你的华为手机系统版本已更新到最新版本，以及微信App

掌握Golang如何实现游戏开发的可能性 Mar 16, 2024 pm 12:57 PM

在当今的软件开发领域中，Golang（Go语言）作为一种高效、简洁、并发性强的编程语言，越来越受到开发者的青睐。其丰富的标准库和高效的并发特性使它成为游戏开发领域的一个备受关注的选择。本文将探讨如何利用Golang来实现游戏开发，并通过具体的代码示例来展示其强大的可能性。1.Golang在游戏开发中的优势作为一种静态类型语言，Golang在构建大型游戏系统

PHP游戏需求实现指南 Mar 11, 2024 am 08:45 AM

PHP游戏需求实现指南随着互联网的普及和发展，网页游戏的市场也越来越火爆。许多开发者希望利用PHP语言来开发自己的网页游戏，而实现游戏需求是其中一个关键步骤。本文将介绍如何利用PHP语言来实现常见的游戏需求，并提供具体的代码示例。1.创建游戏角色在网页游戏中，游戏角色是非常重要的元素。我们需要定义游戏角色的属性，比如姓名、等级、经验值等，并提供方法来操作这些

word解密怎么设置 Mar 20, 2024 pm 04:36 PM

现如今的工作环境中，大家的保密意识越来越强了，在使用软件的时候也常常进行加密操作，对文件进行保护。尤其是重点的文件，保密意识更要增加，时时刻刻将文件的安全性放在首要位置。那么关于word解密不知道大家理解得怎么样，具体该如何操作？今天我们就通过下文的讲解为大家实际展示一下关于word解密的过程，需要学习word解密知识的小伙伴不要错过今天的课程。首先需要进行解密操作来保护文件，这意味着对文件进行了保护文档处理。在对文件进行此处理后，再次打开文件会弹出提示。解密文件的方法是输入密码，这样就可以直接

Ubuntu环境下安装PHP支持MSSQL数据库的步骤详解 Feb 29, 2024 am 10:39 AM

在Ubuntu环境下安装PHP支持MSSQL数据库的步骤详解在开发Web应用程序时，经常会遇到需要连接MicrosoftSQLServer（MSSQL）数据库的情况。在Ubuntu环境下，要实现PHP对MSSQL数据库的连接，需要安装相关的软件以及配置适当的设置。接下来，将详细介绍在Ubuntu环境下安装PHP支持MSSQL数据库的步骤，并提供具体的代码

See all articles

UTF8编码的Base64解密 MSSQL实现

热AI工具

Undresser.AI Undress

AI Clothes Remover

Undress AI Tool

Clothoff.io

AI Hentai Generator

热门文章

热工具

记事本++7.3.1

SublimeText3汉化版

禅工作室 13.0.1

Dreamweaver CS6

SublimeText3 Mac版

热门话题