oracle bitand越界,oracle 中的bitand bitor bitxor

这篇博客介绍了在Oracle数据库中如何利用BITAND函数实现BITOR和BITXOR操作。通过示例展示了如何通过位运算进行数值转换,包括将十进制数转换为二进制、十六进制和八进制的函数。同时,提供了创建这些函数的PL/SQL代码。
摘要由CSDN通过智能技术生成

参考: http://blog.itpub.net/post/6/1609

http://asktom.oracle.com/pls/ask/f?p=4950:8:280872129227966139::NO::F4950_P8_DISPLAYID,F4950_P8_CRITERIA:375818206678,

ORACLE中的BITOR和BITXOR

很多人都有一个疑问:ORACLE中为什么只有BITAND而没有BITOR, BITXOR

原因是,有了BITAND, 很容易实现BITOR和BITXOR

BITOR(x,y) = (x + y) - BITAND(x, y);

BITXOR(x,y) = BITOR(x,y) - BITAND(x,y) = (x + y) - BITAND(x, y) * 2;

create or replace function to_base( p_dec in number, p_base in number ) return varchar2isl_strvarchar2(255) default NULL;l_numnumberdefault p_dec;l_hexvarchar2(16) default '0123456789ABCDEF';beginif ( p_dec is null or p_base is null ) thenreturn null;end if;if ( trunc(p_dec) <> p_dec OR p_dec < 0 ) thenraise PROGRAM_ERROR;end if;loopl_str := substr( l_hex, mod(l_num,p_base)+1, 1 ) || l_str;l_num := trunc( l_num/p_base );exit when ( l_num = 0 );end loop;return l_str;end to_base;/create or replace function to_dec( p_str in varchar2, p_from_base in number default 16 ) return numberisl_num number default 0;l_hex varchar2(16) default '0123456789ABCDEF';beginif ( p_str is null or p_from_base is null )thenreturn null;end if;for i in 1 .. length(p_str) loopl_num := l_num * p_from_base + instr(l_hex,upper(substr(p_str,i,1)))-1;end loop;return l_num;end to_dec;/show errorscreate or replace function to_hex( p_dec in number ) return varchar2isbeginreturn to_base( p_dec, 16 );end to_hex;/create or replace function to_bin( p_dec in number ) return varchar2isbeginreturn to_base( p_dec, 2 );end to_bin;/create or replace function to_oct( p_dec in number ) return varchar2isbeginreturn to_base( p_dec, 8 );end to_oct;/

CREATE OR REPLACE FUNCTION Murmurhash3(input_data VARCHAR2, seed NUMBER) RETURN NUMBER IS h NUMBER := seed; c1 NUMBER := 3458204593; -- 0xcc9e2d51 c2 NUMBER := 1735298763; -- 0x1b873593 r1 NUMBER := 15; r2 NUMBER := 13; m NUMBER := 5; n NUMBER := 364292196; -- 0xe6546b64 blkNums NUMBER := LENGTH(input_data) / 4; remaining_bytes VARCHAR2(4); k NUMBER := 0; res NUMBER := 0; BEGIN FOR i IN 0..blkNums-1 LOOP res := 0; FOR j IN 0..3 LOOP res := res + ASCII(SUBSTR(input_data, i*4+j+1, 1)) * POWER(2, (3-j)*8); END LOOP; res := res * c1; res := MOD(res, POWER(2, 32)); res := BITAND(res, POWER(2, 32)-1); res := res || 0; res := BITAND(res, POWER(2, 32)-1); res := BITAND(res * POWER(2, r1), POWER(2, 32)-1); res := res || 0; res := BITAND(res, POWER(2, 32)-1); res := BITAND(res * c2, POWER(2, 32)-1); res := res || 0; res := BITAND(res, POWER(2, 32)-1); h := BITAND(h*m + n, POWER(2, 32)-1); h := BITAND(h+res, POWER(2, 32)-1); END LOOP; remaining_bytes := SUBSTR(input_data, blkNums*4+1); FOR i IN 1..LENGTH(remaining_bytes) LOOP k := k + ASCII(SUBSTR(remaining_bytes, i, 1)) * POWER(2, (4-i)*8); END LOOP; k := k * c1; k := MOD(k, POWER(2, 32)); k := BITAND(k, POWER(2, 32)-1); k := BITAND(k * POWER(2, r1), POWER(2, 32)-1); k := BITAND(k * c2, POWER(2, 32)-1); k := BITAND(k || 0, POWER(2, 32)-1); h := BITXOR(h, k); h := BITXOR(h, LENGTH(input_data)); h := BITAND(h, POWER(2, 32)-1); h := BITAND(h XOR (h SHR 16), POWER(2, 32)-1); h := BITAND(h * 2246822507, POWER(2, 32)-1); h := BITAND(h XOR (h SHR 13), POWER(2, 32)-1); h := BITAND(h * 3226489909, POWER(2, 32)-1); h := BITAND(h XOR (h SHR 16), POWER(2, 32)-1); RETURN h; END; /
06-08
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

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

抵扣说明:

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

余额充值