将这段代码转换成Oracle function的函数

将这段代码转换成 Oracle function 的函数需要进行以下步骤：

1. 声明函数名、输入参数和返回值类型。

2. 将 C++ 代码中用到的头文件和命名空间去掉，因为在 Oracle 中不需要。

3. 将 C++ 代码中用到的函数 `_rotl` 改为 Oracle 中对应的函数 `BITROTATELEFT`，使用方法和 C++ 中的 `_rotl` 类似。

4. 将 C++ 代码中用到的 `cout` 和 `system` 函数去掉，因为在 Oracle 中不需要。

根据以上步骤，可以将这段代码转换成 Oracle function 的函数如下：

CREATE OR REPLACE FUNCTION Murmurhash3(input_data VARCHAR2, seed NUMBER)
RETURN NUMBER
IS
    h NUMBER := seed;
    c1 NUMBER := 0xcc9e2d51;
    c2 NUMBER := 0x1b873593;
    r1 NUMBER := 15;
    r2 NUMBER := 13;
    m NUMBER := 5;
    n NUMBER := 0xe6546b64;
    blkNums NUMBER := TRUNC(LENGTH(input_data) / 4);
    remaining_bytes VARCHAR2(4);
    k NUMBER := 0;
BEGIN
    FOR i IN 0..blkNums-1 LOOP
        DECLARE
            s VARCHAR2(4);
            res NUMBER := 0;
        BEGIN
            s := SUBSTR(input_data, i*4+1, 4);
            FOR j IN 0..3 LOOP
                res := res + ASCII(SUBSTR(s, j+1, 1)) * POWER(2, 24-j*8);
            END LOOP;
            res := BITROTATELEFT(res * c1, r1);
            res := BITROTATELEFT(res * c2, r2);
            h := h * m + n;
        END;
    END LOOP;
    remaining_bytes := SUBSTR(input_data, blkNums*4+1, LENGTH(input_data)-blkNums*4);
    CASE LENGTH(remaining_bytes)
        WHEN 1 THEN k := ASCII(SUBSTR(remaining_bytes, 1, 1));
        WHEN 2 THEN k := ASCII(SUBSTR(remaining_bytes, 1, 1)) + ASCII(SUBSTR(remaining_bytes, 2, 1)) * POWER(2, 8);
        WHEN 3 THEN k := ASCII(SUBSTR(remaining_bytes, 1, 1)) + ASCII(SUBSTR(remaining_bytes, 2, 1)) * POWER(2, 8) + ASCII(SUBSTR(remaining_bytes, 3, 1)) * POWER(2, 16);
    END CASE;
    k := BITROTATELEFT(k * c1, r1);
    k := BITROTATELEFT(k * c2, r2);
    h := h XOR k;
    h := h XOR LENGTH(input_data);
    h := BITROTATELEFT(h, 16) XOR h;
    h := BITROTATELEFT(h * 0x85ebca6b, 13);
    h := BITROTATELEFT(h * 0xc2b2ae35, 16) XOR h;
    RETURN h;
END;
/

注意：这段代码中使用了 Oracle 内置函数 `ASCII` 和 `POWER`，前者用于将字符转换为 ASCII 码，后者用于计算幂次方。另外，这段代码中使用了 `BITROTATELEFT` 函数，它是一个自定义函数，用于实现 C++ 代码中的 `_rotl` 函数的功能。