<<< NOTED::NOTES$7:[NOTES$LIBRARY]HACKERS.NOTE;1 >>> -< ** Hackers ** >- ================================================================================ Note 1832.9 ldr$unload_image 9 of 15 UTRTSC::VDBURG "Change mode to PANIC" 93 lines 27-MAR-1997 01:39 -< BUILD.COM >- -------------------------------------------------------------------------------- $ if f$getsyi("hw_model") .gt. 1023 $ then $ alpha = 1 $ else $ alpha = 0 $ endif $ if alpha $ then $ if p1 .nes. "" then goto linka $ macro/obj=smon arch+smon+sys$library:lib/lib $ cc/define="ALPHA"/instruct=nofloat/extern=strict- /warning=disable=globalext procproc+sys$library:sys$lib_c/lib $ cc/define="ALPHA" smonload+sys$library:sys$lib_c/lib $ cc/define="ALPHA" smonunload+sys$library:sys$lib_c/lib $linka: $ link/notrace/sysexe smonload $ link/notrace/sysexe smonunload $ link/native_only/bpages=14/section/replace/notraceback/nosysshr/vms_exec- /nodemand_zero/contiguous/share=smon.exe/map=smon/cross/full sys$input:/opt cluster=smon,,,smon,procproc,sys$library:starlet/include=(sys$doinit) sys$loadable_images:sys$base_image.exe/share/sele psect_attr = $linkage , PIC,GBL,NOSHR,NOEXE, RD, WRT psect_attr = exec$init_linkage , PIC,USR,CON,REL,GBL,NOSHR,EXE,RD,WRT,NOVEC psect_attr = exec$init_code , PIC,GBL,NOSHR, EXE, RD, WRT psect_attr = exec$init_000 , PIC,GBL,NOSHR, EXE, RD, WRT psect_attr = exec$init_001 , PIC,GBL,NOSHR, EXE, RD, WRT psect_attr = exec$init_002 , PIC,GBL,NOSHR, EXE, RD, WRT psect_attr = exec$init_sstbl_000 , PIC,GBL,NOSHR, EXE, RD, WRT psect_attr = exec$init_sstbl_001 , PIC,GBL,NOSHR, EXE, RD, WRT psect_attr = exec$init_sstbl_002 , PIC,GBL,NOSHR, EXE, RD, WRT psect_attr = $link$ , PIC,WRT psect_attr = $initial$ , PIC,WRT psect_attr = $literal$ , PIC,NOSHR,WRT psect_attr = $readonly$ , PIC,NOSHR,WRT psect_attr = $code$ , PIC,GBL,NOSHR, EXE, RD, NOWRT psect_attr = $data$ , PIC,GBL,NOSHR, NOEXE, RD, WRT psect_attr = $bss$ , PIC,GBL,NOSHR, NOEXE, RD, WRT collect = nonpaged_readonly_psects/attributes=resident,- exec$nonpaged_code,$code$ collect = nonpaged_readwrite_psects/attributes=resident,- exec$nonpaged_data,$data$,$link$,$literal$,$bss$,- $readonly$,$linkage,exec$nonpaged_linkage collect = initialization_psects/attributes=initialization_code - , exec$init_code - , exec$init_000 - , exec$init_001 - , exec$init_002 - , exec$init_linkage - , exec$init_sstbl_000 - , exec$init_sstbl_001 - , exec$init_sstbl_002 $ else $ if p1 .nes. "" then goto linkv $ macro smon+sys$library:lib/lib $ cc procproc $ cc smonload $ cc smonunload $linkv: $ link/notrace smonload,sys$input/opt sys$share:vaxcrtl.exe/share sys$system:sys.stb/selective $ link/notrace smonunload,sys$input/opt sys$share:vaxcrtl.exe/share sys$system:sys.stb/selective $ link/nosysshr/notraceback/share=smon/contiguous- /symbol=smon/map=smon/full/cross sys$input/opt sys$library:starlet/include:(sys$doinit),- sys$disk:[]smon,procproc,- sys$system:sys.stb/selective vector_table=sys$system:sys.stb psect_attr=$code,noshr psect_attr=$char_string_constants,noshr collect=nonpaged_readonly_psects/attributes=resident,- exec$nonpaged_code,$code collect=nonpaged_readwrite_psects/attributes=resident,- exec$nonpaged_data,$data,$char_string_constants collect=paged_readonly_psects,- exec$paged_code collect=paged_readwrite_psects,- exec$paged_data collect=initialization_psects/attributes=initialization_code,- exec$init_code,- exec$init_000,- exec$init_001,- exec$init_002,- exec$init_pfntbl_001,- exec$init_pfntbl_002,- exec$init_pfntbl_003,- exec$init_sstbl_000,- exec$init_sstbl_001,- exec$init_sstbl_002 $ endif $ copy/log smon.exe sys$common:[sys$ldr]