MINI MINI MANI MO

Rem
Rem $Header: ordim/admin/imremchk.sql /main/11 2016/03/07 09:58:56 smavris Exp $
Rem
Rem imremchk.sql
Rem
Rem Copyright (c) 2007, 2016, Oracle and/or its affiliates. 
Rem All rights reserved.
Rem
Rem    NAME
Rem      imremchk.sql - Oracle Multimedia installation check script
Rem
Rem    DESCRIPTION
Rem      This script checks to see if Oracle Multimedia is being used.
Rem
Rem    NOTES
Rem      - must be run as sysdba
Rem      - must be run with serveroutput on to see results
Rem      - This script checks to see if anyone is using our object 
Rem        types or XML schemas.  It does not check to see if dependent 
Rem        products such as Oracle Spatial are installed.
Rem
Rem    MODIFIED   (MM/DD/YY)
Rem    smavris     03/07/16 - Add comment
Rem    smavris     12/06/15 - Move immisc to sys
Rem    smavris     03/26/13 - XbranchMerge smavris_bug-16473669 from
Rem                           st_ordim_12.1.0
Rem    smavris     03/15/13 - Common start and end scripts
Rem    smavris     08/03/12 - Remove cdb restriction
Rem    smavris     07/24/12 - Check for removed status when checking if SDO
Rem                           installed
Rem    smavris     05/24/12 - Restrict removal script to non-CDB mode
Rem    smavris     08/25/09 - Handle locator even if SDO is set OPTION OFF in
Rem                           registry
Rem    smavris     03/05/09 - Invoke locator removal script
Rem    smavris     10/11/07 - Use correct recyclebin view name (bug 6510142)
Rem    smavris     06/04/07 - Checks for the use of Oracle Multimedia
Rem    smavris     05/29/07 - Oracle Multimedia installation check script
Rem    smavris     05/29/07 - Created
Rem
Rem    BEGIN SQL_FILE_METADATA 
Rem    SQL_SOURCE_FILE: ordim/admin/imremchk.sql 
Rem    SQL_SHIPPED_FILE: ord/im/admin/imremchk.sql
Rem    SQL_PHASE:  
Rem    SQL_STARTUP_MODE: NORMAL
Rem    SQL_IGNORABLE_ERRORS: NONE 
Rem    SQL_CALLING_FILE: $SRCHOME/ordim/admin/imremov.sql
Rem    END SQL_FILE_METADATA
Rem

@@?/rdbms/admin/sqlsessstart.sql

SET NUMWIDTH 10
SET LINESIZE 80
SET TRIMSPOOL ON
SET TAB OFF
SET PAGESIZE 100

Rem
Rem ===========================================
Rem Load miscellaneous install package
Rem ===========================================
@@immisc.sql


declare
  tablecnt      NUMBER       := 0;
  schemacnt     NUMBER       := 0;
  loctblcnt     NUMBER       := 0;
  sdo_installed BOOLEAN      := FALSE;


begin

--
-- First check to see if anyone is using our object types
-- 
  select count(unique u.table_name) into tablecnt from sys.dba_tab_columns u 
  where u.table_name not in (select object_name from sys.dba_recyclebin)
  and u.data_type IN ('ORDIMAGE','ORDIMAGESIGNATURE','ORDAUDIO','ORDVIDEO',
                      'ORDDOC','ORDSOURCE','ORDDICOM','ORDDATASOURCE',
                      'SI_STILLIMAGE','SI_COLOR','SI_AVERAGECOLOR',
                      'SI_POSITIONALCOLOR','SI_TEXTURE','SI_COLORHISTOGRAM',
                      'SI_FEATURELIST')
  and (u.data_type_owner IN ('ORDSYS', 'PUBLIC'))
  and (u.owner <> 'PM');

--
-- Next check to see if there are any dependencies on our XML schemas
--

  select count(1) into schemacnt
  from (select d.owner, 
        case when d.type = 'XML SCHEMA' then 
           (select s2.schema_url from sys.dba_xml_schemas s2 
            where s2.int_objname=d.name and s2.owner <> 'ORDSYS') 
        else d.name 
        end NAME, d.type 
  from sys.dba_dependencies d, sys.dba_xml_schemas s 
  where d.referenced_name=s.int_objname 
  and d.name not in (select object_name from sys.dba_recyclebin)
  and (s.schema_url = 'http://xmlns.oracle.com/ord/dicom/anonymity_1_0' 
   or  s.schema_url = 'http://xmlns.oracle.com/ord/dicom/datatype_1_0' 
   or  s.schema_url = 'http://xmlns.oracle.com/ord/dicom/constraint_1_0'
   or  s.schema_url = 'http://xmlns.oracle.com/ord/dicom/rpdatatype_1_0'
   or  s.schema_url = 'http://xmlns.oracle.com/ord/dicom/metadata_1_0'
   or  s.schema_url = 'http://xmlns.oracle.com/ord/dicom/mddatatype_1_0'
   or  s.schema_url = 'http://xmlns.oracle.com/ord/dicom/mapping_1_0'
   or  s.schema_url = 'http://xmlns.oracle.com/ord/dicom/preference_1_0'
   or  s.schema_url = 'http://xmlns.oracle.com/ord/dicom/privateDictionary_1_0'
   or  s.schema_url = 'http://xmlns.oracle.com/ord/dicom/standardDictionary_1_0'
   or  s.schema_url = 'http://xmlns.oracle.com/ord/dicom/orddicom_1_0'
   or  s.schema_url = 'http://xmlns.oracle.com/ord/dicom/UIDdefinition_1_0'
   or  s.schema_url = 'http://xmlns.oracle.com/ord/meta/dicomImage'
   or  s.schema_url = 'http://xmlns.oracle.com/ord/meta/exif'
   or  s.schema_url = 'http://xmlns.oracle.com/ord/meta/ordimage'
   or  s.schema_url = 'http://xmlns.oracle.com/ord/meta/iptc'
   or  s.schema_url = 'http://xmlns.oracle.com/ord/meta/xmp'))
  res where res.name is not null;

--
-- Lastly, check if Locator is being used (SDO_GEOMETRY present with no SDO 
-- installed)
--
-- Bug 22092616 
-- Always set check_linked_on to FALSE.  According to 
-- Siva this is a useless check.  The Spatial library
-- should always be linked in because even Locator uses
-- it. 
  sdo_installed := sys.immisc.isSDOInstalled(FALSE);
  if (not sdo_installed) then
    select count(unique u.table_name) into loctblcnt 
      from sys.dba_tab_columns u 
      where u.table_name not in (select object_name from sys.dba_recyclebin)
      and u.data_type = 'SDO_GEOMETRY'
      and (u.data_type_owner IN ('MDSYS','PUBLIC'))
      and (u.owner not in ('PM','MDSYS'));
  end if;

  if tablecnt > 0 then
    dbms_output.put_line('Oracle Multimedia object types are being used');
  end if;

  IF schemacnt > 0 then
    dbms_output.put_line('Oracle Multimedia XML Schemas are being used');
  end if;

  if loctblcnt > 0 then
    dbms_output.put_line('Oracle Multimedia Locator is being used');
  end if;

  if tablecnt = 0 and schemacnt = 0 and loctblcnt = 0 then
    dbms_output.put_line('Oracle Multimedia is not being used');
  end if;

end;
/


drop package sys.immisc;

@?/rdbms/admin/sqlsessend.sql