Oracle | TO_LABEL

Oracle TO_LABEL_LIST Version 21c

General Information

Library Note

Morgan's Library Page Header

ACE Director Alum Daniel Morgan, founder of Morgan's Library, is scheduling complimentary technical Workshops on Database Security for the first 30 Oracle Database customers located anywhere in North America, EMEA, LATAM, or APAC that send an email to asra_us@oracle.com. Request a Workshop for your organization today.

Purpose Internal component of Label Security

AUTHID DEFINER

Dependencies

LBAC_CACHE	LBAC_LABEL_LIST	LBAC_STANDARD
LBAC_LABEL

Documented No

First Available Not known

Security Model Owned by SYS with EXECUTE granted to PUBLIC

Source {ORACLE_HOME}/rdbms/admin/prvtolsdd.plb

FROM_LABEL

Undocumented

Demo code from $ORACLE_HOME/rdbms/admin/olse112.sql to_label_list.from_label( polid IN BINARY_INTEGER label1 IN XMLTYPE label2 IN XMLTYPE label3 IN XMLTYPE label4 IN XMLTYPE label5 IN XMLTYPE label6 IN XMLTYPE RETURN XMLTYPE;

...

      BEGIN

       
      FOR erow IN cur LOOP

          IF erow.MAX_READ IS NOT NULL THEN

      

            SELECT NLABEL INTO nlabel

            FROM LBACSYS.ols$lab 

            WHERE ILABEL=erow.MAX_READ;

      

            maxr_label := LBACSYS.lbac_label.new_lbac_label(nlabel);

      

            SELECT NLABEL INTO nlabel

            FROM LBACSYS.ols$lab 

            WHERE ILABEL=erow.MAX_WRITE;

      

            maxw_label := LBACSYS.lbac_label.new_lbac_label(nlabel);

      

            SELECT NLABEL INTO nlabel

            FROM LBACSYS.ols$lab

            WHERE ILABEL=erow.MIN_WRITE;

      

            minw_label := LBACSYS.lbac_label.new_lbac_label(nlabel);

      

            SELECT NLABEL INTO nlabel

            FROM LBACSYS.ols$lab

            WHERE ILABEL=erow.DEF_READ;

      

            defr_label := LBACSYS.lbac_label.new_lbac_label(nlabel);

      

            SELECT NLABEL INTO nlabel

            FROM LBACSYS.ols$lab WHERE 

            ILABEL=erow.DEF_WRITE;

      

            defw_label := LBACSYS.lbac_label.new_lbac_label(nlabel);

      

            SELECT NLABEL INTO nlabel

            FROM LBACSYS.ols$lab

            WHERE ILABEL=erow.DEF_ROW;

      

            row_label := LBACSYS.lbac_label.new_lbac_label(nlabel);

      

            label_list := lbacsys.to_label_list.from_label(erow.pol#, maxr_label, maxw_label, minw_label, defr_label, defw_label, row_label);

          END IF;

          ...

        END LOOP;

        COMMIT;

      EXCEPTION

        WHEN OTHERS THEN

          RAISE;

      END;