目录

1. 问题

2. 文档概述

3. Oracle userenv()函数功能调研

3.1. 函数名称/函数原型

3.2. 函数功能

3.3. 参数介绍

3.3.1. Parameter

3.4. 函数示例

3.4.1. 示例1： 

3.5. 基于Kingbase适配userenv函数功能的实现

3.5.1. 实现userenv(‘parameter’);函数

---

1. 问题

Kingbase如何实现Oracle的userenv函数功能。

2. 文档概述

本文主要是通过调研Oracle的userenv函数功能，然后基于kingbase自定义函数形式实现userenv函数功能。

3. Oracle userenv()函数功能调研

3.1. 函数名称/函数原型

userenv(‘parameter’);

3.2. 函数功能

userenv函数的功能是返回有关当前会话的信息。例如返回语言名称的ISO缩写、当前数据库使用的语言和地区以及数据库字符集、当前会话ID等等

3.3. 参数介绍

3.3.1. Parameter

Parameter表示当前需要获取的有关当前会话的信息描述字符串。具体的如下表：

3.4. 函数示例

3.4.1. 示例1： 

SQL> select userenv('language') from dual;
 
 
USERENV('LANGUAGE')
----------------------------------------------------
AMERICAN_AMERICA.ZHS16GBK

3.5. 基于Kingbase适配userenv函数功能的实现

3.5.1. 实现userenv(‘parameter’);函数

1、创建userenv函数的空壳，支持任意变量的输入。

create or replace function userenv(anynonarray) returns anynonarray as $$    
declare    
begin    
  case lower($1)    
  when 'sessionid' then    
    return get_session_id();    
  when 'isdba' then    
    return get_isdba();    
  when 'action' then    
    return get_action();    
  when 'lang' then  
    return get_lang();  
  when 'language' then  
    return get_language();  
  else     
    return null;    
  end case;    
end;    
$$ language plpgsql strict;   
CREATE FUNCTION

2、根据oracle中对应的例子去编写对应的实际函数

USERENV(‘SESSIONID’)

• 创建一个序列

create sequence public.pg_session_id_sequence_oracle_comp;

• 授权序列

grant all on sequence public.pg_session_id_sequence_oracle_comp to public;

• 创建依赖函数

create OR replace function get_session_id() returns int8 AS $$     
declare res int8;     
begin    
SELECT currval('public.pg_session_id_sequence_oracle_comp') into res;     
return res;     
exception      
    WHEN sqlstate '55000' THEN      
SELECT nextval('public.pg_session_id_sequence_oracle_comp') into res;     
return res;      
    WHEN sqlstate '42P01' THEN      
create sequence public.pg_session_id_sequence_oracle_comp;    
SELECT nextval('public.pg_session_id_sequence_oracle_comp') into res;     
return res;     
end;     
$$ language plpgsql strict SET client_min_messages to error;

• 使用

select userenv('sessionid'::Text);
 
 USERENV
---------
 1
(1 行记录)

USERENV(‘ISDBA’)

• 创建依赖函数 

create OR replace function get_isdba() returns boolean AS $$     
  select rolsuper from pg_roles where rolname=current_user;    
$$ language sql strict SET client_min_messages to error; 

• 使用

select userenv('isdba'::Text);
 
 USERENV
---------
 true
(1 行记录)

USERENV(‘ACTION’)

• 创建依赖函数

create OR replace function get_ACTION() returns text AS $$     
  select application_name from pg_stat_activity where pid=pg_backend_pid();    
$$ language sql strict SET client_min_messages to error;

• 使用

select userenv('action'::Text);
 
 USERENV
---------
 psql
(1 行记录)

USERENV(‘LANG’)

• 创建依赖函数

create OR replace function get_LANG() returns text AS $$     
   select (regexp_split_to_array(current_setting('lc_messages'), '\.'))[1];    
$$ language sql strict;

• 使用

select userenv('lang'::text);
 
 USERENV
---------
 en_US
(1 行记录)

USERENV(‘LANGUAGE’)

• 创建依赖函数

create OR replace function get_LANGUAGE() returns text AS $$     
    select (regexp_split_to_array(current_setting('lc_monetary'), '\.'))[1]||'.'||pg_client_encoding();  
 $$ language sql strict;  

• 使用

select userenv('language'::text);
 
  USERENV
------------
 en_US.UTF8
(1 行记录)