-- Search IP Address in code (in format -> 111.222.333.444)

SELECT type, owner||'.'||name  object_name, text
FROM dba_source
WHERE owner NOT IN ('SYS','SYSMAN','XDB')
AND   REGEXP_LIKE(text,'\d+\.\d+\.\d+\.\d+');

-- Search IP Address in numeric or in IPv6 format

WITH q_sysctxt AS
(SELECT 'DB_NAME' param_cd, SYS_CONTEXT('USERENV','DB_NAME') param_val FROM DUAL
 UNION
 SELECT 'INSTANCE' param_cd, SYS_CONTEXT('USERENV','INSTANCE_NAME') param_val FROM DUAL
 UNION
 SELECT 'SERVER_HOST' param_cd, SYS_CONTEXT('USERENV','SERVER_HOST') param_val FROM DUAL
 UNION
 SELECT 'IP_ADDRESS' param_cd, SYS_CONTEXT('USERENV','IP_ADDRESS') param_val FROM DUAL
 UNION
 SELECT 'IP_ADDRESS' param_cd, UTL_INADDR.get_host_address  param_val FROM DUAL
 UNION
 SELECT 'LANGUAGE' param_cd, SYS_CONTEXT('USERENV','LANGUAGE') param_val FROM DUAL
)
SELECT param_cd, param_val
FROM q_sysctxt
WHERE  REGEXP_LIKE(param_val,'\d+\.\d+\.\d+\.\d+') OR REGEXP_LIKE(param_val,':');