HackBase/CORE
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Escape inputs

Browse Source
This commit is contained in:
Jan Kvetina 2023-01-27 19:46:55 +01:00
parent 67bb97ae8a
commit eeffe12c9a
1 changed files with 8 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
database/procedures/recompile.sql
View File

@ -63,16 +63,16 @@ BEGIN
FROM user_objects o
WHERE o.status != 'VALID'
AND o.object_type NOT IN ('SEQUENCE')
AND (o.object_type LIKE in_type OR in_type IS NULL)
AND (o.object_name LIKE in_name OR in_name IS NULL)
AND (o.object_type LIKE in_type ESCAPE '\' OR in_type IS NULL)
AND (o.object_name LIKE in_name ESCAPE '\' OR in_name IS NULL)
AND o.object_name != $$PLSQL_UNIT -- not this procedure
UNION ALL
SELECT o.object_name, o.object_type
FROM user_objects o
WHERE in_force_y = 'Y'
AND o.object_type IN ('PACKAGE', 'PACKAGE BODY', 'PROCEDURE', 'FUNCTION', 'TRIGGER', 'VIEW', 'SYNONYM')
AND (o.object_type LIKE in_type OR in_type IS NULL)
AND (o.object_name LIKE in_name OR in_name IS NULL)
AND (o.object_type LIKE in_type ESCAPE '\' OR in_type IS NULL)
AND (o.object_name LIKE in_name ESCAPE '\' OR in_name IS NULL)
AND o.object_name != $$PLSQL_UNIT -- not this procedure
) o
ORDER BY CASE o.object_type
@ -146,8 +146,8 @@ BEGIN
SELECT COUNT(*) INTO v_invalids
FROM user_objects o
WHERE o.status != 'VALID'
AND (o.object_type LIKE in_type OR in_type IS NULL)
AND (o.object_name LIKE in_name OR in_name IS NULL)
AND (o.object_type LIKE in_type ESCAPE '\' OR in_type IS NULL)
AND (o.object_name LIKE in_name ESCAPE '\' OR in_name IS NULL)
AND o.object_name != $$PLSQL_UNIT; -- not this procedure
--
DBMS_OUTPUT.PUT_LINE(' -> ' || v_invalids);
@ -160,8 +160,8 @@ BEGIN
SELECT DISTINCT o.object_type, o.object_name
FROM user_objects o
WHERE o.status != 'VALID'
AND (o.object_type LIKE in_type OR in_type IS NULL)
AND (o.object_name LIKE in_name OR in_name IS NULL)
AND (o.object_type LIKE in_type ESCAPE '\' OR in_type IS NULL)
AND (o.object_name LIKE in_name ESCAPE '\' OR in_name IS NULL)
AND o.object_name != $$PLSQL_UNIT; -- not this procedure
ORDER BY o.object_type, o.object_name
) LOOP