TO UNSUBSCRIBE: email "unsubscribe issforum" in the body of your message to
[EMAIL PROTECTED] Contact [EMAIL PROTECTED] for help with any problems!
----------------------------------------------------------------------------
Hi all
Attached is a perl script which I wrote to parse the .policy file on the
management console.
This is my FIRST perl script and I am sure there are some fancier ways of
doing things but hey.. this works and I guess that's what counts.
To run the script issue the following command on the management console
(you'll need perl for NT):
TYPE SOMEPOLICY.POLICY | PERL RSEXT.PL > OUTPUT.TXT
Obviously you substitute SOMEPOLICY.POLICY for your policy name and
theOUTPUT file for what ever file you want.
The script produces a comma seperated file with the first line being the
headings:
Event,Description,Enabled Flag,Priority,Display Setting,Log Setting, Kill
Response
This script does not / has not been tested on the built in policy files
ONLY custom policy files ie: new derived policys from the originals.
If you find any bugs please let me know or would like any fields added then
let me know as well.
Regards
MARC CLASS
M"FUY("1E=F5N=#L@"0D)(R!4:&4@179E;G0@#0IM>2 D<')I;G1E=F5N=#TB
M(CL-"FUY("1E=F5N=&9L86<],#L)"2,@179E;G0@1F]U;F0@1FQA9R H1F]R
M(&9I<G-T('1I;64@979E;G0I#0H-"FUY("1E;F%B;&5D.PD)(R!7971H97(@
M=&AE(&5V96YT(&ES($5N86)L960@#0IM>2 D96YA8FQE9&9L86<],#L)(R!E
M;F%B;&5D(&9L86<-"FUY("1P<FEN=&5N86)L960](B([#0H-"FUY("1P<FEN
M=&1E<V,](B([#0H-"FUY("1P<FEO<FET>3L)"2,@179E;G0@4')I;W)I='D-
M"FUY("1P<FEN='!R:6]R:71Y/2(B.PT*#0IM>2 D;&]G9&(["0D)(R!,;V=D
M8B!3971T:6YG#0IM>2 D;&]G9&)F;&%G.PD)(R!,;V=D8B!&;&%G#0IM>2 D
M<')I;G1L;V=D8CTB(CL-"@T*;7D@)&1I<W!L87D["0DC($1I<W!L87D@4V5T
M=&EN9PT*;7D@)&1I<W!F;&%G/3 ["0DC($1I<W!L87D@1FQA9PT*;7D@)'!R
M:6YT9&ES<&QA>3TB(CL-"@T*;7D@)')S:VEL;#L)"0DC(%)32TE,3"!3971T
M:6YG#0IM>2 D<')I;G1R<VMI;&P](B([#0H-"B,@4')I;G0@2&5A9&EN9PT*
M#0IP<FEN=" @(D5V96YT+$1E<V-R:7!T:6]N+$5N86)L960@1FQA9RQ0<FEO
M<FET>2Q$:7-P;&%Y(%-E='1I;F<L3&]G(%-E='1I;F<L($MI;&P@4F5S<&]N
M<V5<;B([#0H-"G=H:6QE("@\/BD@( T*>PT*"6-H;VUP("1?.PDC(%)E;6]V
M92!E;F0@;V8@;&EN92!.97=L:6YE<PT*#0H):68)*"]<6UQ<=&5M<&QA=&5<
M7&-O;FYE8W1I;VYS7%Q<73LJ+RD)(R!"<F5A:R!O=70@=VAE;B!W92!G970@
M=&\@=&AE($-O;FYE8W1I;VYS('-E8W1I;VX@#0H)>PT*"0DD<')I;G1E=F5N
M=#TD979E;G0[#0H)"7!R:6YT;&EN92 H*3L)"2,@4')I;G0@;&%S="!,:6YE
M#0H)"6QA<W0["0D)"2,@17AI="!7:&EL92!,;V]P#0H)?0T*"0T*"6EF( DH
M+UQ;7%QT96UP;&%T95Q<9F5A='5R97-<7%Q=.RHO*0DC(%-K:7 @=&AE(&9I
M<G-T(&]C8W5R96YC92!O9B!;7'1E;7!L871E7&9E871U<F5S7%T[#0H)>PT*
M"0EN97AT.PT*"7T-"@T*"6EF"2@O7%M<7'1E;7!L871E7%QF96%T=7)E<UQ<
M*%QW*RE<7%Q=.RHO*0D)(R!#;VYT86EN<R!<=&5M<&QA=&5<9F5A='5R97-<
M+BXN+@T*"7L-"@D)=6YL97-S"2@O4F5S<&]N<V4O*0T*"0E[#0H)"0DD<')I
M;G1E=F5N=#TD979E;G0["0DC(%-A=F4@=&AE('!R979I;W5S($5V96YT(&9O
M<B!P<FEN=&EN9PD)#0H)"0DD979E;G0])#$["0D)"2,@4V5T('1H92!E=F5N
M="!T;R!T:&4@;F5W('9A;'5E#0H)"0D-"@D)"6EF( DH)&5V96YT9FQA9R!E
M<2 Q*0D)(R!792!H879E(&AI="!A($YE=R!E=F5N= T*"0D)>PT*"0D)"7!R
M:6YT;&EN92 H*3L)"2,@4')I;G0@=&AE('!R979I;W5S(&5V96YT<R!I;F9O
M<FUA=&EO;@T*"0D)?0T*"0D)96QS90D)"0D)(R!)=',@82!4:&4@1DE24U0@
M979E;G0-"@D)"7L-"@D)"0DD979E;G1F;&%G/3$[#0H)"0E]#0H)"0EN97AT
M.PT*"0E]#0H)?0T*#0H):68)*"]>16YA8FQE9%QS*SU"7',K*%QW*RD[*B\I
M"0DC($)E9VEN<R!W:71H($5N86)L960@/2!"(&%N9"!E;F1S(&EN(#L-"@E[
M#0H)"6EF( DH)&5N86)L961F;&%G(&5Q(# I( D)(R!)<R!I="!T:&4@9FER
M<W0@=&EM92!%;F%B;&5D(&ES(&9O=6YD(&9O<B!T:&ES($5V96YT(#\-"@D)
M>PT*"0D))&5N86)L960@/2 D,3L-"@D)"6EF"2@D96YA8FQE9"!E<2 Q*0T*
M"0D)>PT*"0D)"21P<FEN=&5N86)L960@/2 B16YA8FQE9"(["0D-"@D)"7T-
M"@D)"65L<V4-"@D)"7L-"@D)"0DD<')I;G1E;F%B;&5D(#T@(D1I<V%B;&5D
M(CL-"@D)"7T-"@D)"21E;F%B;&5D9FQA9R ](#$[#0H)"0EN97AT.PT*"0E]
M"0T*"7T-"@T*"6EF"2@O7D-H96-K1&5S8W)I<'1I;VY<<RL]4UQS*R\I"2,@
M0F5G:6YS('=I=&@@0VAE8VM$97-C<FEP=&EO;B ]4PT*"7L-"@D))'!R:6YT
M9&5S8R ]("0G.PT*"0EC:&]P("@D<')I;G1D97-C*3L)"2,@4F5M;W9E('1H
M92 [(&%T('1H92!E;F0@;V8@=&AE(&QI;F4@#0H)"6YE>'0[#0H)?0T*#0H)
M:68)*"]>4')I;W)I='E<<RL]3%QS*RA<=RLI.R\I"2,@0F5G:6YS('=I=&@@
M4')I;W)I='D@/2!,(&%N9"!E;F1S(&EN(#L-"@E[#0H)"21P<FEO<FET>2 ]
M("0Q.PD)"2,@,2 ]($AI9V@@,B ]($UE9&EU;2 S(#T@3&]W#0H-"@D):68)
M*"1P<FEO<FET>2!E<2 Q*0T*"0E["0T*"0D))'!R:6YT<')I;W)I='D@/2 B
M2&EG:"([#0H)"7T-"@D)96QS:68)*"1P<FEO<FET>2!E<2 R*0T*"0E[#0H)
M"0DD<')I;G1P<FEO<FET>2 ](")-961I=6TB.PT*"0E]#0H)"65L<VEF"2@D
M<')I;W)I='D@97$@,RD-"@D)>PT*"0D))'!R:6YT<')I;W)I='D@/2 B3&]W
M(CL-"@D)?0T*"0EE;'-E#0H)"7L-"@D)"21P<FEN='!R:6]R:71Y(#T@(C\_
M/R([#0H)"7T-"@D);F5X=#L-"@E]#0H-"@EI9@DH+UY#:&]I8V5<<RL]4UQS
M*RA<=RLI.RHO*0DC(%-E87)C:"!F;W(@( D]4PT*"7L-"@D):68@"2@D9&ES
M<&9L86<@97$@,2D)"2,@5&AE(&QA<W0@4D534$].4T4@=V%S(&$@1$E34$Q!
M60T*"0E[#0H)"0DD<')I;G1D:7-P/20Q.PT*"0D))&1I<W!F;&%G/3 [#0H)
M"7T-"@D)96QS:68@*"1L;V=D8F9L86<@97$@,2D)"2,@5&AE(&QA<W0@4D53
M4$].4T4@=V%S(&$@3$]'1$(-"@D)>PT*"0D))'!R:6YT;&]G9&(@/2 D,3L-
M"@D)"21L;V=D8F9L86<],#L-"@D)?0T*"7T-"@D)#0H):68)*"]24TM)3$PO
M*0D)"0DC($-O;G1A:6YS('1H92!L:6YE(%)32TE,3 T*"7L)#0H)"21Z/2@\
M/BD["0D)"2,@4F5A9"!I;B!N97AT($QI;F4)#0H)"6EF"2@D>B ]?B O7D5N
M86)L961<<RL]0EQS*RA<=RLI.RHO*2 )(R!396%R8V@@9F]R($5N86)L960)
M/4(-"@D)>PT*"0D))'!R:6YT<G-K:6QL(#T@)#$[#0H)"0EI9@DH)'!R:6YT
M<G-K:6QL(&5Q("(Q(BD-"@D)"7L)#0H)"0D))'!R:6YT<G-K:6QL(#T@(EEE
M<R([#0H)"0E]#0H)"0EE;'-I9@DH)'!R:6YT<G-K:6QL(&5Q("(P(BD-"@D)
M"7L)#0H)"0D))'!R:6YT<G-K:6QL(#T@(DYO(CL-"@D)"7T-"@D)"6YE>'0[
M#0H)"7T-"@E]#0H)#0H):68)*"]$25-03$%9+RD)"0D)(R!#;VYT86EN<R!T
M:&4@;&EN92!$:7-P;&%Y#0H)>PD-"@D))&1I<W!F;&%G(#T@,3L)"0DC(%1E
M;&QS('1H92!N97AT('!A<W,@=V4@87)E(&QO;VMI;F<@9F]R(&$@1&ES<&QA
M>2!3971T:6YG#0H)?0T*"0T*"6EF"2@O3$]'1$(O*0D)"0DC($-O;G1A:6YS
M('1H92!W;W)D($Q/1T1"#0H)>PT*"0DD;&]G9&)F;&%G/3$["0D)(R!496QL
M('1H92!N97AT('!A<W,@=&AA="!W92!A<F4@;&]O:VEN9R!F;W(@82!,;V<@
M4V5T=&EN9PT*"7T-"GT)#0H-"B,@16YD#0H-"G-U8B!P<FEN=&QI;F4-"GL)
M#0H)<')I;G0)(B1P<FEN=&5V96YT+"1P<FEN=&1E<V,L)'!R:6YT96YA8FQE
M9"PD<')I;G1P<FEO<FET>2PD<')I;G1D:7-P+"1P<FEN=&QO9V1B+"1P<FEN
M=')S:VEL;%QN(CL)"2,@<')I;G0@;&EN90DD<')I;G1E=F5N=#TB(CL-"@DD
M<')I;G1E=F5N=#TB(CL-"@DD<')I;G1D97-C/2(B.PT*"21P<FEN=&5N86)L
M960](B([#0H))'!R:6YT<')I;W)I='D](B([#0H))'!R:6YT9&ES<#TB(CL-
M"@DD<')I;G1L;V=D8CTB(CL-"@DD<')I;G1R<VMI;&P](B([#0H))&5N86)L
5961F;&%G(#T@,#L-"GT)#0H-"@T*
`
end
