I have not been following this thread. However, I reported several months
ago that ^ZTMGRSET does not copy ^%ZISF for GT.M. You have to copy it
explicitly. This causes KIDS load not to work, etc. There is no ZISFGUX.m.
However, the GTM version appears to work okay. Thus, in the routine
directory, cp ZISFGTM.m _ZISF.m will supply the missing routine. This would
explain the Error while zlinking "%ZISF", reported below.
Lloyd
----- Original Message -----
From: "Ismet Kursunoglu" <[EMAIL PROTECTED]>
To: <hardhats-members@lists.sourceforge.net>
Sent: Sunday, July 09, 2006 5:02 PM
Subject: Re: [Hardhats-members] sshd and mumps process hung
>
>> Think differential diagnosis here. Thee are number of reasons why
>> your HFS device could fail:
>>
>> 1. It may be that the file cannot be opened for reading/writing/
>> modification (which are you trying to do?)
>
> Both. The thing I don't understand is what where the GTM-UNIX-HFS
> device is derived and why it wasn't part of the DEVICE file? For
> example - can I create this virtual device as I would with Linux
> 'mknod' to create a device that I can write to ? I guess I don't
> understand still what the HFS device is and how it relates to it's
> SUBTYPE, with most of the folks using P-OTHER. Is this what should be
> done or should it be created with
>
> Select OPTION NAME: HFS DEVICE SETUP VAFC HFS SETUP HFS Device
> Setup
> HFS Device Setup
>
> -------- Setting Scratch HFS Directory for System: GIANT.LOCALDOMAIN
> --------
> Directory name: /tmp/hfs.dat//
>
>
>> 2. It may be that the file cannot be opened from within MUMPS (forget
>> VistA).
>> 3. It may be that your HFS device configuration is incorrect.
>
> I tried with the plain "HFS" device.
>
>> 4. It may be that there is an error in the device handler (Kernel) code.
>
>> Can you think of tests that can differentiate each of these cases
> Sun 09 Jul 2006 12:10:20 PM AKDT
>
> Login with GTM>D ^ZU - went to write to the HFS file and got error message
>
>
> GTM>D ^XTER
>
>
> In response to the DATE prompt you can enter:
> 'S' to specify text to be matched in error or routine name
>
>
> 1 error logged on 7/9/2006
> 1) <(ZLINKFILE)>HFS^%ZIS4 12:03:04 giant,AKC 7524
> /dev/pts/0
>
> No screened error
>
> Enter '^' to quit listing, <RETURN> to continue...:
>
> Which error? > 1
>
> Process ID: 7524 (7524) JUL 09, 2006 12:03:04
>
> UCI/VOL: [giant,AKC]
>
> $ZA: 0 $ZB: 13
>
> Current $IO: /dev/pts/0 Current $ZIO:
> /dev/pts/0^29^24^/dev/pts/
> 0
>
> $ZE= HFS^%ZIS4, Error while zlinking "%ZISF",150373978,-%GTM-E-ZLINKFILE
>
> HFS G HFS^%ZISF
>
> Last Global Ref: ^%ZIS(1,10,"POX")
>
> Which symbol? > ^L
>
>
> $DEVICE=
> $ECODE=,Z150373978,
> $ESTACK=8
> $ETRAP=UNWIND^ZU
> $QUIT=0
> $STACK=9
> $STACK(000)=-dir
> $STACK(000,"ECODE")=
> $STACK(000,"PLACE")=^GTM$DMOD
> $STACK(000,"MCODE")=GTM$DMOD
> $STACK(001)=DO
> $STACK(001,"ECODE")=
> $STACK(001,"PLACE")=A+1^XQ1
> $STACK(001,"MCODE")= X:$D(^DIC(19,+XQY,20)) ^(20) ;W " ==> A^XQ1"
> $STACK(002)=XECUTE
> $STACK(002,"ECODE")=
> $STACK(002,"PLACE")=@
> $STACK(002,"MCODE")=D ^DIP
> $STACK(003)=DO
> $STACK(003,"ECODE")=
> $STACK(003,"PLACE")=ZIS^DIP3
> $STACK(003,"MCODE")=ZIS S:$D(IOP) DIOP=IOP D:$G(DDXP)=4 ZIS^DDXP4 D ^%ZIS
> S:$D(D
> IOP) IOP=DIOP K DIOP G X:POP
> $STACK(004)=DO
> $STACK(004,"ECODE")=
> $STACK(004,"PLACE")=L1+13^%ZIS1
> $STACK(004,"MCODE")= D L2^%ZIS2
> $STACK(005)=DO
> $STACK(005,"ECODE")=
> $STACK(005,"PLACE")=HFS^%ZIS6
> $STACK(005,"MCODE")=HFS D MARGN^%ZIS3,HFS^%ZIS4 W:'$D(IOP) ! D
> O^%ZIS4:'POP&(%ZI
> SB&(%IS'["T")) ;Host File Server type
> $STACK(006)=DO
> $STACK(006,"ECODE")=,Z150373978,
> $STACK(006,"PLACE")=HFS^%ZIS4
> $STACK(006,"MCODE")=HFS G HFS^%ZISF
> $STACK(007)=DO
> $STACK(007,"ECODE")=
> $STACK(007,"PLACE")=ERR2+2^ZU
> $STACK(007,"MCODE")= D ^%ZTER
> $X $Y=29 24
> $ZV=GT.M V5.1-000 Linux x86
> %A=
> %E=10
> %H=40
> %IS=QM
> %IS("B")=
> %X=HFS
> %Y=
> %Z=HFS^/tmp/hfs.dat^^1^^^^^^^0
> %Z1=Host File Server^^^^1^1
> %Z90=
> %Z91=132^#^64^$C(8)^
> %Z95=
> %ZIS=QM
> %ZIS("B")=
> %ZISB=1
> %ZISCHK=1
> %ZISHG=
> %ZISIOS=10
> %ZISIOST=P-OTHER
> %ZISIOST(0)=16
> %ZISMY=
> %ZISOLD("IO")=/dev/pts/0
> %ZISOLD("IO(""ZIO"")")=/dev/pts/0
> %ZISOLD("IOBS")=$C(8)
> %ZISOLD("IOF")=#,$C(27,91,50,74,27,91,72)
> %ZISOLD("IOM")=80
> %ZISOLD("ION")=GTM-UNIX-TELNET
> %ZISOLD("IOPAR")=
> %ZISOLD("IOS")=40
> %ZISOLD("IOSL")=24
> %ZISOLD("IOST")=C-VT100
> %ZISOLD("IOST(0)")=9
> %ZISOLD("IOT")=VTRM
> %ZISOLD("IOUPAR")=
> %ZISOLD("IOXY")=W $C(27,91)_((DY+1))_$C(59)_((DX+1))_$C(72)
> %ZISOPAR=
> %ZISOS=GT.M (Unix)^19
> %ZISTO=0
> %ZISTP=0
> %ZISUPAR=
> %ZISV=AKC
> %ZISVT=HFS
> %ZT("^XUTL(""XQ"",$J)")=
> %ZTER11A=-1
> %ZTER11B=13
> %ZTER11I=giant,AKC
> %ZTER11N=1
> %ZTER11S=
> %ZTER11Z=0
> %ZTERCNT=90
> %ZTERH1=60455
> %ZTERROR=
> %ZTERRT=^%ZTER(1,60455,1,1)
> %ZTERSUB=%ZTER11S)
> %ZTERVAP=%ZT(
> %ZTERVAR=%ZTERVAR
> %ZTERZE=HFS^%ZIS4, Error while zlinking
> "%ZISF",150373978,-%GTM-E-ZLINKFILE
> %ZTIME=
> %ZTYPE=HFS
> C=,
> DC=,
> DCC=^DIC(19,
> DCL=0
> DE=.01~
> DHD=testing
> DI=^DIC(19,
> DIFM=1
> DIJ=0
> DIL=0
> DINS=
> DIPCRIT=0
> DIPT=0
> DISUPNO=0
> DISYS=19
> DJ=0
> DK=19
> DL=1
> DPP=1
> DPP(1)=19^.01^NAME^^^^^^^4
> DPP(1,"GET")=S DISX(1)=$P($G(^DIC(19,D0,0)),U)
> DPP(1,"IX")=^DIC(19,"B",^DIC(19,^2
> DPP(1,"QCON")=I DISX(1)'=""
> DPP(1,"TXT")=NAME not null
> DPQ(19,.01)=
> DT=3060709
> DTIME=6000
> DU=FIELD
> DUZ=13
> DUZ(0)=@
> DUZ(1)=
> DUZ(2)=67
> DUZ("AG")=V
> DUZ("AUTO")=0
> DUZ("BUF")=1
> DUZ("LANG")=
> DV=
> DXS=1
> I(0)=^DIC(19,
> IO=/tmp/hfs.dat
> IO(0)=/dev/pts/0
> IO(1,"/dev/pts/0")=
> IO("ERROR")=
> IO("HOME")=40^/dev/pts/0
> IO("ZIO")=/dev/pts/0
> IOBS=$C(8)
> IOF=#,$C(27,91,50,74,27,91,72)
> IOM=80
> ION=GTM-UNIX-TELNET
> IOPAR=
> IOS=40
> IOSL=24
> IOST=C-VT100
> IOST(0)=9
> IOT=VTRM
> IOUPAR=
> IOXY=W $C(27,91)_((DY+1))_$C(59)_((DX+1))_$C(72)
> J(0)=19
> L=1
> N=0
> P=
> POP=0
> Q="
> R=1
> S=
> U=^
> X=1
> XMDUZ=13
> XQCH=PRIN
> XQDIC=1337
> XQJMP=0
> XQPSM=P9
> XQSV=1337^9^DIUSER^VA FileMan^^M^^^^^^^^^n^1^^
> XQT=A
> XQUSER=ISMET BIL MD KURSUNOGLU
> XQVOL=AKC
> XQXFLG=0^0
> XQXFLG("GUI")=^
> XQY=1329
> XQY0=DIPRINT^Print File Entries^^A^^^^^^^y^^n^1^^
> Y=-1
> ZTT=0
> ^XUTL("XQ",$J,0)=3060709.120208
> ^XUTL("XQ",$J,1)=9P9^EVE^Systems Manager Menu^^M^13^^^^^^^^n^1^^^
> ^XUTL("XQ",$J,2)=1337P9^DIUSER^VA FileMan^^M^^^^^^^^^n^1^^
> ^XUTL("XQ",$J,3)=1329P9^DIPRINT^Print File Entries^^A^^^^^^^y^^n^1^^
> ^XUTL("XQ",$J,4)=213P9^XUTM ZTMON^Monitor Taskman^^R^^^^^^^^^^
> ^XUTL("XQ",$J,"DUZ")=13
> ^XUTL("XQ",$J,"DUZ(0)")=@
> ^XUTL("XQ",$J,"DUZ(1)")=
> ^XUTL("XQ",$J,"DUZ(2)")=67
> ^XUTL("XQ",$J,"DUZ(AG)")=V
> ^XUTL("XQ",$J,"DUZ(AUTO)")=0
> ^XUTL("XQ",$J,"DUZ(BUF)")=1
> ^XUTL("XQ",$J,"DUZ(LANG)")=
> ^XUTL("XQ",$J,"IO")=/dev/pts/0
> ^XUTL("XQ",$J,"IOBS")=$C(8)
> ^XUTL("XQ",$J,"IOF")=#,$C(27,91,50,74,27,91,72)
> ^XUTL("XQ",$J,"IOM")=80
> ^XUTL("XQ",$J,"ION")=GTM-UNIX-TELNET
> ^XUTL("XQ",$J,"IOS")=40
> ^XUTL("XQ",$J,"IOSL")=24
> ^XUTL("XQ",$J,"IOST")=C-VT100
> ^XUTL("XQ",$J,"IOST(0)")=9
> ^XUTL("XQ",$J,"IOT")=VTRM
> ^XUTL("XQ",$J,"IOXY")=W $C(27,91)_((DY+1))_$C(59)_((DX+1))_$C(72)
> ^XUTL("XQ",$J,"T")=3
> ^XUTL("XQ",$J,"XQM")=9
> ^XUTL("XQ",$J,"XQVOL")=AKC
> ^XUTL("XQ",$J,"XQW")=
>
> $ZE= HFS^%ZIS4, Error while zlinking "%ZISF",150373978,-%GTM-E-ZLINKFILE
>
> HFS G HFS^%ZISF
>
> Last Global Ref: ^%ZIS(1,10,"POX")
>
> Sun 09 Jul 2006 12:17:10 PM AKDT
>
> Repeated trying to write a file and then got this ->
>
> DEVICE: HFS Host File Server
>
> RECORDING THAT AN ERROR OCCURRED ---
>
> Sorry 'bout that
>
> $ZERROR=
> %GTM-E-ZLINKFILE, Error while zlinking ""
> UNWIND^ZU
> ^-----
> %GTM-E-ERRWETRAP, Error while processing $ETRAP
> %GTM-E-INVCMD, Invalid command keyword encountered
> UNWIND^ZU
> ^-----
> %GTM-E-ERRWETRAP, Error while processing $ETRAP
> %GTM-E-INVCMD, Invalid command keyword encountered
> UNWIND^ZU
> ^-----
> %GTM-E-ERRWETRAP, Error while processing $ETRAP
> %GTM-E-INVCMD, Invalid command keyword encountered
> UNWIND^ZU
> ^-----
> %GTM-E-ERRWETRAP, Error while processing $ETRAP
> %GTM-E-INVCMD, Invalid command keyword encountered
> UNWIND^ZU
> ^-----
> %GTM-E-ERRWETRAP, Error while processing $ETRAP
> %GTM-E-INVCMD, Invalid command keyword encountered
> UNWIND^ZU
> ^-----
> %GTM-E-ERRWETRAP, Error while processing $ETRAP
> %GTM-E-INVCMD, Invalid command keyword encountered
> UNWIND^ZU
> ^-----
> %GTM-E-ERRWETRAP, Error while processing $ETRAP
> %GTM-E-INVCMD, Invalid command keyword encountered
> UNWIND^ZU
> ^-----
> %GTM-E-ERRWETRAP, Error while processing $ETRAP
> %GTM-E-INVCMD, Invalid command keyword encountered
> UNWIND^ZU
> ^-----
> %GTM-E-ERRWETRAP, Error while processing $ETRAP
> %GTM-E-INVCMD, Invalid command keyword encountered
> UNWIND^ZU
> ^-----
> %GTM-E-ERRWETRAP, Error while processing $ETRAP
> %GTM-E-INVCMD, Invalid command keyword encountered
> UNWIND^ZU
> ^-----
> %GTM-E-ERRWETRAP, Error while processing $ETRAP
>
>
> %GTM-E-NOTTOEOFONPUT, Not positioned to EOF on write (sequential
> organization only)
> At M source location XTER+8^XTER
> %GTM-W-NOTPRINCIO,
>
> Output currently directed to device /tmp/hfs.dat
>
> And I see that it wrote the option file to the disk !
>
> -rw-r--r-- 1 myvista myvista 213375 2006-07-09 12:03 hfs.dat
>
>
>> Also, you need to check whether the open simply fails (check $T), or
>> an error is raised. What does the documentation say regarding open
>> parameters? Do you need to specify any?
>
> GTM>W $P
> /dev/pts/0
> GTM>W $T
> 0
> GTM>W $I
> /dev/pts/0
>
> All of this is discussed in the Kernel Systems Manual starting with
> section 15-1
> which I will read - I have just skimmed it. Thanks Greg. I will also give
> you more
> complete answers to your great questions. Thanks for motivating me to dig
> deeper and
> really understand the system.
>
>
> --
> Ismet B. Kursunoglu, MD, FCCP
>
> Medical Director
> Alaska Clinic, LLC
> 3750 E. Country Field Circle, STE B
> Wasilla, Alaska 99654-6659
> [EMAIL PROTECTED]
> voice (907)357-7240
>
>
> -------------------------------------------------------------------------
> Using Tomcat but need to do more? Need to support web services, security?
> Get stuff done quickly with pre-integrated technology to make your job
> easier
> Download IBM WebSphere Application Server v.1.0.1 based on Apache Geronimo
> http://sel.as-us.falkag.net/sel?cmd=lnk&kid=120709&bid=263057&dat=121642
> _______________________________________________
> Hardhats-members mailing list
> Hardhats-members@lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/hardhats-members
-------------------------------------------------------------------------
Using Tomcat but need to do more? Need to support web services, security?
Get stuff done quickly with pre-integrated technology to make your job easier
Download IBM WebSphere Application Server v.1.0.1 based on Apache Geronimo
http://sel.as-us.falkag.net/sel?cmd=lnk&kid=120709&bid=263057&dat=121642
_______________________________________________
Hardhats-members mailing list
Hardhats-members@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/hardhats-members
