Rem
Rem $Header: sdo/admin/sdowfspv.sql /main/8 2009/10/13 12:50:15 bkazar Exp $
Rem
Rem sdowfspv.sql
Rem
Rem Copyright (c) 2005, 2009, Oracle and/or its affiliates. 
Rem All rights reserved. 
Rem
Rem    NAME
Rem      sdowfspv.sql - <one-line expansion of the name>
Rem
Rem    DESCRIPTION
Rem      <short description of component this file declares/defines>
Rem
Rem    NOTES
Rem      <other useful comments, qualifications, etc.>
Rem
Rem    MODIFIED   (MM/DD/YY)
Rem    bkazar      10/09/09 - bug 9006338 - wfs_usr_role is modified
Rem    sravada     12/23/08 - bug 7659056
Rem    ningan      10/23/08 - fix bug 7475076
Rem    rchatter    12/28/05 - add wfs admin user 
Rem    rchatter    12/28/05 - Created
Rem


alter session set current_schema=sys;

declare
  stmt VARCHAR2(10000);
begin  
    stmt := ' CREATE role spatial_wfs_admin not identified';
    execute immediate stmt; 
    exception when others then null;
end;                          
/

-- bug7475076
declare
  stmt VARCHAR2(10000);
begin
    stmt := 'ALTER ROLE spatial_wfs_admin NOT IDENTIFIED';
    execute immediate stmt;
    exception when others then null;
end;
/

declare
  stmt VARCHAR2(10000);
  rec_count NUMBER;
begin  
  select count(*) into rec_count from DBA_USERS where USERNAME = 'SPATIAL_WFS_ADMIN_USR' ;
  if(rec_count = 0) then
    stmt := ' CREATE USER spatial_wfs_admin_usr IDENTIFIED BY spatial_wfs_admin_usr ';
    execute immediate stmt; 
  else 
     stmt := ' drop user spatial_wfs_admin_usr cascade ';
     execute immediate stmt;
     stmt := ' CREATE USER spatial_wfs_admin_usr IDENTIFIED BY spatial_wfs_admin_usr ';
     execute immediate stmt; 
  end if;
end;                          
/


-- drop user spatial_wfs_admin_usr cascade;
-- the password for spatial_wfs_admin_usr can be set by the user after installation 
-- CREATE USER spatial_wfs_admin_usr IDENTIFIED BY spatial_wfs_admin_usr;

GRANT CONNECT, RESOURCE, CREATE LIBRARY, create procedure  TO spatial_wfs_admin_usr;
GRANT CREATE ANY DIRECTORY TO spatial_wfs_admin_usr;
GRANT create role, alter any role, drop any role, grant any role TO spatial_wfs_admin_usr;
grant spatial_wfs_admin to spatial_wfs_admin_usr with admin option;
alter user spatial_wfs_admin_usr account lock password expire;

declare
  stmt VARCHAR2(10000);
begin
    stmt := ' CREATE role wfs_usr_role not identified';
    execute immediate stmt;
    exception when others then null;
end;
/


alter session set current_schema=mdsys;