create or replace function inet_aton( p_str in varchar2 ) return number as l_dot1 number := instr( p_str, ‘.’,1,1 ); l_dot2 number := instr( p_str, ‘.’,1,2 ); l_dot3 number := instr( p_str, ‘.’,1,3 ); begin return to_number(substr(p_str,1,l_dot1-1))*power(256,3)+ to_number(substr(p_str,l_dot1+1, l_dot2-l_dot1-1))*power(256,2)+ to_number(substr(p_str,l_dot2+1,l_dot3-l_dot2-1))*256+ to_number(substr(p_str,l_dot3+1)); end; / create or replace function inet_ntoa( ip_addr in integer ) return string as begin [...]
