chore: publish secure public mirror

2026-08-14 15:35:50 +08:00
commit 37e018e0e0
20 changed files with 7008 additions and 0 deletions
@@ -0,0 +1,23 @@
+-- HENLO_AWR_EXPORT v1.1
+-- DBA only. Requires Diagnostics Pack authorization.
+CREATE OR REPLACE FUNCTION SYS.HENLO_AWR_EXPORT(
+  P_BEGIN_SNAP NUMBER, P_END_SNAP NUMBER, P_DBID NUMBER DEFAULT NULL, P_INSTANCE NUMBER DEFAULT NULL
+) RETURN CLOB AUTHID DEFINER IS
+  L_DBID NUMBER := P_DBID;
+  L_INSTANCE NUMBER := P_INSTANCE;
+  L_HTML CLOB;
+BEGIN
+  IF L_DBID IS NULL THEN SELECT DBID INTO L_DBID FROM V$DATABASE; END IF;
+  IF L_INSTANCE IS NULL THEN SELECT INSTANCE_NUMBER INTO L_INSTANCE FROM V$INSTANCE; END IF;
+  DBMS_LOB.CREATETEMPORARY(L_HTML, TRUE);
+  FOR R IN (SELECT OUTPUT FROM TABLE(DBMS_WORKLOAD_REPOSITORY.AWR_REPORT_HTML(L_DBID, L_INSTANCE, P_BEGIN_SNAP, P_END_SNAP))) LOOP
+    IF R.OUTPUT IS NOT NULL THEN
+      DBMS_LOB.WRITEAPPEND(L_HTML, LENGTH(R.OUTPUT), R.OUTPUT);
+    END IF;
+    DBMS_LOB.WRITEAPPEND(L_HTML, 1, CHR(10));
+  END LOOP;
+  RETURN L_HTML;
+END;
+/
+GRANT EXECUTE ON SYS.HENLO_AWR_EXPORT TO <AGENT_SCHEMA>;
+GRANT SELECT ON SYS.DBA_HIST_SNAPSHOT TO <AGENT_SCHEMA>;