[comp.binaries.ibm.pc] v01i169: rs232off, switches off comm ports 11-feb-1989

w8sdz@WSMR-SIMTEL20.ARMY.MIL (Keith Petersen) (02/25/89)

Posting-number: Volume 01, Issue 169
Originally-from: Keith Petersen <w8sdz@WSMR-SIMTEL20.ARMY.MIL>
Submitted-by: Keith Petersen <w8sdz@WSMR-SIMTEL20.ARMY.MIL>
Archive-name: rs232off/rs232of2.uue

[ Steve Parker pointed out that for compatibility with other moderated
newsgroups, the Posting-number header needs a comma.  Added from now
on.

This small program shuts of all serial communication ports (COM1 up to
COM4).  This avoids problems with Procomm when used with COM3 or COM4,
because Procomm does not disable the ports when exiting, causing
conflicts with COM1 and COM2 later.  Run it after exiting from Procomm
or similar trouble-making program and before you run the next one.

This was originally written in 10 lines of C, leading to 4K of
executable code.  Keith Petersen rewrote it in assembly language,
reducing the size to 38 bytes.

-- R.D

Checksums obtained with the 4.3BSD "sum" or System V "sum -r" command.

checksum     size (bytes)  file (between BEGIN--cut and END--cut lines)
    9110         2505      this uuencoded posting

checksum     size (bytes)  file
    5686         1797      rs232of2.arc
]


BEGIN--cut here--cut here
begin 644 rs232of2.arc
M&@A24S(S,D]&1BY!4TT`_`$``$L2$1`6_S<#```,#13LD#)%Q@P93XP8<1%D
M2A,0(%I`I%)'CAL0;\R8`4'0H`R,%\.P80."!H@A3Q[">2.'SIR`.X3D`;&D
M3!HZ:$!`*4.GC)PY9=RP`'$%QQ0B6B!*!&&DC!@Y=<+(F1DCQM`8.7#D"`@S
MR!R@;<2P*0/BSLV<07#8`#$'C=0R=]Z""/.U3-BQ<K@J@,AW#)LT("`UV'&'
M+)DW;D[0*1O&S6(Z;T"((9O&L4^H<'J2*8LFS=BRAB/C3/-R+U\0;=[8F<N&
M!8S`"':<X3D7A!Z?D<VP!"&G#%`Z="J?`5'&CL\\H]V<T;O#2)J?CRM>S+@1
M)]DJ0:10`5&YIQS,+D&R)JF[(HB5+4L'/(U:-0@R>%S/,),C)]\=8]ZTB;'^
M])LZB\''@DAZL9?::@+"(`-]]D&$GWXR],?7?P'&1Z`"$D)TX'OQP3!#&?6=
M]F`;,V2($8`<#LA&@:=MF*`,(#8(PH@TF$AABA?"Y,0;=X!`AW08:00"$51(
M,9<;FVDWA7@BD?>?'.>QY!*+?+G8X7QCR#@B?Z9-B**`.7:IH7LOFI&EB/FU
M$:&8)U:H(I5C(GAE&6?>EV:);-X(YHH8LFFE:S#6Z6":->;YI85\PG1%&2?T
M]AYB9<#)G6,@R`!#3I`DL,,<=#1&AE2;!;49''*\<88<8;0QJ7?@!:0!&@A2
M4S(S,D]&1BY#`%Y>:P```#8.?&')K;H````,;<*D<0,"18H&"O:`2/"F#ATX
M;^30$8,"!IX99G*P@)%B!T*&#B%*I&A11L:-'3\V?!AQ8L6+931R]*@`),N1
M+V7$1$ESX4J1+BUB',-39<B6)/&8)#K3Z,V@,)FFK/D3:<XR4FGV08A0`QH(
M4E,R,S)/1D8N0T]-`!\```!+$A$0",PE````#/I@`="5;X`[@@(.IC.H*UU"
M7?P8\GO(CB&[A,U``!H(4E,R,S)/1D8N1$]#``D$``!+$@$/6)-;!@``#`T4
M&)'SIHT.$$3"V"D#`DD9.7/0B'EXYJ&+@`&3@$"CD*&;-W32C"E#!D08-R7-
MO*F#TB0(,VGPO'PCQR4<@F+8E&D#X@X:D6A`O!DSI@[$GFC*N`F89R6(.G,8
M0I'R9,B3)DV$N@%AM<D,DRA?T.1ZE88+LE[!ENQ*@P52I4^CD@EX)PV=H%.K
M7LTJPX59&6XCAI'#\"[#.6':,$SCALY#.77@S#$YN6L,M6C[!J3"D0Z(-'/<
M6L;<]:M@PI\;/X[L.8F4*#20IM&9F739@*<9NHXRXRQGT)\GPW3#,,QD-F_<
MG*%LD@T;$#??G)&3>+)/H'$+)PW8%3I-.I,=.P=A&$25(%*HD'\#0D3$.IXC
MB\!<T?,;,V;()TWM6`YD.'0$)`94($RD$FKE13===>0]U`9C83AVUA.&R5%7
M5&X-.-D8R3G66!K)@=!&&'D$-%11<OAV!WOGI;?A206"%-1$Y,F11@MST!$A
M2>TE-Q\=<N3!V')TL$>&C0OI5P9NB2VFFG^LG:411TER5%*"..G$$U1#@I!7
M5UF%6)I:`84!`A/2V57&&$&UL5)46J%U65UW@7"$4@^)Q%489)!Q5A!F]!=7
MEV/2B49`7^[EUH&IY7C22&X9MM4<!941DF*3:<1A'6R4])%GD&UU)W$VCL$=
MGR5QJ9R2(K[)D)A7Q2"E9W<8Q]Q=*YT1U&BU3O:IDH25Z48>;A)VUA1I/,C&
M8&SD$5BEEY8Q61B!/C3HJJ/F.<:>?5Y+Y'8*N`G5JUM9)MI57Y&1AJ<@@1#5
M3NL5J-U##*FZ7*)87:3`$$Y0(043+03!!!4M$%$$$\&!\.L<=>`G4AI*>58D
M"&/H-!BKT>6TDV_[)=<L723&6W$9%Y>G(<4=1@SB5KW&2X=16R7XQAW6WF=&
M""``VE]`'+IAQF-=&NJ2&38J51(*2B0+0A-`X2F'6SZQ5]^&A*GKV8%TV1C2
MJN6)(,44,LP@PQ-&&#&?@M2UD8);9E+*!GPK]V2K2BSY"0)G2RKP==ACEPT=
M00OR-$>R<#3KKM'3MO=>?'#,QV$;([8T<1CCT2U'0"U2,0?'AQ%.FX<ML,$8
M0R*,,1^E1HV$,AG%65?&>+8:QG-!<,S&HPM%8%'$2[9/BQIC%=?!NMU)Y-=4
M'1MU]+=T:5OW$YMELM&?&SL:/JZ<+XPY5E<R9(^N6VI`!2I+(.PM-ME&R$L'
MS4H%9%@;^F*D0$*.'61$&6)`-E@>(,00@ULQR`$.<A"0@13D($LH@UWP8JF'
M1,4-;KD"#J9`!"W(3R.$N0-!'(,QP*4M-92)2ALT5I.)5:T.JK/+9`:GAS+H
JJPIPRDVM4!,$'-@@A#LAH5!JPKH!$8D]A(D.&5`X+^Y<A7<ZT9<&`!H`
`
end
END--cut here--cut here