Oracle 11.2 ACL ( Portal, Orasso)

declare

vacl VARCHAR2(64):='allnetwork.xml';

TYPE t_principals IS TABLE OF VARCHAR2(256) ;

v_principals t_principals:=t_principals('ORASSO', 'PORTAL');

begin

begin

DBMS_NETWORK_ACL_ADMIN.DROP_ACL

(

acl => vacl

);

exception

when others then

null;

end;

dbms_network_acl_admin.create_acl(

acl => vacl,

description => 'Netzwerk-Connects fuer ALLE',

principal => 'PORTAL',

is_grant => true,

privilege => 'connect'

);

DBMS_NETWORK_ACL_ADMIN.ASSIGN_ACL (

acl =>vacl,

host => '*',

lower_port => 1,

upper_port => 65000);

commit;

FOR j IN v_principals.first..v_principals.last

LOOP

DBMS_NETWORK_ACL_ADMIN.ADD_PRIVILEGE(acl => '/sys/acls/'||vacl,

principal => v_principals(j),

is_grant => true,

privilege => 'connect');

END LOOP;

commit;

/*

SELECT * FROM
dba_network_acls n ,
dba_network_acl_privileges p
WHERE N.ACLID=P.ACLID;

begin
DBMS_NETWORK_ACL_ADMIN.DELETE_PRIVILEGE(acl => '/sys/acls/sso-permissions.xml',
principal => 'APEX_PUBLIC_USER',
is_grant => true,
privilege => 'connect');
end;

select utl_http.request('http://webcache:8093') from dual;

select httpuritype('http://webcache:8093').clob() from dual;

*/

end;