> 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
