1 INFO-VAX	Mon, 25 Mar 2002	Volume 2002 : Issue 165       Contents: 100% in one month!!!  3259J BIG_BUFFS.COM   (Was: VMS 7.3 VLM Fast I/O UWSS It's a Crash Crash CRASH!) Canada Immigration News / Re: DEC C: why does exit(0) really exit with 1? / Re: DEC C: why does exit(0) really exit with 1? / Re: DEC C: why does exit(0) really exit with 1? / RE: DEC C: why does exit(0) really exit with 1? / Re: DEC C: why does exit(0) really exit with 1? / Re: DEC C: why does exit(0) really exit with 1? 6 External authentication + trapping password changes...: Re: External authentication + trapping password changes...: RE: External authentication + trapping password changes... Re: Getting file date/time in C   RE: Hacker Using My Mail Server?  Re: Hacker Using My Mail Server?  RE: Hacker Using My Mail Server?  Re: Hacker Using My Mail Server?  Re: Hacker Using My Mail Server?# Re: Installing Star Receipt Printer # Re: Installing Star Receipt Printer # Re: Installing Star Receipt Printer 7 Re: Low Level format of SCSI Disc in VaxStation 4000VLC  Re: RMS: removing a key  Re: RMS: removing a key  Re: RMS: removing a key  Re: RMS: removing a key L RMU_INIT_GB.COM   (Was: VMS 7.3 VLM Fast I/O UWSS It's a Crash Crash CRASH!)$ Re: Shannon knows DEC -> CPQ -> ????$ RE: Shannon knows DEC -> CPQ -> ????$ Re: Shannon knows DEC -> CPQ -> ????$ Re: Shannon knows DEC -> CPQ -> ????5 Re: Simple question: Can you repeat strings w/ F$FAO?  Re: Telnet problem on VAX/VMS 7 Re: TelnetSym Print Queue Device Name.  IP or Internet?  Re: Upgrading from v7.2 3 VMS 7.3 VLM Fast I/O UWSS It's a Crash Crash CRASH! 7 Re: VMS 7.3 VLM Fast I/O UWSS It's a Crash Crash CRASH!  Re: Where is Freeware 5.0? Re: You will obey my commands   F ----------------------------------------------------------------------  + Date: Mon, 25 Mar 2002 00:56:29 +0000 (UTC)  From: boomshanka@wp.pl# Subject: 100% in one month!!!  3259 8 Message-ID: <a7lsjt$kh1g$6079@engel.scvmaxonline.com.sg>  = http://www.magicmoneygame.com/default.asp?referrer=0852016798   D Register, deposit money, buy nr 11 stocks, get 100% in one month :))   Regards, Marcin. mrultptmeguxmngtppexnuscdissqtqmydrurdhpulomjo   ------------------------------  + Date: Sun, 24 Mar 2002 21:07:04 +0000 (UTC) , From: "Richard Maher" <maher_rj@hotmail.c0m>S Subject: BIG_BUFFS.COM   (Was: VMS 7.3 VLM Fast I/O UWSS It's a Crash Crash CRASH!) 1 Message-ID: <a7lf5m$pde$1@knossos.btinternet.com>    Hi,    $@big_buffs  $run test_buffs   H *WARNING* If you haven't been paying attention, this will probably CRASH
 your machine!   E (Although obviously it shouldn't and I can assure you that was not my  intention when I started out)   F Reminds me of Pooh, Piglet, Rabbit and the sandpit when they're lost -F "Perhaps if we were to look for the sandpit then we might find our way home?"  H Maybe I should start trying to crash a system with unprivileged code and then I'll get something robust?    Regards Richard Maher    $ on warning then exit: $ if .not. f$privilege("cmkrnl,sysprv")  then goto no_priv9 $ if f$getsyi("arch_name") .nes. "Alpha" then goto no_vax 6 $ if f$getsyi("galaxy_member") then write sys$output -B         "You need to add the sec$m_shmgs flag for Galactic Memory" $! $ create big_buffs.mar ;++  ; 4 ; (c) Copyright Tier3 Software. All rights reserved. ; @ ;     Ownership of this software and all associated intellectual@ ;     property rights remain vested in Tier3 Software Ltd.  This@ ;     software  or any other copies thereof  may not be provided6 ;     or otherwise made available to any other person. ; * ;     Do not remove this copyright notice. ;  ;     Author: Richard Maher  ;  ;-- >          .macro define_service,name,narg=0,mode=exec,?endmacro  3         'mode'_routine_count='mode'_routine_count+1   0         .call_entry     max_args=narg,         -0                         home_args=true,        -"                         label=name  "         .save_psect    local_block  2         .psect  'mode'_list,long,wrt,noexe,pic,con           .address        name           .restore_psect           .if not_equal narg            cmpb    (ap),#narg           bgeq    endmacro            movzwl  #ss$_insfarg,r0          ret  	 endmacro:   
         .endc 
         .endm   8         .title  BIG_BUFFS - Demo VLM & Fast I/O routines         .ident  "V1.0"  &         .library "sys$library:lib.mlb"           $vadef         $psldef          $ssdef         $iodef         $iosadef         $prvdef          $plvdef          $cbodef          $syidef   E         one_megabyte=^x100000           ;Divisible by all bage sizes? "         gb_version_from_database=1         db_page_size=512         enable=1         disable=0            kernel_routine_count=0         exec_routine_count=0  0         .psect  exec_list,long,wrt,noexe,pic,con exec_table:   2         .psect  kernel_list,long,wrt,noexe,pic,con
 kernel_table:   B         .psect  maher$data,pic,con,rel,lcl,noshr,noexe,rd,wrt,quad  ) map_start_va:           .blkq           1 ) map_length:             .blkq           1 4 section_id:             .long           sec$k_matequ) section_version:        .long           0 ) region_id:              .blkq           1 ) region_start_va:        .blkq           1 ) region_length:          .blkq           1 / iosa_region_id:         .quad           va$c_p2 ) iosa_start_va:          .blkq           1 ) iosa_length:            .blkq           1 ) iosaobj_start_va:       .blkq           1 ) iosaobj_length:         .blkq           1 ) iosa_handle:            .blkq           1 ) bufobj_start_va:        .blkq           1 ) bufobj_length:          .blkq           1 ) buffer_handle:          .blkq           1 ) read_fandle:            .blkq           1 ) write_fandle:           .blkq           1 ) sys_prv:                .blkq           1 ) del_prv:                .blkq           1 ) old_prv:                .blkq           1 9 syi_itmlst:             .word           4, syi$_page_size 5                         .address        cpu_page_size ,                         .long           0, 0) cpu_page_size:          .long           0 ) syi_iosb:               .quad           0 ) flush_vbn:              .quad           1 ) db_chan:                .word           0   2 gs_name:                .ascii          "MY_BUFFS" gs_name_len=.-gs_name J cr_fao_ctl:             .ascii          "Shared Page Table Region Created, VA = !@XQ, Size = !@ZQ"  cr_fao_len=.-cr_fao_ctl K ms_fao_ctl:             .ascii          "Section !AS mapped, Section Length  = !ZL!/"L                         .ascii          "!_Mapped VA = !@XQ, Mapped Length = !@ZQ"  ms_fao_len=.-ms_fao_ctl F bo_fao_ctl:             .ascii          "Buffer Object Created, Buffer Length = !@ZQ!/"L                         .ascii          "!_Buffer VA = !@XQ, Buffer Handle = !@XQ"  bo_fao_len=.-bo_fao_ctl K iosa_fao_ctl:           .ascii          "IOSA Object Created, IOSA Length =  !@ZQ!/" H                         .ascii          "!_IOSA VA = !@XQ, IOSA Handle = !@XQ"  iosa_fao_len=.-iosa_fao_ctl G io_write_fao:           .ascii          "!@ZQ bytes written for PID !XL  Status !ZW"  io_write_len=.-io_write_fao + fmt_string:             .blkb           255  fmt_string_len=.-fmt_string E gb_error:               .ascii          "%RDB-E-GBVINTAGE, Can't open * database. Global Section version mismatch" gb_error_len=.-gb_error 8 def_fnm:                .ascii          "sys$login:.vlm" def_fnm_len=.-def_fnm 9 abnormal_msg:           .ascii          "(Abnormal Exit)"  abnormal_msg_len=.-abnormal_msg ,                         .align          long3 gs_name_desc:           .long           gs_name_len /                         .address        gs_name 2 cr_fao_ctl_desc:        .long           cr_fao_len2                         .address        cr_fao_ctl2 ms_fao_ctl_desc:        .long           ms_fao_len2                         .address        ms_fao_ctl2 bo_fao_ctl_desc:        .long           bo_fao_len2                         .address        bo_fao_ctl4 iosa_fao_ctl_desc:      .long           iosa_fao_len4                         .address        iosa_fao_ctl4 io_write_fao_desc:      .long           io_write_len4                         .address        io_write_fao6 fmt_string_desc:        .long           fmt_string_len2                         .address        fmt_string) out_string_len:         .long           0 2                         .address        fmt_string4 somewhat_dated:         .long           gb_error_len0                         .address        gb_error8 abnormal_msg_desc:      .long           abnormal_msg_len4                         .address        abnormal_msg  $                         .align  quad db_fab: :                         $fab            fnm=<ondisk_db>, -8                                         dna=<def_fnm>, -<                                         dns=<def_fnm_len>, -8                                         fac=<get,put>, -A                                         chan_mode=<psl$c_exec>, - @                                         lnm_mode=<psl$c_exec>, -8                                         fop=<ufo,cif>, -5                                         alq=<2048>, - 1                                         shr=<upi> 4 db_rec:                 .blkb           db_page_size  @         .psect  maher$code,pic,con,rel,lcl,shr,exe,rd,nowrt,quad  %         define_service  maher$db_open     10$:    .enable         quadword         $setup_call64   6 (         movaq           region_length,r6         $push_arg64     r6*         movaq           region_start_va,r6         $push_arg64     r6$         movaq           region_id,r6         $push_arg64     r6(         $push_arg64     #va$m_shared_pts1         $push_arg64     #va$c_region_ecreate_eown I         $push_arg64     #one_megabyte                   ;Page tables will  round to 8MB,         $call64         sys$create_region_64          .disable        quadword         blbs            r0,20$         ret   1 20$:    $fao_s          ctrstr=cr_fao_ctl_desc, - 0                         outlen=out_string_len, -1                         outbuf=fmt_string_desc, - .                         p1=#region_start_va, -)                         p2=#region_length          blbs            r0,25$         ret  25$:&         pushal          out_string_len+         calls           #1,g^lib$put_output          blbs            r0,30$         ret  30$:A         movl            #gb_version_from_database,section_version             .enable         quadwordI         movq            #<prv$m_sysprv!prv$m_sysgbl!prv$m_prmgbl>,sys_prv           .disable        quadword(         $setprv_s       enbflg=#enable,-(                         prvadr=sys_prv,-&                         prvprv=old_prv            .enable         quadword         $setup_call64   9 %         movaq           map_length,r6          $push_arg64     r6'         movaq           map_start_va,r6          $push_arg64     r6K         movl            #<sec$m_expreg!sec$m_wrt!sec$m_sysgbl!sec$m_gbl>,r6          $push_arg64     r6#         $push_arg64     #psl$c_exec %         $push_arg64     #one_megabyte          $push_arg64     #0$         movaq           region_id,r6         $push_arg64     r6%         movaq           section_id,r6          $push_arg64     r6'         movaq           gs_name_desc,r6          $push_arg64     r6%         $call64         sys$mgblsc_64           .disable        quadword           movl            r0,r5 /         evax_bic        sys_prv,old_prv,del_prv )         $setprv_s       enbflg=#disable,- &                         prvadr=del_prv           movl            r5,r0          blbs            r0,50$)         cmpw            #ss$_nosuchsec,r0          beqlu           40$          ret  40$:&         pushal          somewhat_dated+         calls           #1,g^lib$put_output  50$:1         $fao_s          ctrstr=ms_fao_ctl_desc, - 0                         outlen=out_string_len, -1                         outbuf=fmt_string_desc, - +                         p1=#gs_name_desc, - +                         p2=#one_megabyte, - +                         p3=#map_start_va, - &                         p4=#map_length         blbs            r0,60$         ret  60$:&         pushal          out_string_len+         calls           #1,g^lib$put_output          blbs            r0,65$         ret  65$:          .enable         quadword         $setup_call64   7 (         movaq           buffer_handle,r6         $push_arg64     r6(         movaq           bufobj_length,r6         $push_arg64     r6*         movaq           bufobj_start_va,r6         $push_arg64     r6         $push_arg64     #0#         $push_arg64     #psl$c_exec "         $push_arg64     map_length$         $push_arg64     map_start_va,         $call64         sys$create_bufobj_64          .disable        quadword         blbs            r0,70$         ret  70$:1         $fao_s          ctrstr=bo_fao_ctl_desc, - 0                         outlen=out_string_len, -1                         outbuf=fmt_string_desc, - ,                         p1=#bufobj_length, -.                         p2=#bufobj_start_va, -)                         p3=#buffer_handle          blbs            r0,80$         ret  80$:&         pushal          out_string_len+         calls           #1,g^lib$put_output          blbs            r0,90$         ret  90$:+         $getsyiw_s      itmlst=syi_itmlst,- %                         iosb=syi_iosb          blbc            r0,130$ #         movzwl          syi_iosb,r0          blbs            r0,140$  130$:          ret  140$:           .enable         quadword         $setup_call64   6 &         movaq           iosa_length,r6         $push_arg64     r6(         movaq           iosa_start_va,r6         $push_arg64     r6         $push_arg64     #0#         $push_arg64     #psl$c_exec          clrq            r6(         movl            cpu_page_size,r6H         $push_arg64     r6                      ; 2 x 32 bytes + (space))         movaq           iosa_region_id,r6          $push_arg64     r6%         $call64         sys$expreg_64          blbs            r0,150$          ret  150$:          $setup_call64   7 &         movaq           iosa_handle,r6         $push_arg64     r6)         movaq           iosaobj_length,r6          $push_arg64     r6+         movaq           iosaobj_start_va,r6          $push_arg64     r6         $push_arg64     #0#         $push_arg64     #psl$c_exec #         $push_arg64     iosa_length %         $push_arg64     iosa_start_va ,         $call64         sys$create_bufobj_64          .disable        quadword         blbs            r0,160$          ret  160$: 3         $fao_s          ctrstr=iosa_fao_ctl_desc, - 0                         outlen=out_string_len, -1                         outbuf=fmt_string_desc, - -                         p1=#iosaobj_length, - /                         p2=#iosaobj_start_va, - '                         p3=#iosa_handle          blbs            r0,170$          ret  170$: &         pushal          out_string_len+         calls           #1,g^lib$put_output          blbs            r0,180$          ret  180$:           .enable         quadword/         movq            #<prv$m_altpri>,sys_prv (         $setprv_s       enbflg=#enable,-(                         prvadr=sys_prv,-&                         prvprv=old_prv           $setup_call64   6 &         movaq           read_fandle,r6         $push_arg64     r6'         $push_arg64     #fio$m_expedite $         movaq           g^readast,r6         $push_arg64     r6&         movaq           iosa_handle,r6         $push_arg64     r6(         movaq           buffer_handle,r6         $push_arg64     r65         $push_arg64     #<io$_readvblk!io$m_novcache> $         $call64         sys$io_setup         blbc            r0,190$            $setup_call64   6 '         movaq           write_fandle,r6          $push_arg64     r6'         $push_arg64     #fio$m_expedite %         movaq           g^writeast,r6          $push_arg64     r6&         movaq           iosa_handle,r6         $push_arg64     r6(         movaq           buffer_handle,r6         $push_arg64     r66         $push_arg64     #<io$_writevblk!io$m_novcache>$         $call64         sys$io_setup 190$:0         movl            r0,r5 /         evax_bic        sys_prv,old_prv,del_prv )         $setprv_s       enbflg=#disable,-h&                         prvadr=del_prv           movl            r5,r0i          .disable        quadword         blbs            r0,200$E         ret  200$: "         $create         fab=db_fab         blbs            r0,210$          retw 210$: 0         movw            db_fab+fab$l_stv,db_chan         rety   ;        .page ;        .sbttl  Read Buff ;g' ;        define_service maher$db_read,3t ;tH ;        ifnord  #8,@4(ap),99$                  ; Can descriptor be readB ;        movzwl  @4(ap),r8                      ; Get username lenF ;        bnequ   10$                            ; Check length <> zero! ;        movzwl  #ss$_badparam,r0M ;        ret ;eD ;10$:    cmpw    #uaf070$s_username,r8          ; Check length <= 32 ;        bgequ   20$! ;        movzwl  #ss$_badparam,r0  ;        ret ; G ;20$:    addl3   #dsc$a_pointer,4(ap),r7        ; Get -> to username ->nL ;        ifnord  r8,(r7),99$                    ; Check R access to username stringJ ;        ifnowrt #out_len,@8(ap),99$            ; Check W access to output buffJ ;        ifnowrt #2,@12(ap),99$                 ; Check W access to output lenn ;        brb     100$  ;?K ;99$:    movzwl  #ss$_accvio,r0                 ; Indicate access violationt ;        ret  
         .pageo!         .sbttl  Flush All Buffersn  %         define_service maher$db_flushe            .enable         quadword         $setup_call64   6C!         $push_arg64     flush_vbnI%         $push_arg64     bufobj_length '         $push_arg64     bufobj_start_va (         $push_arg64     iosaobj_start_va         clrq            r7"         movw            db_chan,r7         $push_arg64     r7$         $push_arg64     write_fandle'         $call64         sys$io_performwl          .disable        quadword         blbc            r0,99$  ? ;        movzwl          iosaobj_start_va+iosa$w_iosb_status,r0, ;        blbc            r0,99$e  3         $fao_s          ctrstr=io_write_fao_desc, -c0                         outlen=out_string_len, -1                         outbuf=fmt_string_desc, -C>                         p1=#iosaobj_start_va+iosa$q_count_q, -?                         p2=#iosaobj_start_va+iosa$l_iosb_pid, -S?                         p3=#iosaobj_start_va+iosa$w_iosb_status          blbc            r0,99$  &         pushal          out_string_len+         calls           #1,g^lib$put_outputi 99$:         retb  
         .pagen         .sbttl  Close Database  %         define_service maher$db_close             .enable         quadword         $setup_call64   1r#         $push_arg64     read_fandle &         $call64         sys$io_cleanup         blbc            r0,99$           $setup_call64   1i$         $push_arg64     write_fandle&         $call64         sys$io_cleanup         blbc            r0,99$          .disable        quadword           $delete_bufobj_s -3                         buffer_handle=buffer_handlea         blbc            r0,99$           $delete_bufobj_s -1                         buffer_handle=iosa_handlea         blbc            r0,99$  $         $dassgn_s       chan=db_chan         blbc            r0,99$            .enable         quadword         $setup_call64   4l(         movaq           region_length,r6         $push_arg64     r6*         movaq           region_start_va,r6         $push_arg64     r6#         $push_arg64     #psl$c_execy$         movaq           region_id,r6         $push_arg64     r6,         $call64         sys$delete_region_64          .disable        quadword         blbc            r0,99$   99$:         retu           .title AST routines   @         .psect  maher$code,pic,con,rel,lcl,shr,exe,rd,nowrt,quad  5         .call_entry     home_args=true, label=readaste           ret   @         .psect  maher$code,pic,con,rel,lcl,shr,exe,rd,nowrt,quad  6         .call_entry     home_args=true, label=writeast           ret   
 exec_rundown:_  I         .jsb_entry                              ; Entry point for rundown 9                                                 ; handler           .enable         quadword         $setup_call64   1e#         $push_arg64     read_fandlei&         $call64         sys$io_cleanup           $setup_call64   1d$         $push_arg64     write_fandle&         $call64         sys$io_cleanup          .disable        quadword           $delete_bufobj_s -3                         buffer_handle=buffer_handlee  $         $dassgn_s       chan=db_chan            .enable         quadword         $setup_call64   4 (         movaq           region_length,r6         $push_arg64     r6*         movaq           region_start_va,r6         $push_arg64     r6#         $push_arg64     #psl$c_execo$         movaq           region_id,r6         $push_arg64     r6,         $call64         sys$delete_region_64          .disable        quadword  )         pushal          abnormal_msg_desc +         calls           #1,g^lib$put_output            rsbe  
         .PAGE )         .SBTTL  Privileged Library Vector    ;+K ; Any psect with the VEC attribute will be automatically moved to the start 
 of the image.  ;-6         .psect  dickie$services,page,vec,pic,nowrt,exe  L         .long    plv$c_typ_cmod          ; Set type of vector to change mode
 dispatcher3         .long    0                       ; ReservedgD         .long    kernel_routine_count    ; # of Kernel mode routinesG         .long    exec_routine_count      ; # of Executive mode routines >         .address kernel_table            ; Kernel routine list<         .address exec_table              ; Exec routine list?         .long    0                       ; Krnl rundown handler A         .address exec_rundown            ; Exec   rundown handler 9         .long    0                       ; RMS Dispatcher ?         .long    0                       ; Kernel routine flagsp=         .long    0                       ; Exec routine flags_           .end $! $ macro/list big_buffs.mar $! $ link  /share=big_buffs -         /sysexe -          /map -         /cross -         /full -          /notrace -         /section_binding -         big_buffs.obj, -         sys$input:/options   gsmatch=lequal,1,0  * symbol_vector = (maher$db_open=procedure,-+                  maher$db_flush=procedure,-_*                  maher$db_close=procedure)   protect=yes! collect=safe,_maher$data   $!+ $copy/log big_buffs.exe sys$common:[syslib]  $! $install:==$install/commandh8 $if f$file_attributes("sys$share:big_buffs.exe","KNOWN") $thenc/ $       install replace sys$share:big_buffs.exeh $else!F $       install add sys$share:big_buffs.exe /open/header/share/protect $!C $! If you have your GH_RSRVPGCNT SYSGEN parameter geared up for it,i2 $! you can install maher$share as /RESIDENT as in: $!B $!      install add sys$share:big_buffs.exe /open/protect/resident $endif $! $purge sys$share:big_buffs.exe $! $create test_buffs.cob identification division., program-id.    test_buffs with ident "V1.0". *. data division. working-storage section.K 01  rms$_normal         pic 9(9)        comp    value external rms$_normal.cL 01  rms$_created        pic 9(9)        comp    value external rms$_created.J 01  ss$_normal          pic 9(9)        comp    value external ss$_normal.- 01  sys_status          pic 9(9)        comp.m *m procedure division.  00. +     call "maher$db_open" giving sys_status.r4     if sys_status not = rms$_normal and rms$_created2         call "sys$exit" using by value sys_status.     display "After Open"  ,     call "maher$db_flush" giving sys_status.A     if sys_status not = ss$_normal call "sys$exit" using by value  sys_status.l     display "After Flush".  ,     call "maher$db_close" giving sys_status.A     if sys_status not = ss$_normal call "sys$exit" using by value  sys_status.      display "After Close".  
     stop run.o *l end program test_buffs.  $! $cobol/lis test_buffs.cob 5 $link/exe=test_buffs.exe test_buffs.obj,sys$input/optw   sys$library:big_buffs.exe/share    $! $exit  $!	 $no_priv: K $       write sys$output "Insufficient privilege. You need (CMKRNL,SYSPRV)"  $       exit 44  $no_vax:8 $       write sys$output "This code only works on alpha" $       exit 44    ------------------------------  % Date: Sun, 24 Mar 2002 14:48:13 -0800 0 From: Go-To-Canada.com <office@Go-To-Canada.com>  Subject: Canada Immigration NewsJ Message-ID: <20020324195126.KQYV19900.tomts15-srv.bellnexxia.net@b1tzzt63>   <html>0 <!-- #BeginTemplate "/Templates/blue_fr.dwt" --> <head>" <!-- #BeginEditable "doctitle" -->  <title>Untitled Document</title> <!-- #EndEditable --> H <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-2">! <script language="Javascript1.2">  <!--d message = "Sorry. The right click is  disabled in this site. We appologize for the inconvenience. ";   function NoRightClick(b) {N    if(((navigator.appName=="Microsoft Internet Explorer")&&(event.button > 1))7    ||((navigator.appName=="Netscape")&&(b.which > 1))){     alert(message);    return false;    } } $ document.onmousedown = NoRightClick;  - function MM_displayStatusMsg(msgStr) { //v1.0    status=msgStr;  !   document.MM_returnValue = true;o }, //--> 	 </script>i </head>e <style>b body { SCROLLBAR-FACE-COLOR: 3399FF; SCROLLBAR-HIGHLIGHT-COLOR: FFDFCF; SCROLLBAR-SHADOW-COLOR: 742600;  SCROLLBAR-3DLIGHT-COLOR: 003B74; SCROLLBAR-ARROW-COLOR: FFE5D8; SCROLLBAR-TRACK-COLOR: 3399FF; SCROLLBAR-DARKSHADOW-COLOR: 003B74;  } </style>e <body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">e! <!-- #BeginEditable "content" -->rM <table width="95%" border="0" cellspacing="0" cellpadding="0" align="center">    <tr>U     <td><table width="98%" border="0" cellspacing="0" cellpadding="0" align="center">    <tr>     <td>       <div align="center"><font size="2" face="Arial, Helvetica, sans-serif"><font size="3" color="#0000FF"><b><a name="top"></a><font face="Verdana, Arial, Helvetica, sans-serif" size="1"></font></b></font></font>               <table width="520" border="0" cellspacing="0" cellpadding="0" background="http://www.go-to-canada.com/news/biglogo.gif" height="230">                  <tr>                   <td>T                     <table width="415" cellspacing="0" cellpadding="5" height="172">                       <tr>`                         <td height="10"><b><img src="spacer.gif" width="1" height="46"></b></td>                       </tr>o                       <tr>j                         <td><font face="Arial, Helvetica, sans-serif" size="2"><b><font color="#0000FF">1.                           </font></b></font><a href="#one"><font face="Arial, Helvetica, sans-serif" size="2"><b>News</b></font></a>:<b><font face="Arial, Helvetica, sans-serif" size="2" color="#000000">l                           </font></b><font size="2" face="Arial, Helvetica, sans-serif"><font size="3" color="#0000FF"><font size="2" color="#000000">The                            new changes in Canadian Immigration rules</font></font></font><font face="Arial, Helvetica, sans-serif" size="2" color="#000000">.</font></td>                       </tr>                        <tr>d                         <td><b><font face="Arial, Helvetica, sans-serif" size="2" color="#0000FF">2.o                           </font></b><a href="#two"><font face="Arial, Helvetica, sans-serif" size="2"><b>Sam'slu                           stories </b></font></a>:<font face="Arial, Helvetica, sans-serif" size="2" color="#000000"> 8                           Heating in winter.</font></td>                       </tr>                        <tr>d                         <td><b><font face="Arial, Helvetica, sans-serif" size="2" color="#0000FF">3.                           <a href="#tree">Job Offers</a>: </font></b><font face="Arial, Helvetica, sans-serif" size="2" color="#0000FF"><font color="#000000">Driver, 5                           Halifax </font></font></td>                        </tr>                        <tr>j                         <td><b><font face="Arial, Helvetica, sans-serif" size="2"><font color="#0000FF">4.                           <a href="#four">Canadian facts</a>:</font> </font></b><font face="Arial, Helvetica, sans-serif" size="2" color="#0000FF"><font color="#000000">How?                           the Canadians eat?</font></font></td>                        </tr>                        <tr>d                         <td><b><font face="Arial, Helvetica, sans-serif" size="2" color="#0000FF">5.                           <a href="#five">Humor</a>: </font></b><font face="Arial, Helvetica, sans-serif" size="2" color="#0000FF"><font color="#000000">10 H                           raisons For Being Canadien.</font></font></td>                       </tr>                        <tr>z                         <td><font face="Arial, Helvetica, sans-serif" size="2" color="#000000"><b><font color="#0000FF">6.V                           <a href="#six">Picture</a>:</font></b><font color="#0000FF">                           </font></font><font face="Arial, Helvetica, sans-serif" size="2" color="#0000FF"><font color="#000000">TheA                           biggest hockey stick</font></font></td>                        </tr>y                     </table>                     </td>o           </tr>          </table>         <p>                <p></p><p><font face="Arial, Helvetica, sans-serif" size="3"><a href="http://www.go-to-canada.com">www.go-to-canada.com</a></font></p>         <p>&nbsp;</p>a       </div>	     </td>6   </tr>    <tr>     <td height="379">a       <p><font size="2" face="Arial, Helvetica, sans-serif"><font size="3" color="#0000FF"><b><font face="Verdana, Arial, Helvetica, sans-serif" size="1"><a name="one"></a></font><font face="Verdana, Arial, Helvetica, sans-serif" size="1" color="#FFFFFF">+j         .</font><font face="Verdana, Arial, Helvetica, sans-serif" size="1"> </font></b></font></font></p>{            <p><font size="2" face="Arial, Helvetica, sans-serif"><font size="3" color="#0000FF"><b><font size="2" face="Arial, Helvetica, sans-serif"><font size="3" color="#0000FF"><b><font face="Verdana, Arial, Helvetica, sans-serif" size="1"><img src="http://www.go-to-canada.com/news/tv.gif" width="45" height="55" align="left"></font></b></font></font></b></font></font></p>              <div align="left">n               <p><font size="2" face="Arial, Helvetica, sans-serif"><font size="3" color="#0000FF"><b>NEWS<BR>O                 <font size="1" face="Verdana, Arial, Helvetica, sans-serif">The                  new changes in Canadian Immigration rules</font></b></font><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><br> Q                 Under the proposed regulations of the new Immigration and RefugeetN                 Protection Act (expected to be implemented June 28, 2002), forN                 Skilled Workers there will be an important distinction betweenW                 applications received before and after December 17, 2001. Specifically:                  <br>"                 </font></font></p>             </div>             <ul>               <li>i                 <div align="left"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">IndependenttO                   and Assisted Relative immigrants who are interviewed (or have6N                   had their interview waived) before implementation of the new\                   Act will continue to be assessed against present regulations.</font></div>               </li>                <li>^                 <div align="left"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">N                   Independent and Assisted Relative immigrants who apply on orO                   after December 17, 2001 and who have not been interviewed (or6O                   have not had their interview waived) before implementation of M                   the new Act will be assessed against the new Skilled WorkerpA                   regulations and a pass mark of 80.</font></div>                </li>                <li>i                 <div align="left"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">IndependentrN                   and Assisted Relative immigrants who applied before DecemberM                   17, 2001 and who have not been interviewed (or have not had N                   their interview waived) before implementation of the new Act4                   will also be assessed</font></div>               </li> P               <li><font face="Verdana, Arial, Helvetica, sans-serif" size="1">IfP                 you want to check your eleigibility to immigrate to Canada, fillM                 our <a href="http://www.go-to-canada.com">assessment form</a> 8                 <span lang=BG style='mso-bidi-font-size:; 10.0pt;mso-ansi-language:BG'><o:p></o:p></span></font></li>              </ul>              <p align="center"><a href="#top"><font color="#0000CC" face="Verdana, Arial, Helvetica, sans-serif" size="1"><b>Top</b></font>f               <img src="http://www.go-to-canada.com/news/arrow.gif" width="14" height="14" border="0">               </a></p>       </td>    </tr>r   <tr>     <td height="38">s       <div align="center"><img src="http://www.go-to-canada.com/news/spacer_grey.gif" width="520" height="1"></div>h	     </td>s   </tr>t   <tr>     <td>=       <p><font color="#FFFFFF"><a name="two"></a>.</font></p>t             <p><font size="2" face="Arial, Helvetica, sans-serif"><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><font color="#0000FF"><span class="justify"><b><font size="2" face="Arial, Helvetica, sans-serif"><font size="2" face="Arial, Helvetica, sans-serif"><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><font color="#0000FF"><span class="justify"><b><font color="#0000CC"><img src="http://www.go-to-canada.com/news/sam.jpg" width="107" height="40" align="left"></font></b></span>< /font></font></font></font></b></span></font><font size="2" face="Arial, Helvetica, sans-serif"><span class="justify"><font color="#0000FF" face="Verdana, Arial, Helvetica, sans-serif"><b><font size="2">Sam's               Stories <BR>               </font></b></font><font size="2" face="Arial, Helvetica, sans-serif" color="#0000FF"><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><span class="justify"><b>Sam O               was arrived recently at Canada. Married with two children, he try                to adapt himself to his new Canadian life.</b></span></font></font><font size="2" face="Arial, Helvetica, sans-serif"><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><span class="justify">N               The winter came. The temperatures are slips under zero. The snowP               fall. Sam decide to start the central heating he had in his house.M               In the under ground it discover an enormous tank and a furnace. O               How I will fill this to tank, where to buy the fuel, how to startpO               this machine, owe I to get down each morning for to start it? TheoS               next day, when he filled the tank of his car, hi asked the saleswoman Q               how to buy fuel for its heating. She took her address and says thatlP               THEY will come at 18.00 hours at his home. To the right hour largeR               red truck arrived. The driver took a look of his furnace, then askedG               him to sign 5-6 sheets and for 5 min fills the tank. <br>oM               <i> - Dear Sir</i>, explained the driver, <i>the tank filled by P               this pipe which leaves your house. Each month I would come to fillO               the tank to you, and the payment will be withdraws from your bankiR               account. You have nothing to do. Want you to start your furnace?</i>Q               And the driver pressed on a button. A deaf noise was heard and heat                was to feel. <br> P               -<i> In your saloon you have a thermostat, choose your temperatureR               and that's all. I would come in April for stop your furnace. Goodbye+               and have a good day.</i> <br> d               <i> - Eh, Canada,</i> thought Sam</span></font></font></span></font></font></font></p>             <p align="center"><font color="#0000CC" face="Verdana, Arial, Helvetica, sans-serif" size="1"><b><a href="#top"><font color="#0000CC" face="Verdana, Arial, Helvetica, sans-serif" size="1"><b>Top</b></font>ly               <img src="http://www.go-to-canada.com/news/arrow.gif" width="14" height="14" border="0"></a></b></font></p>l       </td>y   </tr>n   <tr>     <td height="12">s       <div align="center"><img src="http://www.go-to-canada.com/news/spacer_grey.gif" width="520" height="1"></div> 	     </td>n   </tr>    <tr>     <td height="404"> <font color="#0000FF"><b><font face="Verdana, Arial, Helvetica, sans-serif" size="1"><a name="tree"></a></font></b></font><font color="#FFFFFF">.<BR>s             </font><font color="#0000FF"><b><font face="Verdana, Arial, Helvetica, sans-serif" size="1"><img src="http://www.go-to-canada.com/news/jobs.gif" width="58" height="40" align="left"><font size="2">Jobh.             Offers :</font> </font></b></font>H             <table cellspacing=1 cellpadding=5 width=450 bgcolor=#ccdbff$             border=1 align="center">         <tbody>h         <tr>|           <th align=left bgcolor=#003399><font face="Arial, Helvetica, sans-serif" color="#FFFF00" size="3" align="left">Job             Title</font></th> =           <th align=left bgcolor=#003399><font face=helvetica L                   color=#ffffff size=-1 align="left">Date Posted</font></th>=           <th align=left bgcolor=#003399><font face=helveticaoK                   color=#ffffff size=-1 align="left">Job Number</font></th>l
         </tr>K         <tr>N           <td width="40%"><font face=helvetica size=-1>FIVE-TON TRUCK DRIVERS,%             SNOW REMOVAL </font></td>dW           <td align=middle><font face="helvetica" size="-1">March 14, 2002 </font></td>            <td align=middle>              <div align="center"><font face="helvetica" size="-1">8565</font><font size="3" face="Arial, Helvetica, sans-serif" color="#0000FF"></font></div>           </td>a
         </tr>f         <tr>=           <th align=left bgcolor=#003399><font face=helvetica I                   color=#ffffff size=-1 align="left">Employer</font></th>iG           <th align=left bgcolor=#003399 colspan=2><font face=helveticauN                   color=#ffffff size=-1 align="left">HRCC Location</font></th>
         </tr>,         <tr>P           <td><font face=helvetica size=-1>&nbsp; EDMONDS LANDSCAPE CONSTRUCTION&             SERVICES LTD. </font></td>V           <td colspan=2><font face=helvetica size=-1>Halifax, Nova Scotia </font></td>
         </tr>c         <tr>=           <th align=left bgcolor=#003399><font face=helveticad;                   color=#ffffff size=-1>Address</font></th>I=           <th align=left bgcolor=#003399><font face=helveticaiC                   color=#ffffff size=-1>Contact Numbers</font></th>t=           <th align=left bgcolor=#003399><font face=helvetica ;                   color=#ffffff size=-1>Details</font></th>b
         </tr>n         <tr>           <td>O             <pre><font face="helvetica" size="-1">2675 CLIFTON ST PO 8565 STN A$ HALIFAX  NS B3K 5M3</font></pre>           </td>lR           <td valign=top><font face=helvetica size=-1>FAX RESUME/OR IN PERSON-FILL             APPLICATION<br>              T: &nbsp;<br> *             F: (902) 455-9956 </font></td>A           <td valign=top><font face=helvetica size=-1>ON-CALL<br>              <font"M                   face=verdana size=2><b>Salary: </b></font>$12.00-$14.00/HR,              DEP ON EXP<br>             &nbsp; </font></td>A
         </tr>          <tr>G           <th align=left bgcolor=#003399 colspan=3><font face=helveticas?                   color=#ffffff size=-1>Description</font></th> 
         </tr>e         <tr>M           <td colspan=3><font face=helvetica size=-1>HEAVY EQUIPMENT TRAININGaN             AND/ OR EXPERIENCE REQUIRED/ SNOW REMOVAL EXPERIENCE AN ASSET/ AIRR             BRAKE TICKET REQUIRED/ MUST BE AVAILABLE IN THE EVENT OF A SNOW STORM/-             **DEADLINE FEB 28**/ </font></td>/
         </tr>e         </tbody>       </table>z             <p align="center"><font size="2" face="Arial, Helvetica, sans-serif"><a href="http://www.go-to-canada.com">How+               to find a job?</a></font></p>  		<p align="center"><a href="#top"><font color="#0000CC" face="Verdana, Arial, Helvetica, sans-serif" size="1"><b>Top</b></font>`         <img src="http://www.go-to-canada.com/news/arrow.gif" width="14" height="14" border="0">         </a></p>	     </td>T   </tr>/   <tr>     <td height="24">s       <div align="center"><img src="http://www.go-to-canada.com/news/spacer_grey.gif" width="520" height="1"></div>"	     </td>e   </tr>=   <tr>     <td>h      <p><font face="Arial, Helvetica, sans-serif" size="2"><font size="3" color="#0000CC"><b><font face="Arial, Helvetica, sans-serif" size="2"><b><font face="Arial, Helvetica, sans-serif" size="2"><b><font size="2" face="Arial, Helvetica, sans-serif"><b><a name="four"></a></b></font></b></font></b></font></b></font></font><font color="#FFFFFF">.</font></p>            <p><font face="Arial, Helvetica, sans-serif" size="2"><font size="3" color="#0000CC"><b><font face="Arial, Helvetica, sans-serif" size="2"><b><font face="Arial, Helvetica, sans-serif" size="2"><b><font size="2" face="Arial, Helvetica, sans-serif"><b><font color="#FFFFFF"><img src="http://www.go-to-canada.com/news/earth.gif" width="39" height="42" align="left"></font></b></font></b></font></b></font><font size="2" face="Verdana, Arial, Helvetica, sans-serif">d               Canadians Facts</font><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><BR>               </font></b><font face="Arial, Helvetica, sans-serif" size="2"><font color="#0000CC" size="1"><b><font face="Verdana, Arial, Helvetica, sans-serif">Canadian e               Food</font></b></font> <font size="1" face="Verdana, Arial, Helvetica, sans-serif"><br>nO               <font color="#000000">Canada holds few gastronomic surprises. The T               most prolific food outlets you'll come across are the standard WesternP               fast-food chains (McDonald's, Burger King, Kentucky Fried Chicken,W               Pizza Hut and the countless spinoffs) crammed into &quot;food halls&quot;tO               in shopping malls and lining main streets. Added to these are the=O               typical North American diners and countless bagel stores. This ismO               not to say that you can't eat well in Canada. On the contrary, if N               you can afford to give the cheapies a miss you'll find plenty ofT               good-quality upmarket restaurants in most cities. Typical trans-CanadaO               fare seems to be grilled meat (especially beef steak, pork filet,bP               chicken breast) accompanied by vegetables and fries, but there areN               some notable regional specialities. The Maritimes, for instance,N               are famous for their excellent fish, particularly their lobster,Q               salmon, oysters, and scallops. Then there's the province of Quebec,/M               where the generally superb food owes far more to Gallic than to.M               North American influences. At the same time, the choice in most Y               big cities is considerably enlivened by a wide range of ethnic restaurants,.q               typically Italian, Greek, Vietnamese, Chinese, and Japanese.</font></font></font></font></font></p>        <p align="center"><a href="#top"><font color="#0000CC" face="Verdana, Arial, Helvetica, sans-serif" size="1"><b>Top</b></font>`         <img src="http://www.go-to-canada.com/news/arrow.gif" width="14" height="14" border="0">         </a></p>	     </td>t   </tr>t   <tr>     <td height="39">s       <div align="center"><img src="http://www.go-to-canada.com/news/spacer_grey.gif" width="520" height="1"></div>A	     </td>t   </tr>-         <tr>           <td>             <div align="left">              <p><font color="#000000" size="2" face="Arial, Helvetica, sans-serif"><b><font face="Arial, Helvetica, sans-serif" size="2"><font size="3" color="#0000CC"><b><font face="Arial, Helvetica, sans-serif" size="2"><b><font face="Arial, Helvetica, sans-serif" size="2"><b><font size="2" face="Arial, Helvetica, sans-serif"><b><a name="five"></a></b></font></b></font></b></font></b></font></font></b><font color="#FFFFFF">.</font></font></p>f              <font color="#000000" size="2" face="Arial, Helvetica, sans-serif"><b><font color="#000000" size="2" face="Arial, Helvetica, sans-serif"><b><font color="#0000FF" face="Verdana, Arial, Helvetica, sans-serif" size="1"><img src="http://www.go-to-canada.com/news/rire.gif" width="37" height="60" align="right"></font></b></font><font color="#0000FF" face="Verdana, Arial, Helvetica, sans-serif"> j               Canadian </font><font color="#0000FF" face="Verdana, Arial, Helvetica, sans-serif" size="1">.               <font size="2">Humor</font> <BR>                </font></b></font>                <div align="left">                 <p><font size="2" face="Arial, Helvetica, sans-serif"><b><font color="#0000FF" size="1" face="Verdana, Arial, Helvetica, sans-serif">Top|                   Ten Reasons For Being Canadian </font></b><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><br>M                   10. Only country to successfully invade the US and burn its/-                   capital to the ground. <br>f/                   9. Own-an-Eskimo scheme. <br><M                   8. Kill Grizzly bears with huge frigging shotguns and cover 1                   your house in their skins. <br> T                   7. Only country to successfully invade the US and burn its capital%                   to the ground. <br><W                   6. A political leader can admit to smoking pot and his/her popularityo)                   ratings will rise. <br>rM                   5. Where else can you travel 1000 miles over fresh water inv                   a canoe? <br>nT                   4. Only country to successfully invade the US and burn its capital%                   to the ground. <br>>I                   3. You can play hockey 12 months a year, outdoors. <br>0T                   2. Only country to successfully invade the US and burn its capital%                   to the ground. <br>=B                   1. It beats being an American.</font></font></p>               </div>             </div>n             <div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1" color="#999999">If[               you don't like these jokes, be aware that they are Canadians....</font></div>              <p align="center"><a href="#top"><font color="#0000CC" face="Verdana, Arial, Helvetica, sans-serif" size="1"><b>Top</b></font>f               <img src="http://www.go-to-canada.com/news/arrow.gif" width="14" height="14" border="0">               </a></p>           </td>0   </tr>    <tr>     <td height="26">s       <div align="center"><img src="http://www.go-to-canada.com/news/spacer_grey.gif" width="520" height="1"></div> 	     </td>f   </tr>    <tr>     <td>E       <table width="100%" border="0" cellspacing="0" cellpadding="0">          <tr>           <td>              <div align="center">              <p><font face="Arial, Helvetica, sans-serif" size="2"><b><font face="Arial, Helvetica, sans-serif" size="2"><font size="3" color="#0000CC"><b><font face="Arial, Helvetica, sans-serif" size="2"><b><font face="Arial, Helvetica, sans-serif" size="2"><b><font size="2" face="Arial, Helvetica, sans-serif"><b><a name="six"></a></b></font></b></font></b></font></b></font></font></b></font><font color="#FFFFFF">.</font></p>                     <p><font face="Arial, Helvetica, sans-serif" size="2"><b><font size="3" face="Arial, Helvetica, sans-serif"><font color="#0000FF" face="Verdana, Arial, Helvetica, sans-serif" size="2">PictureeM                       of the week:</font></font></b> The biggest hockey stickhW                       in the world, <font face="Arial, Helvetica, sans-serif" size="2"> E                       1985. Duncan, Britsh Columbia</font></font></p>              </div>           </td>e
         </tr>"         <tr>           <td>              <div align="center">k               <p><img src="http://www.go-to-canada.com/news/stick" width="397" height="296" border="1"></p>w               </div> 			d 			  <p align="center"><a href="#top"><font color="#0000CC" face="Verdana, Arial, Helvetica, sans-serif" size="1"><b>Top</b></font>s`         <img src="http://www.go-to-canada.com/news/arrow.gif" width="14" height="14" border="0">         </a><BR><BR></p>           </td>o
         </tr>        </table>	     </td>a   </tr>a   <tr>     <td>R       <div align="center"><img src="spacer_grey.gif" width="400" height="1"></div>	     </td>a   </tr>l </table>_ <table width="90%" border="0" cellspacing="0" cellpadding="3" bgcolor="#F3F3F3" align="center">    <tr>     <td>n             <div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1" color="#000000">Toh               unsubscribe or change the language <a href="http://www.go-to-canada.com/taiwan.php3">click#               here</a></font></div>/	     </td>r   </tr>> </table> </td>"   </tr>  </table> <!-- #EndEditable -->tP <div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">	   </font> x   <table width="101%" border="0" cellspacing="0" cellpadding="0" bgcolor="#B9DCFF" bordercolor="#FFFFFF" align="center">     <tr>       <td height="2">>a         <div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Copyrighti           &copy; Go To Canada 2002 Created by <a href="../www.go-to-canada.com/web"><font color="#000099">Sibell</font></a></font>         </div>       </td>-	     </tr>t
   </table> </div> </body>" <!-- #EndTemplate -->= </html>>   ------------------------------  % Date: Sun, 24 Mar 2002 23:38:49 -0000 / From: Michael Zarlenga <zarlenga@conan.ids.net>f8 Subject: Re: DEC C: why does exit(0) really exit with 1?/ Message-ID: <u9sos9d2p23rdb@corp.supernews.com>   3 Sidebar: It seems Perl's exit behaves the same way.e   -- > -- Mike Zarlenga  >    "Now, throughout history, whenever people get wood, they'll'     think of Trojans!"  - Ned Flanders.-   ------------------------------  % Date: Sun, 24 Mar 2002 23:46:39 -0000-/ From: Michael Zarlenga <zarlenga@conan.ids.net> 8 Subject: Re: DEC C: why does exit(0) really exit with 1?/ Message-ID: <u9spav759o373d@corp.supernews.com>   2 Bill Gunshannon <bill@triangle.cs.uofs.edu> wrote:1 : In article <u9mkqn3t907lda@corp.supernews.com>,"4 :  Michael Zarlenga <zarlenga@conan.ids.net> writes: : |> j/ : |> Many C RTL functions return 0 on failure, e  A : I am not aware of any C RTL functions that return 0 on failure.e4 : Normaly they would return -1.  Can you name one??   + Any RTL function that can return a pointer.e   --   -- Mike Zarlenga  >    "Now, throughout history, whenever people get wood, they'll'     think of Trojans!"  - Ned Flanders.c   ------------------------------  % Date: Sun, 24 Mar 2002 23:53:31 -0000e/ From: Michael Zarlenga <zarlenga@conan.ids.net>k8 Subject: Re: DEC C: why does exit(0) really exit with 1?. Message-ID: <u9spnrjl4gna1@corp.supernews.com>  ) Bill Gunshannon <bill@cs.uofs.edu> wrote:h :> In a word; MALLOC  J : malloc doesn't return an int so there is no way it can return 0.  UnlessK : your one of those people who thinks a NULL pointer is synonymous with theeK : integer value 0. (Hint: research what the numeric value of a NULL pointert& : was on a Prime Mini running Primos.)  < The NULL pointer is, by defintion, value zero, type pointer.  C Why isn't the translation of exit(0)->exit(1) buried in some unix.hn0 header users can include if they want this that?   -- o -- Mike Zarlenga  >    "Now, throughout history, whenever people get wood, they'll'     think of Trojans!"  - Ned Flanders.    ------------------------------  % Date: Sun, 24 Mar 2002 16:44:46 -0800a# From: "Tom Linden" <tom@kednos.com> 8 Subject: RE: DEC C: why does exit(0) really exit with 1?9 Message-ID: <CIEJLCMNHNNDLLOOGNJIOEKPEGAA.tom@kednos.com>   D Bill, is right, which is why PL/I for example has a builtin functionG NULL() which returns the value of the null pointer.  Never could figure=6 out how Prime arrived at the particular value for NULL   > -----Original Message-----8 > From: Michael Zarlenga [mailto:zarlenga@conan.ids.net]& > Sent: Sunday, March 24, 2002 3:54 PM > To: Info-VAX@Mvb.Saic.Com-: > Subject: Re: DEC C: why does exit(0) really exit with 1? >> >>+ > Bill Gunshannon <bill@cs.uofs.edu> wrote:t > :> In a word; MALLOC > L > : malloc doesn't return an int so there is no way it can return 0.  Unless9 > : your one of those people who thinks a NULL pointer is  > synonymous with the"@ > : integer value 0. (Hint: research what the numeric value of a > NULL pointer( > : was on a Prime Mini running Primos.) >>> > The NULL pointer is, by defintion, value zero, type pointer. >FE > Why isn't the translation of exit(0)->exit(1) buried in some unix.hs2 > header users can include if they want this that? >8 > -- > -- Mike Zarlenga >o@ >    "Now, throughout history, whenever people get wood, they'll) >     think of Trojans!"  - Ned Flanders.g >w   ------------------------------  % Date: Sun, 24 Mar 2002 21:47:25 -0500o' From: Howard S Shubs <howard@shubs.net>e8 Subject: Re: DEC C: why does exit(0) really exit with 1?< Message-ID: <howard-6914B5.21472524032002@enews.newsguy.com>  . In article <u9spnrjl4gna1@corp.supernews.com>,1  Michael Zarlenga <zarlenga@conan.ids.net> wrote:o  > > The NULL pointer is, by defintion, value zero, type pointer.  I Whose definition is that?  I was taught that the null pointer contains a =, reserved value, denoted in Pascal as "null".   --   Howard S ShubsD "Run in circles, scream and shout!"  "I hope you have good backups!"' Aren't there any networked SJFs around?R   ------------------------------  % Date: Mon, 25 Mar 2002 00:06:23 -0600eC From: "Craig A. Berry" <craig.berry@nospam.SignalTreeSolutions.com> 8 Subject: Re: DEC C: why does exit(0) really exit with 1?H Message-ID: <craig.berry-F9CD36.00062325032002@news.directvinternet.com>  / In article <u9sos9d2p23rdb@corp.supernews.com>,r1  Michael Zarlenga <zarlenga@conan.ids.net> wrote:#  5 > Sidebar: It seems Perl's exit behaves the same way.f  9 Sort of.  From pod/perlport.pod in the Perl distribution:   
 =item exit  H Emulates UNIX exit() (which considers C<exit 1> to indicate an error) byG mapping the C<1> to SS$_ABORT (C<44>).  This behavior may be overridden @ with the pragma C<use vmsish 'exit'>.  As with the CRTL's exit()B function, C<exit 0> is also mapped to an exit status of SS$_NORMALH (C<1>); this mapping cannot be overridden.  Any other argument to exit()- is used directly as Perl's exit status. (VMS)    ------------------------------  % Date: Sun, 24 Mar 2002 15:17:35 -0500o* From: Chuck Chopp <ChuckChopp@rtfmcsi.com>? Subject: External authentication + trapping password changes... + Message-ID: <3C9E345F.C8CB09F4@rtfmcsi.com>b  G I've been searching the OpenVMS web site, the "Ask The Wizard" archivestD and the OpenVMS FAQ looking for up-to-date information regarding theH external authentication features that were supposed to be implemented inE OpenVMS v7.3 with full documentation & support for the development ofMF custom external authentication schemes [e.g. single sign-on].  So far,F nothing is really leaping out at me identifying what the API functions@ look like and what callback functions have to be exported from aH shareable image to implement an external authentication system.  Most ofG the searches either refer to old generalized information about what was<A going to be made available in v7.3 or else it is just old product D feature information mentioning that the external authentication only works with NT domains.  F I need to verify that all methods available for changing a password onE OpenVMS can be tapped/monitor/intercepted so that all password changeoF events can be trapped for purposes of properly processing a plain textH password [e.g. hashing it, public key encrypting it, etc...] for storageH in a single sign-on type of application.  I'm thinkinging that I need toH make sure that "SET PASSWORD", AUTHORIZE, the $SETUAI system service andF LOGINOUT.EXE all make use of the same external authentication hooks soA that there is a 100% reliable method of getting the username, oldcB password [optional] and new password associated with each password* change that happens for each user account.  E I'd also like to be able to track other changes, too, such as accountfF quotas, granting/revoking of rights identifiers, etc..., w/o having to? resort to periodic polling and comparing of accounts vs. stored/F information in a database.  I know that the audting system can achieveD this type of thing, so perhaps I just need to enable alarms and then@ monitor a mailbox that receives the audit alarms to perform this additional work.  2 I don't have a hard copy of any OpenVMS v7.3 docs.  G Does anybody hav any URLs that point to where I can look on line to getr" started with the research on this?     TIA,   Chuckf -- Chuck Choppt  8 ChuckChopp@rtfmcsi.com            http://www.rtfmcsi.com0                                   ICQ # 22321532@ RTFM Consulting Services Inc.     864 801 2795 voice & voicemail2 103 Autumn Hill Road              864 801 2774 fax4 Greer, SC  29651                  800 774 0718 pager7                                   8007740718@skytel.com    ------------------------------    Date: 24 Mar 2002 17:59:13 -0600- From: Kilgallen@SpamCop.net (Larry Kilgallen)hC Subject: Re: External authentication + trapping password changes...t3 Message-ID: <X1xZD+qhv0NI@eisner.encompasserve.org>e  X In article <3C9E345F.C8CB09F4@rtfmcsi.com>, Chuck Chopp <ChuckChopp@rtfmcsi.com> writes:  I > I've been searching the OpenVMS web site, the "Ask The Wizard" archivesvF > and the OpenVMS FAQ looking for up-to-date information regarding theJ > external authentication features that were supposed to be implemented inG > OpenVMS v7.3 with full documentation & support for the development of<H > custom external authentication schemes [e.g. single sign-on].  So far,  J I don't know who said 7.3, but this area is relatively unchanged for V7.3.J There are interfaces only used by NT Affinity code, and they have not beenD made public.  Typically that means they are still subject to change.  H > I need to verify that all methods available for changing a password onG > OpenVMS can be tapped/monitor/intercepted so that all password changeaH > events can be trapped for purposes of properly processing a plain textJ > password [e.g. hashing it, public key encrypting it, etc...] for storageJ > in a single sign-on type of application.  I'm thinkinging that I need toJ > make sure that "SET PASSWORD", AUTHORIZE, the $SETUAI system service andH > LOGINOUT.EXE all make use of the same external authentication hooks soC > that there is a 100% reliable method of getting the username, oldeD > password [optional] and new password associated with each password, > change that happens for each user account.  E SET PASSWORD and LOGINOUT actually share the same code if you look at C the listings, so whenever something is provided for one of those ito should work for both.   C AUTHORIZE and $SETUAI are entirely different because they deal only D with VMS-style authentication using SYSUAF.  They know nothing aboutE NT domain names and the rest of that.  Of course even if they did puteH hooks in those facilities, it would not intercept a program I write thatH modifies SYSUAF with RMS calls.  You are probably better off to considerG AUTHORIZE and $SETUAI to be "brute force" techniques in the category ofaF home-brew programs that modify SYSUAF.  Also note that $SETUAI is likeH $GETUAI, and $GETUAI is very much a poor relation of the general $GETxxxF services, as $GETUAI must call RMS.  Thus operates in exec mode ratherE than kernel mode and is constrained regarding asynchronous operation,s etc.  G > I'd also like to be able to track other changes, too, such as accounttH > quotas, granting/revoking of rights identifiers, etc..., w/o having toA > resort to periodic polling and comparing of accounts vs. storedoH > information in a database.  I know that the audting system can achieveF > this type of thing, so perhaps I just need to enable alarms and thenB > monitor a mailbox that receives the audit alarms to perform this > additional work.  @ That sounds like what you should do.  To reach a grand vision ofA authentication interconnected with the rest of the world has very @ little to do with process quotas.  Likewise, adding accounts andA changing Identifiers would be hard to generalize across operatingn systems.  4 > I don't have a hard copy of any OpenVMS v7.3 docs.  C You should have soft copy on the documentation CDROM that came withi@ your copy of VMS, but you really need the documentation for some future release :-)   ------------------------------  % Date: Sun, 24 Mar 2002 21:14:01 -0500n+ From: "Main, Kerry" <Kerry.Main@Compaq.com>tC Subject: RE: External authentication + trapping password changes... T Message-ID: <BE56C50EA024184DAF48F0B9A47F5CF401AB1DA7@kaoexc01.americas.cpqcorp.net>    Re: VMS V7.3 doc's .. Reference:= http://www.openvms.compaq.com:8000/index.html [Main doc page]eH http://www.openvms.compaq.com:8000/73final/6346/6346pro.html [V7.3 Guide to System Security]nF http://www.openvms.compaq.com:8000/73final/6647/kerberos_relnotes.html [kerberos V5 Release notes]u  E I suspect part of what you might be looking for is the ACME, CDSA anda, SSL features which are apparently in V7.3-1.   Regards,    
 Kerry Main Senior Consultant. Compaq Canada Corp.i Professional Servicesn Voice: 613-592-4660  Fax  :  819-772-7036 Email: Kerry.Main@Compaq.com     -----Original Message-----7 From: Larry Kilgallen [mailto:Kilgallen@SpamCop.net]=20  Sent: March 24, 2002 6:59 PM To: Info-VAX@Mvb.Saic.ComcC Subject: Re: External authentication + trapping password changes...     7 In article <3C9E345F.C8CB09F4@rtfmcsi.com>, Chuck Choppe  <ChuckChopp@rtfmcsi.com> writes:  C > I've been searching the OpenVMS web site, the "Ask The Wizard"=20.D > archives and the OpenVMS FAQ looking for up-to-date information=20I > regarding the external authentication features that were supposed to=20yI > be implemented in OpenVMS v7.3 with full documentation & support for=20cH > the development of custom external authentication schemes [e.g. single   > sign-on].  So far,  D I don't know who said 7.3, but this area is relatively unchanged forG V7.3. There are interfaces only used by NT Affinity code, and they havedE not been made public.  Typically that means they are still subject to  change.   H > I need to verify that all methods available for changing a password on  J > OpenVMS can be tapped/monitor/intercepted so that all password change=20H > events can be trapped for purposes of properly processing a plain text  E > password [e.g. hashing it, public key encrypting it, etc...] for=20=H > storage in a single sign-on type of application.  I'm thinkinging that  H > I need to make sure that "SET PASSWORD", AUTHORIZE, the $SETUAI system  ? > service and LOGINOUT.EXE all make use of the same external=20 D > authentication hooks so that there is a 100% reliable method of=20C > getting the username, old password [optional] and new password=20>D > associated with each password change that happens for each user=20
 > account.  E SET PASSWORD and LOGINOUT actually share the same code if you look at2C the listings, so whenever something is provided for one of those its should work for both.n  H AUTHORIZE and $SETUAI are entirely different because they deal only withB VMS-style authentication using SYSUAF.  They know nothing about NTH domain names and the rest of that.  Of course even if they did put hooksB in those facilities, it would not intercept a program I write thatH modifies SYSUAF with RMS calls.  You are probably better off to considerG AUTHORIZE and $SETUAI to be "brute force" techniques in the category of F home-brew programs that modify SYSUAF.  Also note that $SETUAI is likeH $GETUAI, and $GETUAI is very much a poor relation of the general $GETxxxF services, as $GETUAI must call RMS.  Thus operates in exec mode ratherE than kernel mode and is constrained regarding asynchronous operation,/ etc.  J > I'd also like to be able to track other changes, too, such as account=20H > quotas, granting/revoking of rights identifiers, etc..., w/o having to  D > resort to periodic polling and comparing of accounts vs. stored=20H > information in a database.  I know that the audting system can achieve  I > this type of thing, so perhaps I just need to enable alarms and then=20dE > monitor a mailbox that receives the audit alarms to perform this=20B > additional work.  @ That sounds like what you should do.  To reach a grand vision ofH authentication interconnected with the rest of the world has very littleB to do with process quotas.  Likewise, adding accounts and changingA Identifiers would be hard to generalize across operating systems.   4 > I don't have a hard copy of any OpenVMS v7.3 docs.  H You should have soft copy on the documentation CDROM that came with yourB copy of VMS, but you really need the documentation for some future release :-)w   ------------------------------  % Date: Sun, 24 Mar 2002 18:05:48 -0500/( From: David Froble <davef@tsoft-inc.com>( Subject: Re: Getting file date/time in C, Message-ID: <3C9E5BCC.8060606@tsoft-inc.com>   Arne Vajhj wrote:   > Joe wrote: > ] >>Arne Vajhj <arne.vajhoej@gtech.com> wrote in message news:<3C9B5163.D0127677@gtech.com>...e >> >>>C RTL : stat function= >>>VMS   : RMS calls ($OPEN or $DISPLAY with appropriate XAB)r >>>n. >>Not sure what's "behind" the stat( ) call... >> >  > I do not know either but:GC >   1) it takes a filename not a file pointer or file descriptor asn
 > argumentH >   2) the HELP says that neither R, W or X access to the file is needed >  a > G >>I believe that $DISPLAY must be preceeded by $OPEN (and that $OPEN is-% >>subject to RMS file level locking).2 >> > ? > Since it is not necesarry to touch a single byte in the file,:< > then it may be possible to get through  with an $OPEN with > proper FAC and SHR options.c > G > BTW, the original poster explicit stated that the file was not open !  >  > Arne >   Q It's not required to open the file.  Trundling through all the file header stuff  M is a bit of a chore.  All the info is in the fine manual, but some trial and 6M error will be required.  What you read isn't always what you understand.  :-)C  O The following isn't in C, I prefer other languages.  It's also a bit long.  It cK does work.  I should have included the file defining the constants, but it kM doesn't really matter.  I've never seen anything like that change since 1978.w  K If you want other info, the technique is the same, long and difficult.  :-)a  N 1       SUB FILEINFO(   STRING FILE.SPEC$ ,             !  File spec (input) &G                          LONG F.SZ% ,                    !  File size &eK                          STRING CRE.DATE$ ,              !  Creation date &tH                          STRING E$ ,                     !  Error text &M                          WORD E% )                       !  Completion statusn  N          !********************************************************************
          !-          !       Program:        FILEINFO.BASlI          !       Function:       Look-up File Information Using File Spece%          !       Version:        1.00t0          !       Created:        October 1, 2001$          !       Author(s):      DFE
          !%          !       Purpose/description:a
          !I          !               This subprogram will accept a file specificationU?          !               and look-up information for that file.'J          !               Data returned will be filesize and creation date.
          !N          !********************************************************************
          !A          !        Copyright 2001 by Dave Froble Enterprises, Inc. 
          !A          !       This program is the sole property of Dave Froble A          !       Enterprises, Inc. and may not be copied in whole)B          !       or in part without the express written permission1          !       of Dave Froble Enterprises, Inc.o
          !N          !********************************************************************
          !&          !       Modification history:
          !N          !********************************************************************  5          OPTION SIZE = ( INTEGER WORD , REAL DOUBLE )   %          %INCLUDE "APPLIB:FABBLK.INC"R%          %INCLUDE "APPLIB:NAMBLK.INC"w%          %INCLUDE "APPLIB:FIBBLK.INC"@    .          EXTERNAL LONG CONSTANT  SS$_NORMAL, &+                                  IO$_ACCESS   .          EXTERNAL LONG FUNCTION  SYS$ASCTIM, &.                                  SYS$ASSIGN, &.                                  SYS$DASSGN, &-                                  SYS$PARSE, &r,                                  SYS$QIOW, &+                                  SYS$SEARCHz              RECORD LW            VARIANT              CASE>                  STRING  LW$=4              CASEi                  LONG    LW?            END VARIANT          END RECORD,          DECLARE LW Le              RECORD IOSB_STRUCT                   WORD    STAT%                  WORD    CNT%-                  LONG    ADDR%          END RECORD0J          DECLARE IOSB_STRUCT IOSB                        !  I/O status blk              RECORD DESCRIPTOR                  WORD    SIZE%                   WORD    UNUSED%                  LONG    ADDR%          END RECORDrJ          DECLARE DESCRIPTOR FIBDESC                      !  FIB descriptorL          DECLARE DESCRIPTOR FILE_IN                      !  Search file desc              RECORD FABFNA!                  STRING  BUFF$=64           END RECORDoK          DECLARE FABFNA FILENAME                         !  Search filenameu              RECORD NAMSTR                   STRING  RES$=96                   STRING  EXP$=96          END RECORD0L          DECLARE NAMSTR N                                !  Result filenames              RECORD FNAMEe!                  STRING  BUFF$=39-          END RECORD3P          DECLARE FNAME F_IN                              !  QIOW filename string              RECORD ACBBLK#                  WORD    DATE.SIZE% #                  WORD    DATE.CODE%a#                  LONG    DATE.ADDR%p#                  WORD    STAT.SIZE%i#                  WORD    STAT.CODE%x#                  LONG    STAT.ADDR%d                  LONG    EOB%           END RECORD4            RECORD QDATEe                  LONG    DATE1%s                  LONG    DATE2%T          END RECORD             RECORD STATBLK !                  STRING  BUFF$=32)          END RECORD   K          DECLARE ACBBLK ACB                              !  Attributes listtP          DECLARE QDATE CDATE                             !  Creation date bufferL          DECLARE STATBLK STAT                            !  Statistics block    P          DECLARE LONG CONSTANT ATR$C_CREDATE = 17        !  64 BIT CREATION DATEP          DECLARE LONG CONSTANT ATR$S_CREDATE = 8         !  64 BIT CREATION DATEQ          DECLARE LONG CONSTANT ATR$C_STATBLK = 9         !  32 BYTE STATISTICS BLt OCKeQ          DECLARE LONG CONSTANT ATR$S_STATBLK = 32        !  32 BYTE STATISTICS BLn OCKp            DECLARE LONG STAT%u    E          DECLARE FABBLK FAB                              !  FAB blocknE          DECLARE NAMBLK NAM                              !  NAM blocklE          DECLARE FIBBLK FIB                              !  FIB blockm    H          FAB::BUFF$ = STRING$(LEN(FAB::BUFF$),0%)        !  Init the FAB          FAB::B_BID = FAB$C_BIDr%          FAB::B_BLN = LEN(FAB::BUFF$)e*          FAB::L_FNA = LOC(FILENAME::BUFF$)*          FAB::B_FNS = LEN(FILENAME::BUFF$)          FAB::L_FOP = FAB$M_NAM %          FAB::L_NAM = LOC(NAM::B_BID)i  H          NAM::BUFF$ = STRING$(LEN(NAM::BUFF$),0%)        !  Init the NAM          NAM::B_BID = NAM$C_BIDl%          NAM::B_BLN = LEN(NAM::BUFF$)e"          NAM::B_RSS = LEN(N::RES$)"          NAM::L_RSA = LOC(N::RES$)"          NAM::B_ESS = LEN(N::EXP$)"          NAM::L_ESA = LOC(N::EXP$)  J          FIBDESC::SIZE% = 96%                            !  FIB descriptor          FIBDESC::UNUSED% = 0%+          FIBDESC::ADDR% = LOC(FIB::L_ACCTL)   K          ACB::DATE.SIZE% = 8%                            !  Attributes listh(          ACB::DATE.CODE% = ATR$C_CREDATE-          ACB::DATE.ADDR% = LOC(CDATE::DATE1%)c          ACB::STAT.SIZE% = 32%(          ACB::STAT.CODE% = ATR$C_STATBLK+          ACB::STAT.ADDR% = LOC(STAT::BUFF$)           ACB::EOB% = 0%g      J          E% = 0%                                         !  Assume successL          E$ = ""                                         !  Clear error textH          CH% = 0%                                        !  Init channelI          FILENAME::BUFF$ = FILE.SPEC$                    !  Get file specr    K          STAT% = SYS$PARSE( FAB::B_BID , , )             !  Parse file spec7.          IF      ( STAT% AND SS$_NORMAL ) = 0%*          THEN    CALL VMSERR( STAT% , E$ )C                  E$ = "Unable to PARSE: " + FILE.SPEC$ + " - " + E$                   E% = -1%                   SUBEXIT          END IF     M          STAT% = SYS$SEARCH( FAB::B_BID , , )            !  Look-up file specv.          IF      ( STAT% AND SS$_NORMAL ) = 0%*          THEN    CALL VMSERR( STAT% , E$ )D                  E$ = "Unable to SEARCH: " + FILE.SPEC$ + " - " + E$                  E% = -1%-                  SUBEXIT          END IF0  9          Z1% = NAM::B_NODE + NAM::B_DEV + NAM::B_DIR + 1%n5          Z2% = NAM::B_NAME + NAM::B_TYPE + NAM::B_VERsH          FILE.NAME$ = MID(N::RES$,Z1%,Z2%)               !  Got filename    O          Z1% = NAM::B_NODE + 1%                          !  Open channel to DEVe          Z2% = NAM::B_DEV $          DEV$ = MID(N::RES$,Z1%,Z2%)-          STAT% = SYS$ASSIGN( DEV$ , CH% , , )o.          IF      ( STAT% AND SS$_NORMAL ) = 0%*          THEN    CALL VMSERR( STAT% , E$ )I                  E$ = "Unable to assign channel to: " + DEV$ + " - " + E$r                  E% = -1%t                  SUBEXIT          END IFn    D          FIB::BUFF$ = STRING$(FIB$C_LENGTH,0%)           !  Init FIB&          FIB::L_ACCTL = FIB$M_NORECORD:          FIB::W_DID(Z%) = NAM::W_DID(Z%) FOR Z% = 1% TO 3%  O          F_IN::BUFF$ = FILE.NAME$                        !  Init input filenamed)          FILE_IN::SIZE% = LEN(FILE.NAME$)h          FILE_IN::UNUSED% = 0%*          FILE_IN::ADDR% = LOC(F_IN::BUFF$)  Q          STAT% = SYS$QIOW(       0% BY VALUE ,           !  Get file attributes &i1                                  CH% BY VALUE , &r8                                  IO$_ACCESS BY VALUE , &0                                  IOSB::STAT% , &0                                  0% BY VALUE , &0                                  0% BY VALUE , &A                                  LOC(FIBDESC::SIZE%) BY VALUE , & A                                  LOC(FILE_IN::SIZE%) BY VALUE , &i0                                  0% BY VALUE , &0                                  0% BY VALUE , &B                                  LOC(ACB::DATE.SIZE%) BY VALUE , &.                                  0% BY VALUE ).          IF      ( STAT% AND SS$_NORMAL ) = 0%*          THEN    CALL VMSERR( STAT% , E$ ):                  E$ = "Unable to queue IO$_ACCESS - " + E$                  E% = -1%n%                  GOTO Exit_Processinge          END IFo          STAT% = IOSB::STAT%.          IF      ( STAT% AND SS$_NORMAL ) = 0%*          THEN    CALL VMSERR( STAT% , E$ )<                  E$ = "Unable to execute IO$_ACCESS - " + E$                  E% = -1%f%                  GOTO Exit_Processingo          END IFt  A          L::LW$ = MID(STAT::BUFF$,7%,2%) + MID(STAT::BUFF$,5%,2%)UE          F.SZ% = L::LW                                   !  File sizeE  I          D$ = SPACE$(23)                                 !  Creation dateiD          STAT% = SYS$ASCTIM( DATE.LEN% , D$ , CDATE::DATE1% , "0"L ).          IF      ( STAT% AND SS$_NORMAL ) = 0%*          THEN    CALL VMSERR( STAT% , E$ )6                  E$ = "Unable to convert date - " + E$                  E% = -1%i          ELSE    CRE.DATE$ = D$o          END IFb     Exit_Processing:          IF      CH%N          THEN    STAT% = SYS$DASSGN( CH% BY VALUE )      !  Deassign ch to DEV          END IF               SUBENDi  $ And you'll need these include files.   $ t applib:fabblk.incw<          !**************************************************0          !           FAB Block Record Definition<          !**************************************************  H          DECLARE LONG CONSTANT FAB$C_BID = 3             !  code for fab6          DECLARE LONG CONSTANT FAB$M_NAM = x'01000000'            RECORD FABBLK                  VARIANT                          CASEoL                                  STRING  BUFF$=80        !  Entire FAB block                          CASE-D                                  BYTE    B_BID           !  block idE                                  BYTE    B_BLN           !  block lennO                                  WORD    W_IFI           !  internal file indexeH                                  LONG    L_FOP           !  file optionsB                                  LONG    L_STS           !  statusH                                  LONG    L_STV           !  status valueO                                  LONG    L_ALQ           !  allocation quantitykQ                                  WORD    W_DEQ           !  default allocation que antityG                                  BYTE    B_FAC           !  file accesseH                                  BYTE    B_SHR           !  file sharingH                                  LONG    L_CTX           !  user contextQ                                  BYTE    B_RTV           !  retrieval window sizeeM                                  BYTE    B_ORG           !  file organizationEI                                  BYTE    B_RAT           !  RECORD formatEI                                  BYTE    B_RFM           !  RECORD format N                                  BYTE    B_JOURNAL       !  journaling optionsP                                  BYTE    B_RU_FACILITY   !  recoverable facility id #C                                  WORD    FILL            !  (spare) G                                  LONG    L_XAB           !  xab address M                                  LONG    L_NAM           !  nam block address Q                                  LONG    L_FNA           !  file name string addr  essnQ                                  LONG    L_DNA           !  default file name strc ing addrQ                                  BYTE    B_FNS           !  file name string sizevQ                                  BYTE    B_DNS           !  default name string so ize O                                  WORD    W_MRS           !  maximum RECORD sizenQ                                  LONG    L_MRN           !  maximum RECORD numberrN                                  WORD    W_BLS           !  blocksize for tapeG                                  BYTE    B_BKS           !  bucket sizemM                                  BYTE    B_FSZ           !  fixed header sizeiQ                                  LONG    L_DEV           !  device characteristic  s Q                                  LONG    L_SDC           !  spooling dev charactea ristics O                                  WORD    W_GBC           !  Global buffer count N                                  BYTE    B_ACMODES       !  agent access modesQ                                  BYTE    B_RCF           ! (only for use by RMS Rb ecovery)-                                  LONG    FILLg                  END VARIANT          END RECORDa   $ t applib:namblk.incc<          !**************************************************3          !         RMS Name Block (NAM) DefinitionsA<          !**************************************************  N          DECLARE LONG CONSTANT NAM$C_BID = 2             !  code for nam blockM          DECLARE LONG CONSTANT NAM$C_BLN = 96            !  Name block lengthU            RECORD NAMBLK            VARIANT              CASE L                  STRING  BUFF$=96                        !  Entire NAM block              CASE D                  BYTE    B_BID                           !  block idH                  BYTE    B_BLN                           !  block lengthQ                  BYTE    B_RSS                           !  resultant string aread   sizeQ                  BYTE    B_RSL                           !  resultant string leng  thQ                  LONG    L_RSA                           !  resultant string area 	   address H                  BYTE    B_NOP                           !  Name optionsQ                  BYTE    B_RFS                           !  Remote file system ty  peP                  BYTE    B_ESS                           !  expanded string area sizeQ                  BYTE    B_ESL                           !  expanded string lengtr hzP                  LONG    L_ESA                           !  expanded string area address Q                  LONG    L_RLF                           !  related file nam blocb k addrE                  STRING  T_DVI = 16                      !  device id-C                  WORD    W_FID(1 to 3)                   !  file id H                  WORD    W_DID(1 to 3)                   !  directory idM                  LONG    L_WCC                           !  wild card context Q                  LONG    L_FNB                           !  file name status bitsDK                  BYTE    B_NODE                          !  Nodespec lengthOI                  BYTE    B_DEV                           !  Device lengtheL                  BYTE    B_DIR                           !  Directory lengthK                  BYTE    B_NAME                          !  Filename lengthaK                  BYTE    B_TYPE                          !  Filetype length Q                  BYTE    B_VER                           !  Version number length L                  BYTE    FILL(2)                         !  Currently unusedL                  LONG    L_NODE                          !  Nodespec addressJ                  LONG    L_DEV                           !  Device addressM                  LONG    L_DIR                           !  Directory address L                  LONG    L_NAME                          !  Filename addressL                  LONG    L_TYPE                          !  Filetype addressQ                  LONG    L_VER                           !  Version number addresC s L                  LONG    FILL(2)                         !  Currently unused            END VARIANT          END RECORDu   $ t applib:fibblk.inct<          !**************************************************-          !               FIB Block Definitions<          !**************************************************  0          DECLARE LONG CONSTANT FIB$C_LENGTH = 96;          DECLARE LONG CONSTANT FIB$M_NORECORD = x'00200000'i:          DECLARE LONG CONSTANT FIB$M_FINDFID = x'00000800'  I          RECORD FIBBLK                                   !  FIB structure             VARIANT              CASE L                  STRING  BUFF$=96                        !  Entire FIB block              CASE*O                  LONG    L_ACCTL                         !  Access control bitsoC                  WORD    W_FID(1 to 3)                   !  File IDFB                  WORD    W_DID(1 to 3)                   !  Dir IDM                  LONG    L_WCC                           !  Wild card context(M                  WORD    W_NMCTL                         !  Name control bits J                  WORD    W_EXCTL                         !  Extend controlG                  LONG    L_EXSZ                          !  Extend size!I                  LONG    L_EXVBN                         !  Extension VBN!N                  BYTE    B_ALOPTS                        !  Allocation optionsP                  BYTE    B_ALALIGN                       !  Allocation alignmentO                  WORD    W_LOC_NUM                       !  Related file number P                  WORD    W_LOC_SEQ                       !  File sequence numberG                  WORD    W_LOC_RVN                       !  Related RVNaQ                  LONG    L_LOC_ADDR                      !  Location address (VBN* , LBN, CYL)*Q                  WORD    W_VERLIMIT                      !  Directory entry versi  on limitN                  BYTE    B_AGENT_MODE                    !  Agents access modeP                  BYTE    B_RU_FACILITY                   !  Recoverable-facility codeP                  LONG    L_ACLCTX                        !  ACL context for readQ                  LONG    L_ACL_STATUS                    !  Return status from AC  L operationSQ                  LONG    L_STATUS                        !  General status longwo  rdQ                  LONG    L_ALT_ACCESS                    !  Alternate access mask Q                  LONG    L_MOV_SVBN                      !  Starting VBN (MOVEFIL  E)Q                  LONG    L_MOV_VBNCNT                    !  Count of VBNs (MOVEFI  LE)SQ                  WORD    W_FILE_HDRSEQ_INCR              !  Header seq no increme? nt for indiv fileRQ                  WORD    W_DIR_HDRSEQ_INCR               !  Header seq no increme  nt for directory file Q                  WORD    W_FILE_DATASEQ_INCR             !  Data seq no incrementE   for indiv fileQ                  WORD    W_DIR_DATASEQ_INCR              !  Data seq no incrementR   for driectory fileP                  LONG    L_CACHING_OPTIONS               !  F64XQP cache control	 bitvector G                  WORD    W_SD_FID_NUM                    !  File number P                  WORD    W_SD_FID_SEQ                    !  File sequence numberQ                  WORD    W_SD_FID_RVN                    !  Relative volume numbe  r P                  WORD    W_RESERVED_1                    !  Pad up to a longword boundaryQ                  BYTE    B_NAME_FORMAT_IN                !  Inbound file name encS odingEQ                  BYTE    B_NAME_FORMAT_OUT               !  Returned file name en  codingQ                  BYTE    B_ASCNAME_FORMAT                !  ASCNAME attribute enc  odingDQ                  BYTE    B_RESERVED_2                    !  For alignment. NOTE -    Must be zero.             END VARIANT          END RECORDT   I think that's it/enough.R   -- T4 David Froble                       Tel: 724-529-04504 Dave Froble Enterprises, Inc.      Fax: 724-529-0596> DFE Ultralights, Inc.              E-Mail: davef@tsoft-inc.com6 T-Soft, Inc.  170 Grimplin Road  Vanderbilt, PA  15486   ------------------------------  % Date: Sun, 24 Mar 2002 13:10:41 -0800T# From: "Tom Linden" <tom@kednos.com> ) Subject: RE: Hacker Using My Mail Server?B9 Message-ID: <CIEJLCMNHNNDLLOOGNJICEKMEGAA.tom@kednos.com>C  E Thanks, Martin, I did become aware of this yesterday, and hope to getE( updated records with Sprint by tomorrow.   > -----Original Message-----; > From: Martin Vorlaender [mailto:martin@radiogaga.harz.de]k& > Sent: Sunday, March 24, 2002 6:36 AM > To: Info-VAX@Mvb.Saic.ComB+ > Subject: Re: Hacker Using My Mail Server?A >A >S$ > Tom Linden (tom@kednos.com) wrote:B > > Thanks Michael.  I guess I need to update this (and Compaq too) > > since this was in their sample file).A >LG > I guess you'd need to update more than the RBL hosts. When I tried to " > reply to your email, it bounced: > + > --HAB33355.1016952637/harzserver1.harz.de  > L > The original message was received at Sun, 24 Mar 2002 07:50:32 +0100 (CET) > from uucp@localhostA >FC >    ----- The following addresses had permanent fatal errors -----B > tom@kednos.com >(. >    ----- Transcript of session follows -----* > .... while talking to freja.kednos.com.:9 > <<< 550 Your IP address is unbacktranslatable. SPAMMER!U+ > 554 tom@kednos.com... Service unavailableF > + > --HAB33355.1016952637/harzserver1.harz.deB' > Content-Type: message/delivery-statusM >U) > Reporting-MTA: dns; harzserver1.harz.de 5 > Arrival-Date: Sun, 24 Mar 2002 07:50:32 +0100 (CET)  >M) > Final-Recipient: X-UUCP; tom@kednos.com_ > Action: failed > Status: 5.5.0_# > Remote-MTA: DNS; freja.kednos.comSL > Diagnostic-Code: SMTP; 550 Your IP address is unbacktranslatable. SPAMMER!: > Last-Attempt-Date: Sun, 24 Mar 2002 07:50:37 +0100 (CET) >F+ > --HAB33355.1016952637/harzserver1.harz.de  > Content-Type: message/rfc822 >B) > Return-Path: <martin@radiogaga.harz.de> ! > Received: (from uucp@localhost):= > 	by harzserver1.harz.de (8.9.3/8.9.3) with UUCP id HAA33355E< > 	for tom@kednos.com; Sun, 24 Mar 2002 07:50:32 +0100 (CET)+ > 	(envelope-from martin@radiogaga.harz.de)D8 > Received:  by radiogaga.harz.de (UUPC/extended 1.13f);, >            Sun, 24 Mar 2002 07:19:21 +0100& > Date: Sun, 24 Mar 2002 7:19:18 +01004 > From: Martin Vorlaender <martin@radiogaga.harz.de>+ > Subject: RE: Hacker Using My Mail Server? ! > To: tom@kednos.com (Tom Linden)n< > In-Reply-To: <CIEJLCMNHNNDLLOOGNJICEJIEGAA.tom@kednos.com>+ >  from "Tom Linden" at Mar 24 2002 5:00 amR+ > X-Mailer: ELM [version 2.3 PL11] for OS/2e; > Message-ID: <3c9d6fe9.martin.radiogaga@radiogaga.harz.de>  >T > .... > - > --HAB33355.1016952637/harzserver1.harz.de--a > H > I've no idea which IP address the mail server system is barking about. >  > cu,S
 >   Martin > --C >                      | Martin Vorlaender  |  VMS & WNT programmer!0 > Microsoft's answer   | work: mv@pdv-systeme.deC > to OpenVMS is        |   http://www.pdv-systeme.de/users/martinv/ 7 > Windows NT 10.0.     | home: martin@radiogaga.harz.de  >$   ------------------------------  # Date: Sun, 24 Mar 2002 22:41:53 GMT 4 From: "Matt Muggeridge" <Matt.Muggeridge@compaq.com>) Subject: Re: Hacker Using My Mail Server?_= Message-ID: <RCsn8.6069$EE4.24156@news-server.bigpond.net.au>   2 >many thanks to whoever in Compaq was responsible!   Thanks for the kind comments.   J It is true that we have substanitally improved the doc set and continue toI do so.  I've passed your comments along to the team who always appreciate  such unsolicited feedback.   Regards, Matt.E   --= -------------------------------------------------------------g OpenVMS TCP/IP Engineering Enterprise Computing Group Compaq Computer CorporationB Gold Coast, AUSTRALIA = -------------------------------------------------------------     5 "Paul Sture" <paul.sture@bluewin.ch> wrote in messageF# news:3C9C3299.4030009@bluewin.ch...  > Michael Austin wrote:I >B6 > > TCPIPV5.1A has some default settings for this sortG > > of thing (preventing spam).  Check the docs and look at configuringN% > > "good-clients,bad-clients, etc...O > >N" > > here is a good place to start. > >  > >  > >LI http://www.openvms.compaq.com:8000/73FINAL/6526/6526pro_031.html#antispamC > >  >U >  > K > Thanks for that. I must add that the documentation for TCP/IP which comes D with the VMS 7.3 docset far surpasses anything previously available. >E >&F > One example: The SEP-2000 TCP/IP manuals only references to BIND/DNSG > simply direct you to TCPIP$CONFIG. In contrast the latest stuff tells G > you what BIND/DNS actually does, describes the difference between the I > various types of service available, and even directs you at an O'Reilly & > book on the subject. (On that, go to >%J > http://search.oreilly.com/cgi-bin/search?term=bind&category=All&pref=all > H > and you can read the sample chapters from "DNS and BIND", 2nd, 3rd and* > 4th editions. Very comprehensive stuff.) >CF > I would highly recommend that folks revisit the TCP/IP documentationG > available on www.openvms.compaq.com:8000/#tcpip . A lot of effort has J > clearly gone into it - many thanks to whoever in Compaq was responsible! > __ > Paul Sture
 > Switzerlande >e   ------------------------------  % Date: Mon, 25 Mar 2002 12:35:56 +1030t: From: "Barratt, Chris (FMC)" <Chris.Barratt@fmc.sa.gov.au>) Subject: RE: Hacker Using My Mail Server? P Message-ID: <07103702F27FD411ACA30000F8085452044FEA73@sagemshs001.fmc.sa.gov.au>  K Should the TCP/IP doc set come as part of the VMS 7.3 docset, as standard ?%. We didn't seem to receive it with our VMS 7.3.   Cheers,  Chris Barratt.   > -----Original Message-----; > From: Matt Muggeridge [mailto:Matt.Muggeridge@compaq.com] " > Sent: Monday, 25 March 2002 9:12 > To: Info-VAX@Mvb.Saic.Com + > Subject: Re: Hacker Using My Mail Server?b >  > 4 > >many thanks to whoever in Compaq was responsible! >  > Thanks for the kind comments.  > = > It is true that we have substanitally improved the doc set   > and continue tos: > do so.  I've passed your comments along to the team who  > always appreciate* > such unsolicited feedback. > 
 > Regards, > Matt.R >  > --? > -------------------------------------------------------------* > OpenVMS TCP/IP Engineering > Enterprise Computing Group > Compaq Computer CorporationC > Gold Coast, AUSTRALIAN? > -------------------------------------------------------------A >  > 7 > "Paul Sture" <paul.sture@bluewin.ch> wrote in message % > news:3C9C3299.4030009@bluewin.ch...B > > Michael Austin wrote:  > >C8 > > > TCPIPV5.1A has some default settings for this sort> > > > of thing (preventing spam).  Check the docs and look at 
 > configuringl' > > > "good-clients,bad-clients, etc...  > > > $ > > > here is a good place to start. > > >  > > >  > > > @ > http://www.openvms.compaq.com:8000/73FINAL/6526/6526pro_031.ht ml#antispam  > >  >N >  >SK > Thanks for that. I must add that the documentation for TCP/IP which comes D with the VMS 7.3 docset far surpasses anything previously available. >  >!F > One example: The SEP-2000 TCP/IP manuals only references to BIND/DNSG > simply direct you to TCPIP$CONFIG. In contrast the latest stuff tells G > you what BIND/DNS actually does, describes the difference between the I > various types of service available, and even directs you at an O'Reilly & > book on the subject. (On that, go to > J > http://search.oreilly.com/cgi-bin/search?term=bind&category=All&pref=all >eH > and you can read the sample chapters from "DNS and BIND", 2nd, 3rd and* > 4th editions. Very comprehensive stuff.) > F > I would highly recommend that folks revisit the TCP/IP documentationG > available on www.openvms.compaq.com:8000/#tcpip . A lot of effort hasBJ > clearly gone into it - many thanks to whoever in Compaq was responsible! > __ > Paul Sture
 > Switzerlande >l   ------------------------------  # Date: Mon, 25 Mar 2002 03:08:17 GMT 4 From: "Matt Muggeridge" <Matt.Muggeridge@compaq.com>) Subject: Re: Hacker Using My Mail Server? = Message-ID: <Bwwn8.7951$EE4.26592@news-server.bigpond.net.au>r  	 Hi Chris,   L The TCP/IP doc set is orderable separately.  If you have trouble digging out6 the ordering code, let me know and I'll chase it down.   Matt.a   --= -------------------------------------------------------------  OpenVMS TCP/IP Engineering Enterprise Computing Group Compaq Computer CorporationB Gold Coast, AUSTRALIAl= -------------------------------------------------------------     E "Barratt, Chris (FMC)" <Chris.Barratt@fmc.sa.gov.au> wrote in messageLJ news:07103702F27FD411ACA30000F8085452044FEA73@sagemshs001.fmc.sa.gov.au...K > Should the TCP/IP doc set come as part of the VMS 7.3 docset, as standard  ? 0 > We didn't seem to receive it with our VMS 7.3. > 	 > Cheers,  > Chris Barratt. >B > > -----Original Message-----= > > From: Matt Muggeridge [mailto:Matt.Muggeridge@compaq.com]!$ > > Sent: Monday, 25 March 2002 9:12 > > To: Info-VAX@Mvb.Saic.Com - > > Subject: Re: Hacker Using My Mail Server?t > >  > > 6 > > >many thanks to whoever in Compaq was responsible! > >b! > > Thanks for the kind comments.  > > > > > It is true that we have substanitally improved the doc set > > and continue toB; > > do so.  I've passed your comments along to the team who  > > always appreciate  > > such unsolicited feedback. > >  > > Regards,	 > > Matt.D > >R > > --A > > -------------------------------------------------------------* > > OpenVMS TCP/IP Engineering > > Enterprise Computing Group > > Compaq Computer Corporation* > > Gold Coast, AUSTRALIA*A > > -------------------------------------------------------------  > >f > >m9 > > "Paul Sture" <paul.sture@bluewin.ch> wrote in message ' > > news:3C9C3299.4030009@bluewin.ch...C > > > Michael Austin wrote:T > > > : > > > > TCPIPV5.1A has some default settings for this sort? > > > > of thing (preventing spam).  Check the docs and look at  > > configuring ) > > > > "good-clients,bad-clients, etc...  > > > > & > > > > here is a good place to start. > > > >  > > > >  > > > > B > > http://www.openvms.compaq.com:8000/73FINAL/6526/6526pro_031.ht
 > ml#antispam  > > >  > >B > >  > >LG > > Thanks for that. I must add that the documentation for TCP/IP which  comes F > with the VMS 7.3 docset far surpasses anything previously available. > >  > > H > > One example: The SEP-2000 TCP/IP manuals only references to BIND/DNSI > > simply direct you to TCPIP$CONFIG. In contrast the latest stuff tells I > > you what BIND/DNS actually does, describes the difference between the K > > various types of service available, and even directs you at an O'Reillyd( > > book on the subject. (On that, go to > >LL > > http://search.oreilly.com/cgi-bin/search?term=bind&category=All&pref=all > >LJ > > and you can read the sample chapters from "DNS and BIND", 2nd, 3rd and, > > 4th editions. Very comprehensive stuff.) > > H > > I would highly recommend that folks revisit the TCP/IP documentationI > > available on www.openvms.compaq.com:8000/#tcpip . A lot of effort hasiL > > clearly gone into it - many thanks to whoever in Compaq was responsible! > > __ > > Paul Sture > > SwitzerlandF > >  >    ------------------------------    Date: 24 Mar 2002 22:20:51 -0600+ From: young_r@encompasserve.org (Rob Young)l) Subject: Re: Hacker Using My Mail Server? 3 Message-ID: <l0H8kTp2nvZ8@eisner.encompasserve.org>   T In article <3C9DA5F5.3020504@bluewin.ch>, Paul Sture <paul.sture@bluewin.ch> writes: > Rob Young wrote: > [ >> In article <3C9BFC44.50403@qsl.network>, "John E. Malmberg" <wb8tyw@qsl.network> writes:e >> lH >>>When investigating spam attacks, you can not believe anything in the 0 >>>message headers about the source of the spam. >>> E >>>I have not received any spam that claimed it came from an AOL.COM  A >>>address that actually originated from AOL.  The same for spam   >>>originating from HOTMAIL. >>>!L >>>Complaining to them seems to just get a form letter that the analysis of 7 >>>the header indicates that it did not come from them.  >>>  >>>  >>  < >> 	Good points.  I did examine headers, they were from AOL.3 >> 	If you read this account of spammers in action:  >>  " >> http://belps.freewebsites.com/  >> s= >> 	You can read how they harvest hundreds of "fish" with the G >> 	tired old scam of:  "we are from security... send us your password"D@ >> 	and go from there.  AOL continues to be a spammers paradise. >> * > How depressing. When I was using good old CompuServe, they repeatedly told their users NOT to reveal passwords, even to genuine support staff. >  >    	Yeah...  " 	Here is a link on how they do it:  * http://blank.org/memory/busted/fishing.htm  J I'm going to go in to great detail on this. In a nutshell Premier ServicesG creates a fake AOL look-a-like web page, and then spams it to AOL emailRK addresses. The spam claims AOL lost it's customer information and needs the N user to re-input his username and password. It offers the user a free month ofM Internet access for correctly entering in his infornmation in to the provided1M HTML link. The information is then emailed off to some web based account that O eventually forwards in to the the waiting hands of Premier Services. Stolen AOL K accounts and copies of the web page were found on the hard drives of Rodona K Garst, Shary Valentine, and Lin Valentine. You can download the actual HTML M source created and used by Premier Services by clicking here. The HTML source J is archived in tar and gunzip format. To download it you may need to right4 click on the link and then left click on "Save as". N   In all I recovered over 1300 AOL usernames and passwords. I turned them overH to AOL security along with Premier Services contact information. PremierE Services refers to the act of stealing AOL usernames and passwords asWM "fishing". It is referred to several times in the ICQ chat logs between Shary M Valentine (Aspen) and Shannon Redmond. Fishing is also referenced in the chat  logs with the symbol "<><".    -Man In The Wilderness   				Rob,   ------------------------------    Date: 24 Mar 2002 17:52:24 -0800' From: jnez367@yahoo.com (Jerry Nezlick) , Subject: Re: Installing Star Receipt Printer= Message-ID: <4f27336e.0203241752.5c441e86@posting.google.com>   @ I will have to double check, but I think it was a VT 510.  I wasE wondering if there is driver that I need to install.  I did not think ? Dumb terminal did much besides display data. Is there a virtualr setting I should be looking at?    ------------------------------  # Date: Mon, 25 Mar 2002 02:33:51 GMTd1 From: "David J. Dachtera" <djesys.nospam@fsi.net> , Subject: Re: Installing Star Receipt Printer' Message-ID: <3C9E8EC1.221A90FB@fsi.net>    Jerry Nezlick wrote: > B > I will have to double check, but I think it was a VT 510.  I wasG > wondering if there is driver that I need to install.  I did not think A > Dumb terminal did much besides display data. Is there a virtual ! > setting I should be looking at?    Dunno 'bout that.s  D However, in addition to what John M. mentioned, verify that the dataG format (bits, parity, etc.) matches the how old term. communicated with / the host as well as the term. with the printer.   F Really, the terminal should pass the data transparently. Thus, if it'sF receiving data that displays o.k., but isn't 100% right, you may get a  good display but bad print outs.   Just a thought...    -- e David J. Dachtera  dba DJE SystemsS http://www.djesys.com/  ( Unofficial Affordable OpenVMS Home Page: http://www.djesys.com/vms/soho/    ------------------------------  % Date: Mon, 25 Mar 2002 01:32:41 -0500_- From: JF Mezei <jfmezei.spamnot@videotron.ca>o, Subject: Re: Installing Star Receipt Printer, Message-ID: <3C9EC484.B555D845@videotron.ca>   "David J. Dachtera" wrote:H > Really, the terminal should pass the data transparently. Thus, if it'sH > receiving data that displays o.k., but isn't 100% right, you may get a" > good display but bad print outs.  K Nop. The printer port can operate at a baud rate that is different from the  terminal's serial port.   M So if the terminal operates at 9600, has its printer port set to 4800 and the 7 printer is set at 9600, the printer will get jibberish.c  K There should be a printer setup menu in the 420 setup. (you may have to settJ the terminal comm ports feature on the Global Setup Screen to "Sessions on/ Comm1" or "S1=Comm1" to make that menu appear).1   ------------------------------  + Date: Sun, 24 Mar 2002 14:31:22 -0600 (CST)y From: sms@antinode.org@ Subject: Re: Low Level format of SCSI Disc in VaxStation 4000VLC) Message-ID: <02032414312210@antinode.org>n  1 From: Michael Austin <maustin@firstdbasource.com>oG > This IS the low-level formatter for VAX's.  Before you can INITIALIZEtJ > the disk you must first format it.  On the MVII this was accomplished byB > Field Service with a TK50 "diagnostic" tape that included a diskD > formatter.  This formatter was included in the console code of theJ > MV2000/MV3100 and later.  The INITIALIZE would fail if the drive had not > first been formatted.'  6    This was true for ST506 (MFM) disks, not SCSI.  TheC MicroVAX/VAXstation 2000 and the VAXstation 3100 30/38 (and perhapszF others) had it in firmware (TEST 70), although finding a 3100 with theF full-function ST506-SCSI adapter may be hard, as most of the ones I'veG seen were missing a few parts and so were good only for the RX23 floppy(C drive.  I did try an RD54 on one once, and it seemed to work, but IgD suspect that none of these units left the factory with an ST506 disk drive.  C    I've never had a problem (of this sort) with a SCSI disk, but it1E should be safe enough to try formatting it.  I'm not an expert, but I @ was under the impression that formatting an ST506 drive involvedB carefully writing special data (affecting sector interleaf and theB like), while formatting a SCSI drive involved sending it a command telling it to format itself.  F > BTW, when I was a field engineer, loading the formatter was the ONLYG > reason I ever used the diagnostics on the MV series.  I generally let5I > VMS tell what was wrong with the system.  My success rate at fixing theuG > problem the first time (as opposed to the symptom) was ~98% -- hey no  > body was perfect :)     G    Once, after a move, a MicroVAX 3600 (?) in a remote office failed to0F see its 9-track tape drive.  The MicroVAX Diagnostic Monitor looked atG it and suggested reversing the two cables, which solved the problem.  I F was impressed.  Formatting RD-series disk drives was its main utility,D however.  (And even then, the "DIAG CUST" edition would not format aD drive unless it was already formatted.  The "DIAG MAINT" edition was required for that.)L  F    Speaking of which, now that VAXes have been out of production for aD little while, is there any chance of getting the MDM promoted to the freeware collection?  H ------------------------------------------------------------------------  C    Steven M. Schweda               (+1) 651-699-9818  (voice, home)aC    382 South Warwick Street        (+1) 763-781-0308  (voice, work)MG    Saint Paul  MN  55105-2547      (+1) 763-781-0309  (facsimile, work):9    sms@antinode.org                sms@provis.com  (work)d   ------------------------------  % Date: Sun, 24 Mar 2002 21:18:53 +0100g From: Dirk Munk <munk@home.nl>  Subject: Re: RMS: removing a key& Message-ID: <3C9E34AD.9020309@home.nl>   JF Mezei wrote:r  I >Large file with multiple keys.  Need to run a program that will change asM >secondary key for all records. So it would be quicker to remove that key, dom9 >all the changes to that field and then add back the key.t > N >Question: is there a way to remove/disable a key from an indexed file without >having to use convert?l > H No, if possible you could convert to a sequential file, do the changes,  and convert back.-   >- >-O >I know I would need to use convert to rebuild the file at the end to re-createe: >that key. But must I use it initially to remove the key ? >t Yes.   >  >-M >Also, if I already have 2 keys in a file and am using convert to add a third<N >key. Does convert use the old file's existing indices or does it recreate the; >file as if the source was sequential with no keys at all ?  >tF Yes, it recreates the whole file. This would also happen if you would A not change anything to the file definition and just do a convert.    >e   ------------------------------    Date: 24 Mar 2002 12:39:19 -0800" From: cstranslations@msn.com (Joe)  Subject: Re: RMS: removing a key< Message-ID: <d56d1c2d.0203241239.31081c1@posting.google.com>  C As far as "removing/disabling" a key - I've never seen such a thingu& and wouldn't expect it to be possilbe.  C On the 2nd point (using the old indicies); no, I seen to remember a = /[NO]SORT on the CONVERT command with /SORT being the default C (although I'm not at work and my home system if off at the moment).    Joe     a JF Mezei <jfmezei.spamnot@videotron.ca> wrote in message news:<3C9DDDED.428EBD39@videotron.ca>...oJ > Large file with multiple keys.  Need to run a program that will change aN > secondary key for all records. So it would be quicker to remove that key, do: > all the changes to that field and then add back the key. > O > Question: is there a way to remove/disable a key from an indexed file withoute > having to use convert? > P > I know I would need to use convert to rebuild the file at the end to re-create; > that key. But must I use it initially to remove the key ?- > N > Also, if I already have 2 keys in a file and am using convert to add a thirdO > key. Does convert use the old file's existing indices or does it recreate thee< > file as if the source was sequential with no keys at all ?   ------------------------------  # Date: Sun, 24 Mar 2002 21:29:48 GMTh* From: "Bill Todd" <billtodd@metrocast.net>  Subject: Re: RMS: removing a key@ Message-ID: <fzrn8.70090$Gf.6264120@bin2.nnrp.aus1.giganews.com>  / "Joe" <cstranslations@msn.com> wrote in messageq6 news:d56d1c2d.0203241239.31081c1@posting.google.com...E > As far as "removing/disabling" a key - I've never seen such a thing ( > and wouldn't expect it to be possilbe.  I It's a databasey kind of thing - add index, drop index.  It wouldn't havevL surprised me if RMS had implemented it at some point (we certainly discussedH it long ago), but if it's not in the documentation that would seem to be that.d   >bE > On the 2nd point (using the old indicies); no, I seen to remember a-? > /[NO]SORT on the CONVERT command with /SORT being the default E > (although I'm not at work and my home system if off at the moment).a  L RMS-11's Indexed File Load (IFL) utility did in fact use elements of the oldK indexes - not to move over as images, but to ascertain what the ordering of9L any duplicates was and preserve it (at least optionally) in the output file.H IIRC VMS Convert inhaled this (ported) code at some point to do the sameK kind of thing - which includes an optimized population algorithm that's fareK more efficient than you could achieve with a record-oriented program (which  Convert originally was).  F If preserving duplicates ordering is not an issue, the suggestion madeL elsewhere to Convert to a sequential file, change the field, and build a newF output file (using the IFL-like Convert optimizations) may be the mostI efficient approach.  But if there are several other indexes it's possibleDI that just changing all the key values for the one changed key wouldn't belL much slower, especially if you were able to enable deferred write-back whileI doing so (having safely kept a copy of the original file just in case you D got interrupted); of course, if the new values happen to occur in anL unfortunate (e.g., strictly ascending) order compared with the old ones, theL resulting structure for that index might be fairly skewed by comparison withF a from-scratch recreation using the IFL-like mechanism (which produces. near-optimal index packing for *all* indexes).   - bill   ># > Joe  >o >f: > JF Mezei <jfmezei.spamnot@videotron.ca> wrote in message( news:<3C9DDDED.428EBD39@videotron.ca>...L > > Large file with multiple keys.  Need to run a program that will change aH > > secondary key for all records. So it would be quicker to remove that key, doc< > > all the changes to that field and then add back the key. > >6I > > Question: is there a way to remove/disable a key from an indexed filee withouta > > having to use convert? > >iH > > I know I would need to use convert to rebuild the file at the end to	 re-create-= > > that key. But must I use it initially to remove the key ?M > >/J > > Also, if I already have 2 keys in a file and am using convert to add a thirdtD > > key. Does convert use the old file's existing indices or does it recreate the> > > file as if the source was sequential with no keys at all ? >L   ------------------------------  % Date: Sun, 24 Mar 2002 17:06:29 -0500.- From: JF Mezei <jfmezei.spamnot@videotron.ca>h  Subject: Re: RMS: removing a key, Message-ID: <3C9E4DE4.1B20DDC5@videotron.ca>   Bill Todd wrote:H > If preserving duplicates ordering is not an issue, the suggestion madeN > elsewhere to Convert to a sequential file, change the field, and build a newH > output file (using the IFL-like Convert optimizations) may be the most > efficient approach.   L If there isn't a simple "remove index", then I would be leaning towards justM updating the keyed field, with perhaps a convert/reclaim or a real convert atc the end.  K Right now, that file doesn't yet have the field as a key, so I can go about I changing all the values without much worry, but once that is done, I will N build the additional keys for that file, and I must now worry about later whenM I want to change that field. That field is an abbreviation of a larger field, N based on a dictionary (another indexed file) and some logic, and I foresee theR need to add/modify that logic/dictionary later on to further refine the algorithm.   ------------------------------  + Date: Sun, 24 Mar 2002 20:59:10 +0000 (UTC) , From: "Richard Maher" <maher_rj@hotmail.c0m>U Subject: RMU_INIT_GB.COM   (Was: VMS 7.3 VLM Fast I/O UWSS It's a Crash Crash CRASH!)e1 Message-ID: <a7lemt$ogm$1@knossos.btinternet.com>    Hi,l  I This is RMU_INIT_GB.COM after you've updated the reserved memory registry L and rebooted you can @ this command file and the $run sys$system:rmu_init_gb to create the global section.a   Regards Richard Maher    $!A $! Before running RMU_INIT_GB you should have done the following:c $!
 $! $mc sysmant+ $! SYSMAN> reserved_memory add "MY_BUFFS" -i8 $!              /allocate/page_tables/zero/size=1/sysgbl $!C $! Then autogen and reboot a couple of times. This will effectivelyPA $! remove 1MB of memory from your system and create the im-memoryNB $! database MY_BUFFS. Do $SHOW MEMORY after reboot to see results. $! $ on warning then exit: $ if .not. f$privilege("cmkrnl,sysprv")  then goto no_privC $ set rights/enable vms$mem_resident_user/attr=(subsystem,resource)h $!9 $ if f$getsyi("arch_name") .nes. "Alpha" then goto no_vaxe6 $ if f$getsyi("galaxy_member") then write sys$output -B         "You need to add the sec$m_shmgs flag for Galactic Memory" $! $ create rmu_init_gb.mar ;++/ ;d4 ; (c) Copyright Tier3 Software. All rights reserved. ;0@ ;     Ownership of this software and all associated intellectual@ ;     property rights remain vested in Tier3 Software Ltd.  This@ ;     software  or any other copies thereof  may not be provided6 ;     or otherwise made available to any other person. ;v* ;     Do not remove this copyright notice. ;y ;     Author: Richard Maherl ;k ;--ZI         .title  rmu_init_gb - RMU/INITIALIZE GLOBAL_BUFFER root_file_speca         .ident  "V1.0"  &         .library "sys$library:lib.mlb"           $vadef         $psldefe         $ssdef           one_megabyte=^x100000r         no_reg=44e  C         .psect  _maher$data,pic,con,rel,lcl,noshr,noexe,rd,wrt,quadm  ) arg_list_1:             .long           3 4                         .long           sec$m_sysgbl9                         .address        section_name_desc 7                         .address        wild_section_idI  ) arg_list_2:             .long           8t9                         .address        section_name_desci2                         .address        section_id.                         .long           ^xfff04                         .long           one_megabyte2                         .long           psl$c_exec) sec_flags:              .long           0a4                         .address        reserved_len)                         .long           0   8 section_name_desc:      .long           section_name_len4                         .address        section_name4 section_id:             .long           sec$k_matequ) section_version:        .long           0n7 wild_section_id:        .long           sec$k_matall, 0n  ) reserved_len:           .blkq           1u  3 fao_ctl_desc:           .long           fao_ctl_leno/                         .address        fao_ctl 6 fmt_string_desc:        .long           fmt_string_len2                         .address        fmt_string) out_string_len:         .long           0e2                         .address        fmt_string5 nosec_desc:             .long           nosec_msg_leng1                         .address        nosec_msg.  D fao_ctl:                .ascii          "Global Section !AS Created, Registry Size = !@ZQ"  fao_ctl_len=.-fao_ctlfF nosec_msg:              .ascii          "No existing Global Section to delete. . ." nosec_msg_len=.-nosec_msgs2 section_name:           .ascii          "MY_BUFFS" section_name_len=.-section_namet+ fmt_string:             .blkb           255e fmt_string_len=.-fmt_stringi  A         .psect  _maher$code,pic,con,rel,lcl,shr,exe,rd,nowrt,quadl  $         .entry          init_gb,^m<> ;+< ; Only one version of the Global Section is valid at a time.8 ; Obviously the database must be closed on this node and7 ; whatever exclusive locks required have been obtained.  ;-+         $cmexec_s       routin=sys$dgblsc,-s)                         arglst=arg_list_1t  "         blbs            r0,new_sec)         cmpw            #ss$_nosuchsec,r0F         bnequ           fini  "         pushal          nosec_desc+         calls           #1,g^lib$put_output-         blbc            r0,finie   new_sec:;         movl            #<sec$m_dzro!sec$m_gbl!sec$m_perm -uH                           !sec$m_sysgbl!sec$m_mres!sec$m_wrt>, sec_flagsJ         movzbl          #1,section_version              ;Version read from root  1         $cmexec_s       routin=sys$create_gdzro,- )                         arglst=arg_list_2t         blbc            r0,finid  .         $fao_s          ctrstr=fao_ctl_desc, -0                         outlen=out_string_len, -1                         outbuf=fmt_string_desc, -a0                         p1=#section_name_desc, -(                         p2=#reserved_len         blbc            r0,finie  &         pushal          out_string_len+         calls           #1,g^lib$put_outputw         blbc            r0,finir  '         movq            reserved_len,r1          bnequ           fini"         movzwl          #no_reg,r0   fini:n         $exit_s         code=r0n           .end            init_gbi   $! $ macro/list rmu_init_gb.mar $! $ link  /exe=rmu_init_gb.exe -         /notrace -         /section_binding -         rmu_init_gb.obj  $!C $! This way you won't have to give the identifier to everyone. Only ( $! enable temporarily while running RMU. $!  $ set security rmu_init_gb.exe -  E /acl=(subsystem,identifier=vms$mem_resident_user,attributes=resource). $!. $ copy/log rmu_init_gb.exe sys$common:[sysexe] $! $install:==$install/commandl; $if f$file_attributes("sys$system:rmu_init_gb.exe","KNOWN")o $then-2 $       install replace sys$system:rmu_init_gb.exe $else20 $       install add sys$system:rmu_init_gb.exe -E                 /open/header/share/priv=(sysgbl,prmgbl,cmexec,sysprv)9 $!C $! If you have your GH_RSRVPGCNT SYSGEN parameter geared up for it, + $! you can install rmu_init_gb as /RESIDENTT $! $endif $!! $purge sys$system:rmu_init_gb.exeb $! $exit0 $!	 $no_priv:yK $       write sys$output "Insufficient privilege. You need (CMKRNL,SYSPRV)"t $       exit 44t $no_vax:8 $       write sys$output "This code only works on alpha" $       exit 44t   ------------------------------  % Date: Mon, 25 Mar 2002 01:57:15 +0100h$ From: "Dr. Dweeb" <Dweeb@nospam.com>- Subject: Re: Shannon knows DEC -> CPQ -> ????u/ Message-ID: <hCun8.140$qH.4190@news.get2net.dk>   , Would all you ACTORs get off the stage now ?   Dweeb.. "Tom Linden" <tom@kednos.com> wrote in message3 news:CIEJLCMNHNNDLLOOGNJIMEJHEGAA.tom@kednos.com...2 >: >2 > > -----Original Message-----5 > > From: Art Beane [mailto:art.beane@mindspring.com]a* > > Sent: Saturday, March 23, 2002 7:12 AM > > To: Info-VAX@Mvb.Saic.Come1 > > Subject: RE: Shannon knows DEC -> CPQ -> ????h > >- > > 0 > > > Is this the Shannon knows Algol story? :-)+ > > > Nope. SKC, as in Shannon Knows CORAL.M. > > > "Or COBOL," he said in a JOVIAL fashion.+ > > > If it had a SNOBOL's chance in HIL...i > >  > > He said with a LISPr > >i? > Said HAL with a CHILL wearing a PEARL as his wife was PERLingh   ------------------------------  % Date: Sun, 24 Mar 2002 18:07:53 -0800 # From: "Tom Linden" <tom@kednos.com> - Subject: RE: Shannon knows DEC -> CPQ -> ????e9 Message-ID: <CIEJLCMNHNNDLLOOGNJIEELBEGAA.tom@kednos.com>m   OK, but let MARY know.   > -----Original Message-----+ > From: Dr. Dweeb [mailto:Dweeb@nospam.com] & > Sent: Sunday, March 24, 2002 4:57 PM > To: Info-VAX@Mvb.Saic.Com / > Subject: Re: Shannon knows DEC -> CPQ -> ????n >  > . > Would all you ACTORs get off the stage now ? >  > Dweeb.0 > "Tom Linden" <tom@kednos.com> wrote in message5 > news:CIEJLCMNHNNDLLOOGNJIMEJHEGAA.tom@kednos.com...I > >, > >i  > > > -----Original Message-----7 > > > From: Art Beane [mailto:art.beane@mindspring.com]m, > > > Sent: Saturday, March 23, 2002 7:12 AM > > > To: Info-VAX@Mvb.Saic.Coma3 > > > Subject: RE: Shannon knows DEC -> CPQ -> ????r > > >  > > >d2 > > > > Is this the Shannon knows Algol story? :-)- > > > > Nope. SKC, as in Shannon Knows CORAL.e0 > > > > "Or COBOL," he said in a JOVIAL fashion.- > > > > If it had a SNOBOL's chance in HIL...  > > >l > > > He said with a LISP  > > >iA > > Said HAL with a CHILL wearing a PEARL as his wife was PERLing  >  >    ------------------------------  # Date: Mon, 25 Mar 2002 03:17:11 GMT # From: "John Smith" <a@nonymous.com>0- Subject: Re: Shannon knows DEC -> CPQ -> ????rG Message-ID: <XEwn8.17202$6Q2.3782@news01.bloor.is.net.cable.rogers.com>t  ? I think it's time we all stopped YACC'ing and got back to work.r    . "Tom Linden" <tom@kednos.com> wrote in message3 news:CIEJLCMNHNNDLLOOGNJIEELBEGAA.tom@kednos.com...  > OK, but let MARY know. >r > > -----Original Message------ > > From: Dr. Dweeb [mailto:Dweeb@nospam.com]r( > > Sent: Sunday, March 24, 2002 4:57 PM > > To: Info-VAX@Mvb.Saic.Comi1 > > Subject: Re: Shannon knows DEC -> CPQ -> ????i > >e > >p0 > > Would all you ACTORs get off the stage now ? > >-
 > > Dweeb.2 > > "Tom Linden" <tom@kednos.com> wrote in message7 > > news:CIEJLCMNHNNDLLOOGNJIMEJHEGAA.tom@kednos.com...  > > >  > > >S" > > > > -----Original Message-----9 > > > > From: Art Beane [mailto:art.beane@mindspring.com] . > > > > Sent: Saturday, March 23, 2002 7:12 AM! > > > > To: Info-VAX@Mvb.Saic.Comi5 > > > > Subject: RE: Shannon knows DEC -> CPQ -> ????e > > > >  > > > >24 > > > > > Is this the Shannon knows Algol story? :-)/ > > > > > Nope. SKC, as in Shannon Knows CORAL..2 > > > > > "Or COBOL," he said in a JOVIAL fashion./ > > > > > If it had a SNOBOL's chance in HIL...i > > > >  > > > > He said with a LISPc > > > >iC > > > Said HAL with a CHILL wearing a PEARL as his wife was PERLingf > >a > >e   ------------------------------  % Date: Mon, 25 Mar 2002 01:19:41 -0500 - From: JF Mezei <jfmezei.spamnot@videotron.ca>n- Subject: Re: Shannon knows DEC -> CPQ -> ????o+ Message-ID: <3C9EC179.F76D964@videotron.ca>v   Tom Linden wrote:  >  > OK, but let MARY know.  $ Where's VERONICA when you need her ?   ------------------------------  % Date: Sun, 24 Mar 2002 17:26:47 -0500 1 From: Michael Austin <maustin@firstdbasource.com>a> Subject: Re: Simple question: Can you repeat strings w/ F$FAO?2 Message-ID: <3C9E52A6.52BA486B@firstdbasource.com>  G Glad it is working... I just reworked the example until I got somethinge* that worked and left the rest up to you :)  H But, as I think about it, there are a couple of scripts I can apply this to for some work I am doing... -- - Regards,  - Michael Austin            VMS User since 1984m8 Sr. Consultant            Registered Linux User #261163 7 First DBA Source, Inc.    http://www.firstdbasource.comg       "Michael T. Davis" wrote:/ > B > In article <3C9D4A59.F17E32E@firstdbasource.com>, Michael Austin& > <maustin@firstdbasource.com> writes: >  > >you mean like:n > >s5 > >$ write sys$output f$fao("!0UL!12(%E)&nbsp;!%F",1)tK > >&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;f > I >         Yeah, that's the ticket.  I figured the solution would probablynO > involve !%E, somehow.  Actually, I discovered you don't even need the leadingyJ > value.  As such, there's a direct equivalent to both character repeating > examples for strings:  >  >                    $ n = 12h> >                    $ spaces = F$FAO ( "!#(%E)&nbsp;!%F", n ) > - >                                     - and -x >  >                    $ n = 12o> >                    $ spaces = F$FAO ( "!''n'(%E)&nbsp;!%F" ) > N > I believe the explanation of why the leading value isn't needed is seeded in' > how !%E works.  From the online Help:e > : >                      Inserts a character string when the; >                      value of the most recently evaluated < >                      argument does not match any preceding' >                      !n%C directives.  > P > Note the phrase "match any" -- "any" implies 0 (zero) or more.  If there isn'tN > a preceding !n%C directive, then there needn't be a preceding "most recentlyJ > evaluated argument", either.  At least, this is how I'm interpreting it. >  > >3. > >just a little trial and (mostly) error.  :) > >--v > >Regards," > >y: > >Michael Austin            Registered Linux User #261163: > >First DBA Source, Inc.    http://www.firstdbasource.com > >Sr. Consultanto > >704-947-1089 (Office) > >704-236-4377 (Mobile) > >o > >i > >"Michael T. Davis" wrote: > >>A > >>         Repeating a character N times with F$FAO is trivial:h > >>& > >>                          $ n = 12< > >>                          $ spaces = F$FAO ( "!#* ", n ) > >> > >> ...or even... > >>& > >>                          $ n = 12< > >>                          $ spaces = f$fao ( "!''n'* " ) > >>M > >> What if I wanted to repeat a string N times, though?  I know I could runrM > >> through a loop N times, concatenating the same string over and over.  IseL > >> there a way to do this with a single F$FAO call?  Say, for example, youK > >> wanted to create a string of twelve consecutive non-breaking spaces ina8 > >> HTML (&nbsp;), rather than twelve space characters. > >>	 > >>[...]  > 	 > Thanks,r > Mike > --M >              Michael T. Davis              |    Systems Specialist: ChE,MSE P >   E-mail: davism@er6.eng.ohio-state.edu    | Departmental Networking/ComputingL >            -or- DAVISM+@osu.edu            |     The Ohio State UniversityL > http://www.er6.eng.ohio-state.edu/~davism/ |     197 Watts, (614) 292-6928   ------------------------------  % Date: Sun, 24 Mar 2002 22:34:34 +0100 - From: Didier Morandi <Didier.Morandi@free.fr>l& Subject: Re: Telnet problem on VAX/VMS' Message-ID: <3C9E4669.B1836561@free.fr>e   Ah!p Hmm... Why would the poster do that?  Standards are so lovely :-),   D.   JF Mezei wrote:  >  > Didier Morandi wrote:e > > $ set def sys$managerd > > $ @tcpip$configo > > choice 3 : server  > > choice x : telnetx > > enable service on this nodei > > exit > K > I believe the poster wanted to enable telnet on a different port than them
 > default 23.g   ------------------------------  % Date: Sun, 24 Mar 2002 14:32:16 -0500p* From: Chuck Chopp <ChuckChopp@rtfmcsi.com>@ Subject: Re: TelnetSym Print Queue Device Name.  IP or Internet?+ Message-ID: <3C9E29C0.C1046A8B@rtfmcsi.com>a   "Richard L. Dyson" wrote:e   > > > printer queue created byK > > > INITIALIZE/QUEUE/PROCESSOR=TCPIP$TELNETSYM/on="ipadd:9100" PBEPQPTEST  >.F >         Is it possible to use the Telnet Symbiot with TCPIP v5.x (orL > maybe even with older UCX v4.x?) with the device name having a FQDN (fully1 > qualified domain name) via a DNS server?  I.e.,  >cF >    Init/queu/proc=tcpip$telnetsym/on=VMS::"node.domain.tld:9100" xxx >/O > the node.domain.tld is resolved from a remote DNS server, not on the VMS noder3 > or from the static host table TCPIP can maintain.  >i- >         The error I always get for this is:e >uJ > %QUEMAN-F-INVQUAVAL, value 'VMS::"node.domain.tld:9100"' invalid for /ON > qualifieru >2N >         If I use the specific IP address instead of the Internet address, it > works: > > >    Init/queu/proc=tcpip$telnetsym/on=VMS::"1.1.1.2:9100" xxx >l> > but I would prefer to use the more convenient internet name. >t > Thanks for any help! > Rick Dyson  Q I remember that with older versions of UCX there was a limit of something like 20eH characters for the value of the "/ON=" qualifier.  If a FQDN value + theN ":<port-number>" string was <= 20 characters then it worked.  Otherwise, you'dM get the error that you described and you'd be forced to either use the raw IP Q address or else create a local CNAME record in the host's local domain [or createbQ a static HOSTS entry for it] so that the printer could be referred to by name.  IuQ don't know if this limitation was ever removed in later versions of UCX / Digitalt TCP/IP Services.     HTH,   Chucka -- Chuck Chopp   8 ChuckChopp@rtfmcsi.com            http://www.rtfmcsi.com0                                   ICQ # 22321532@ RTFM Consulting Services Inc.     864 801 2795 voice & voicemail2 103 Autumn Hill Road              864 801 2774 fax4 Greer, SC  29651                  800 774 0718 pager7                                   8007740718@skytel.coma   ------------------------------  % Date: Sat, 23 Mar 2002 00:30:57 -0000m' From: "KenR" <Ken@kscr.ZZscreaming.net>   Subject: Re: Upgrading from v7.2: Message-ID: <3c9e38a0_2@mk-nntp-1.news.uk.worldonline.com>  A "Doc.Cypher" <Use-Author-Address-Header@[127.1]> wrote in messaget. news:20020322131138.657.qmail@gacracker.org...J > I've just had a user ask if it was possible for me to install the v1.3.1J > Java kit on VMSbox. I spent this morning checking up on and applying ECOL > kits because when I scanned the Java pages in the Compaq website there wasK > mention of needing to be fairly up to date on those. Of course, because I L > didn't read the page thoroughly enough the first time I didn't notice thatH > I can't install it because I'm on the Hobbyist version - OpenVMS v7.2.J > That's not to say that applying the patches wasn't worthwhile - I shouldH > have done it a while ago, but have been lazy about it and not made the > time.o >nJ > Now, if I recall correctly, there was a PCSI kit to upgrade from v6.2 toH > v7.2, and this prompted me to look for a similar kit to get me up to aG > version where I can install Java 1.3.1. I can't see one. Am I missing.L > anything, or correct that no such kit exists? Are there any plans to offerL > such a kit? After all, I'm sure I'm not the only Hobbyist who'd like to be > a little more up to date.y >tK > Now, I know I can borrow media - but I've checked with the VMS sites I've K > done work at in the recent past and none are up to date enough to lend me  aZK > recent install kit. :-( So if there's anyone in Belgium who can lend me a I > up to date kit I'd appreciate it. Contact me by mail if you can oblige,  andfK > I'll obviously owe several fine Belgian beers to anyone that can help out  > here.e >  >  > Doc. > --8 > The bigger the humbug, the better people will like it. > ~ Phineas Taylor Barnum. http://vmsbox.cjb.net    ------------------------------  + Date: Sun, 24 Mar 2002 20:42:48 +0000 (UTC) , From: "Richard Maher" <maher_rj@hotmail.c0m>< Subject: VMS 7.3 VLM Fast I/O UWSS It's a Crash Crash CRASH!/ Message-ID: <a7ldo7$50e$1@helle.btinternet.com>    Hi,e  I First it was DECdtm, then it was $ICC services and now it's Fast I/O (or, * for the moment at least, sys$io_performw).  D I like to think I'm talented, but I just wish it wasn't a talent for crashing machines :-(_  J At least in this case it is EXEC mode code but why doesn't it just kill myB process like usual? Why does it have to keep trashing the machine?   Model: Alpha station 255 VMS: 7.3 SRM Code: 7.0-9e PAL Code: 5.56-2  K I was getting the negative PFN (Page Frame Number?) where VMS was trying to K free up more memory than I allocated (I think to do with the buffer object) J but now I'm getting something wierder. The code will be working, then if IJ just change maybe one line it will start falling over. Alignment problems? Paging even after $io_setup?  K I'll check with the System Manager tomorrow what the dump and Clue thingies H look like but I'd thought I'd put it in here in case someone has seen it before.   L In case anyone is interested I'll place the two command files that I'm usingJ as replies to this note. The first RMU_INIT_GB is needed to initialize theE MY_BUFFS System Global Section. (See the comments for Reserved Memory,J Registry instructions) and the second BIG_BUFFS is the one that falls overK when (after executing the COM file) you run TEST_BUFFS.EXE which will crashoL the machine at MAHER$DB_FLUSH. I can also play around with it until it stops" crashing again if that would help?  H For those people who prefer formatted and unwrapped examples I will also provide attachments.  I I'm not asking you to debug my code (although please jump in if you want)nI but what I'd really like is VMS to stay up long enough so that I can worka% out what my non-Kernel code is doing.    Regards Richard Maher.  L PS. This started with an Rdb engineer telling me that you can't use Fast I/OJ with System Memory buffers. I thought the documentation was unclear on theL subject so I just kept going till I hit a wall. But apart from this set back? VLM and Fast I/O and Memory Resident Databases look good to me!    ------------------------------  % Date: Sun, 24 Mar 2002 21:51:40 -0500 0 From: "Kenneth Randell" <ken.randell@fortel.com>@ Subject: Re: VMS 7.3 VLM Fast I/O UWSS It's a Crash Crash CRASH!+ Message-ID: <a7m3d1$ijs$1@bob.news.rcn.net>n   Hello --  K I'm answering this from home so I can't try out your code on my scratch 7.3_H system, but in answer to your 'exec' mode code bringing down the system,J does the system have BUGCHECKFATAL set to 1?  This will turn all non-fatalH (i.e., exec-mode) bugchecks into fatal ones.  There are other ways to doK this to; I believe if SYSTEM_CHECK (I think that's the parameter) is set to L 1, it's like combining some of the others, but will dump the system for exec mode bugchecks.t  K It may not be related, but if this system is running XFC, you had best turn L it off as well.  The 'original' version of XFC that came with VMS 7.3 would,L when using $IO_PERFORM, would allocate DIOBM entries and never release them;9 eventually you would get a RESEXH bugcheck on the system.i   Ken Randellm   ------------------------------  # Date: Mon, 25 Mar 2002 01:32:26 GMTi) From: rob.buxton@wcc.govt.nz (Rob Buxton) # Subject: Re: Where is Freeware 5.0?e1 Message-ID: <3c9e7daa.334993615@news.wcc.govt.nz>l  E On Thu, 21 Mar 2002 23:32:58 -0500, rdeininger@mindspring.com (Roberts Deininger) wrote:m  G >In article <CIEJLCMNHNNDLLOOGNJIIEFLEGAA.tom@kednos.com>, "Tom Linden"c ><tom@kednos.com> wrote: >= >>Wasn't in 7.3 kit that I got.t >uI >Hmm.  I think 7.3 kits should have included freeware.  Your kit might be : >broken.  You might want to call and ask to have it fixed. >tJ >I've gotten into the habit of going down the parts list in a software kitK >and double-checking that each piece is actually in the box.  The elves whod= >package the kits sometimes get distracted and make mistakes.   D Freeware 5.0, two CDs worth came packaged in a black holder for both my VAX and Alpha 7.3 releases.  5 Freeware 5.0 can also be found at the Compaq Web Site   / http://www.openvms.compaq.com/openvms/freeware/c   ------------------------------    Date: 24 Mar 2002 18:32:00 -0800  From: mdl01@hotmail.com (Michel)& Subject: Re: You will obey my commands= Message-ID: <e2071d4d.0203241832.5cf22363@posting.google.com>e   Time for somebody's ritalin...   Michel --) " we get old too soon and smart too late"w     TGOS <tgos@spamcop.net> wrote   E Lots of nonsense sumarized here for brevity sake as: "Blah blah blah"m   ------------------------------   End of INFO-VAX 2002.165 ************************