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
- 浏览: 1605180 次
- 性别:
- 来自: 厦门
文章分类
- 全部博客 (603)
- T_java (145)
- T_script&ASP (51)
- T_C/C++ (25)
- T_PowerBuilder (11)
- T_Database (53)
- T_odoo (7)
- T_应用服务器 (50)
- T_专_条形码 (6)
- T_专_负载均衡器 (4)
- T_操作系统 (94)
- T_信息安全 (41)
- T_专_搜索引擎 (14)
- T_L_PHP (58)
- T_L_Delphi (18)
- T_L_.NET、C#、VisualStudio (25)
- T_L_Objective-C (6)
- T_移动开发 (53)
- T_网络 (109)
- T_大数据 (2)
- T_嵌入式 (2)
- T_小众技术 (24)
- T_未分类 (58)
- L_旅游印记 (1)
- L_生活随笔 (48)
- L_中国文化 (18)
- L_户外与生存 (0)
最新评论
-
csbean4004:
不知道哪传来得恶习,发帖子不好好发,故意弄错一些东西,很讨厌
让HTML5支持后置摄像头 -
withthewind:
终于找到一个可以用的了。。。
如何用VBA取得Word文档中的标题前面的序号 -
busbby:
兄弟,无法下载,说文件不完整
一个好用的Outlook ost格式文件转pst文件的工具 -
yijavakevin:
密码啊~解压密码多少?
一个二维条形码组件 -
vipbooks:
你给的那个链接根本无法下载,跳到官网看了下最新版12M,但点下 ...
十步以内完成精细web打印
发表评论
-
十步以内完成精细web打印
2017-06-21 11:44 7366注意: 康虎云报表组 ... -
MySQL正则替换函数
2017-05-24 13:01 1968DELIMITER $$ CREATE FUNCTION ... -
MySQL 对比数据库表结构
2017-02-14 17:41 1309MySQL 对比数据库表结 ... -
浏览器端精准打印或套打组件
2017-01-18 13:05 6693注意: 康虎云报表 ... -
在MySQL中全库搜索指定字符串
2016-11-13 07:47 2541有时候,需要从整个MySQL库中搜索某一字符串,但却不知道 ... -
Sql注入之sqlmap+dvwa实例演练
2016-10-27 16:27 1574Sql注入之sqlmap+dvwa实例演练 相信 ... -
在Ubuntu 16.04上安装Odoo8(附自动安装脚本)
2016-06-09 13:02 2563在Ubuntu 16.04上安装Odoo8 一、安 ... -
ODOO9 SAAS 全自动安装脚本 基于Ubuntu 14.04 LTS
2016-05-09 10:37 2479install-odoo-saas.sh #! ... -
MySQL同类记录获取最新一条
2016-03-28 13:36 1527表结构如下: MySQL> SELECT * FRO ... -
Mybatis Generator配置详解(中文)_转
2015-12-17 16:44 909来自: http://www.jianshu.com/p/e ... -
一个提供大量数据模型的网站
2015-12-17 14:00 970网站地址是:http://www.databaseansw ... -
Odoo安装脚本
2015-08-17 23:25 1227#!/bin/bash ################# ... -
MyBatis配置文件修改侦测及重载的实现
2015-07-31 13:53 2323MyBatis配置文件修改侦测及重载的实现: /** ... -
Hive安装配置过程中出现的错误
2015-05-30 22:11 11961、hive CLI启动时报错:(hadoop-2.6+ ... -
Hibernate计算从表记录数
2015-03-30 10:01 653有一个主表,其中一个字段是从表对应的记录数,为 ... -
一个异构数据库的集群中间件(转)
2014-12-22 14:41 852Product: Sequoia Database C ... -
在MS SQLServer中创建链接服务器
2014-12-03 15:11 913要在MS SQLServer中使用链接服务器,对方数据库使用 ... -
在SQLServer上,把从表某字段拼成一个值
2014-07-14 10:08 742--> 测试数据:[father] if ob ... -
SQL Server Base64函数
2014-06-06 11:58 1295IF OBJECT_ID(N'dbo.c_GetUTF8Co ... -
Oracle自动备份脚本
2014-03-31 19:06 830@echo off REM ############ ...
相关推荐
在SQL Server 2005中,没有内置的Base64加密函数。但我们可以自定义T-SQL存储过程来实现这个功能。以下是一个简单的Base64编码的示例: ```sql CREATE FUNCTION [dbo].[Base64Encode](@input NVARCHAR(MAX)) ...
非常实用的Base64加密,解密角本。基于UTF8,支持中文加解密。
在SQL Server 2005中,我们可以使用`VARBINARY`和`VARCHAR`数据类型结合内置函数来实现Base64编码与解码: 1. **Base64编码**: ```sql CREATE FUNCTION dbo.Base64Encode(@input VARCHAR(MAX)) RETURNS VARCHAR...
通过理解Base64的工作原理和SQL Server的相关函数,我们可以灵活地在数据库中处理加密和解密操作,满足数据安全的需求。在实际应用中,还需要根据具体场景选择合适的加密策略,以确保数据的完整性和安全性。
根据提供的标题、描述、标签及部分内容,我们可以详细探讨SQL Server中的数学函数和其他常用函数的应用。 ### 数学函数 #### 1. 绝对值 (ABS) - **语法**: - `SELECT ABS()` - **示例**: - `SELECT ABS(-1) ...
在数据库管理领域,SQL Server和Oracle都是广泛应用的关系型数据库管理系统,它们都提供了丰富的函数来处理各种数据操作。本文主要探讨的是这两个系统中常用的数学函数的区别。 1. 绝对值: 在SQL Server中,获取一...
根据提供的文件信息,本文将对Oracle与SQL Server中的常用数学函数进行对比分析。这些函数包括绝对值、向上取整、向下取整、截断、四舍五入、指数计算、自然对数、以10为底的对数、平方、平方根、幂运算以及随机数和...
如果是从HEX字符串或Base64编码还原,可以使用SQL函数如`CONVERT(VARBINARY(MAX), HEX_STRING)`或`CAST(/Base64_String/ AS VARBINARY(MAX))`。 4. **创建目标表结构**:在SQL SERVER中创建与源表结构类似的表,但...
【标题】"springboot+mybatis+sqlserver"是一个基于Spring Boot、MyBatis和Microsoft SQL Server构建的基础开发框架,适用于快速开发企业级应用。这个框架整合了三个关键组件,旨在简化开发流程,提高开发效率。 ...
在数据库管理领域,SQL Server 和 Oracle 是两种广泛使用的数据库管理系统,它们都提供了丰富的函数来处理数据。本篇文章将深入探讨 SQL Server 和 Oracle 中常用的数学函数的对比,帮助用户更好地理解和运用这两种...
在IT行业中,数据库管理系统是数据存储和处理的核心工具,而SQL Server是Microsoft公司推出的一款强大的关系型数据库管理系统,尤其适用于企业级的数据管理和分析。本文将深入探讨如何使用SQL Server进行数据管理和...
- SQL Server 和 Oracle: 都可以使用 `POWER(base, exponent)` 函数,例如 `POWER(3, 4)` 返回81。 12. **取随机数** - SQL Server: `RAND()` 生成[0,1)之间的随机浮点数。 - Oracle: `DBMS_RANDOM.VALUE(0,1)` ...
这些函数可能包括`base64ToBlob`,用于将base64编码转换为Blob,以及可能的`blobToBase64`,用于将Blob对象转换回base64编码。同时,这个库可能还提供了其他图像处理功能,如缩放、裁剪、旋转等。 【package.json】...
SQL Server是微软公司推出的一种关系型数据库管理系统,它在IT领域广泛应用,特别是在企业级的数据管理和分析中占有重要地位。本课主要围绕SQL Server的基础知识展开,重点讲解了数据查询的相关概念和操作。 首先,...
Microsoft SQL Server 2005 Express Edition SQL Server 文档小组无法回答技术支持问题,但是欢迎您对本自述文档提出建议和意见。您可以使用提供的链接快速、直接地发送电子邮件反馈。请使用英语发送您的反馈信息...
SQL Server是微软公司推出的一款强大的关系型数据库管理系统(RDBMS),常用于企业级的数据存储和管理。将C#与SQL Server结合使用,可以实现高效、安全的数据处理和应用程序开发。 在这个"C#+SQL Server项目开发...
针对Oracle端,需在`%ORACLE_BASE%\Administrator\product\11.2.0\dbhome_1\NETWORK\ADMIN\tnsnames.ora`文件中配置TNS监听器,确保SQL Server能够正确识别Oracle实例。例如,设置`ORCL`为实例名,`MYORACLE`为服务...
本教程——"北大青鸟使用SQL Server管理和查询数据(SQL Base)ACCP5.0PPT教材",旨在帮助初学者掌握SQL Server的基础知识和操作技巧,为日后的数据库管理工作打下坚实基础。 首先,我们从基础开始,了解SQL Server的...
### SqlServer和Oracle的不同的一些体会 #### 一、概述 在进行数据库移植的过程中,往往会遇到多种数据库间的迁移问题。本文将基于一次从Sql Server到Oracle的数据库移植经历,分享一些重要的区别与注意事项,旨在...
为了获取表的相关信息,我们可以利用SQL Server系统目录视图以及内置函数来实现。 ### 查询SQL Server下的所有表 #### 1. 使用`sys.tables`视图 SQL Server提供了丰富的系统目录视图来存储有关数据库对象的信息。...