Article View: aus.auug
Article #254QLD. Hello southern AUUG :-)
From: Mark Addinall
Date: Fri, 24 Jan 1992 05:04
Date: Fri, 24 Jan 1992 05:04
271 lines
9064 bytes
9064 bytes
Hi all,
Well, us folks up here in the sunny lands (QLD) finally got to-gether
for an informal meeting regarding the activities of Queensland Unix
users. Maybe the net is not the best way to impart information about
AUUG issues. The meeting was a trifle underpopulated. Many thanks to
those that did come ( MINCOM, Pyramid, Stallion staff et al ).
Bit dissapointed you University types stayed away in droves, dunno,
maybe news doesn't get through all the time ???? I expected at least
one person from UQ or QUT to be present. Maybe next time :-)
A good night was had by all ( I hope :-) and I found it very rewarding
to meet other Unix developers/users in the area. Because of the lack of
response, this small group (which may not be representitive of all QLD
AUUG members), decided not to continue to organise a summer meeting. A
plan was put in place to meet every two months to discuss current Unix
issues (almost all who turned up were developers), current projects,
pending products ( and how all of us over 30 seem to get this little but
annoying chest pain when asked for release dates ;-) and to generally
chew the fat. If indeed, many thousands of QLD Unix users read this and
protest, then we will re-think a more formal group structure, but at the
moment it stays as a beer bust :-) All who attended made a commitment
to ping personal networks to encourage more attendance next time. Look
forward to seeing you all next meeting :-)
I even tried programming as a form of bribery to get people to attend,
but to no avail :-(
----------------------- FOR WAYNE ---------------------------------
Wayne Boxall
COMPUTER SYSTEMS OFFICER
Queensland University of Technology
Australia
In <1992Jan16.163142.41146@qut.edu.au> boxall@qut.edu.au writes:
>Hi there.
>I am writing an install program in Borland C++ V2.0. I want
>to incorporate an critical error handler in the program so
>that if a disk is not present I can display my own message.
>Unfortunately it wont work because I am executing a SYSTEM
>command. I believe that the SYSTEM command initiates COMMAND.COM
>which then resets the critical error routine.
Sadly, I'm a little old for C++ but I hope I can help :-)
>What I need to know is there another way of copying files so that
>my handler will work? Also after trying another command XCOPY, I
>noticed that the critical error handler is very limited in what it
>is able to perform. A lot of functions leave the program in a wierd
>state.
>Thanks for your time. Any hints or suggestions would be appreciated.
>Wayne Boxall
>COMPUTER SYSTEMS OFFICER
>Queensland University of Technology
>Australia
OK Wayne, your right, the MS-DOS critical error routines leave a lot
to be desired. Here is some example code that steals and replaces
critical errors. As I don't know your application, I've kept it
simple. You may wish to code a TSR or a device driver, dunno. If
you need help please call :-) Here goes ...
COMMENT *
Steal the Critical error interrupt and do something
better with it :-)
Mark Addinall
-- Yeah Kids, the old man can still code ;-)
*
;;----------------
;; constants
DOS_CALL EQU 21H
CRITICAL EQU 24H
OPEN_FILE EQU 3DH
END_PROC EQU 4CH
UCASE EQU 20H
KEYIN EQU 1
DISPLAY_STRING EQU 9
ERROR EQU 3
;;----------------
;; stack
stack segment para stack
dw 256 dup (?)
stack ends
;;data
data segment para 'DATA'
critical_error db 0
critical_type db 0
critical_mess db "A nicer error message :-) (A)bort (R)etry "
next_line db 13,10,"$"
end_message db "Program terminated normally"
break_message db "Program aborted"
file_name db "A:FILE.DAT"
key db 0
data ends
;;---------------
;; macros
;;-------------------
read_keystroke MACRO
mov ah,KEYIN ;; function request
int DOSCALL ;; do it
mov key,ax ;; grab keystroke
and key, not UCASE ;; uppercase it
ENDM
[ lots of code removed ]
;;---------------------------
;; the new interrupt handler
;;---------------------------
error proc far
sti ;; enable interrupts
push ds
mov ax,data ;; dope data segment
mov ds,ax ;; into ds
mov critical_error,1 ;; flag error
mov ax,di ;; errno into ax
mov critical_type,al ;; note error number
mov al,ERROR ;; signify error
pop ds ;; restore ds
iret
error endp
code ends
end start
OK, I wrote this in the mailer so if MASM gives you an error I apologise
up front ( maybe the brain does get a little soggy with age ;-).
I hope you guys at UNI are reading aus.auug and will help me set up
the QLD auug summer meeting. If you don't subscribe ;
Informal first meeting.
Regatta Hotel, Toowong.
Upstairs.
Thurs. 23rd Jan.
1830-1900
Be there or be hmmmmm.. what shape was that :-)
Mark ...
--------------------- end of stuff for wayne -------------------------------
OK Wayne, why didn't you and your mates show :-\
I don't code for fun anymore ya know ;-)
Suggestions for the name of the informal group are being taken now, so
any one with a (legal;-) suggestion should post.
An Alias has been set up for intergroup communication in case no one
wants to post here (I really don't know why we chose to do that, ah
well, it was late and the beer was free ;-), here it is
} A mailing list for Queensland AUUG people is set up at stallion. Please
} mail to
}
} qauug@stallion.oz.au
}
} for mail to be distributed in the Qld. auug mailing list. For requests
} of additional users or to remove users please mail to
}
} qauug-request@stallion.oz.au
}
} Have fun
}
} Norbert
}
} PS: At the moment the list is really small and you are welcome to
} post and distribute the address of this mailing list.
} --
} ___________________________________________________________________________
} norbert@stallion.oz.au It's not me, it's only my shadow.
} ---------------------------------------------------------------------------
Thanks Norbert.
NOW HEAR THIS...
!!!!!!!!!!!!!!!!!!!! NEXT MEETING of the ????????? !!!!!!!!!!!!!!!!!!
Tuesday, 17th March
Upstairs
Regatta Hotel
Toowong
Brisbane
Near the river
Down the road from Stallion :-)
Be there, or be a polygon :-)
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
Could people expecting to attend ping me on mail so I can get a handle
on the numbers, I'm old, I'm a manager and I like to plan ahead ;-)
Mincom and Pyramid both offered help in organising and running the
???????????? group, many, many thanks :-)
********** HEH MICHI *************************************************
[ one of my wonderous .sigs deleted ]
- Which I stole. It's great. You will see it appear, from time to time,
- in my postings, entirely without attribution. Or you won't, probably,
- since you'll never have any reason to read anything I migt post.
-
- I just thought you ought to be informed that someone had lifted your .sig...
-
-
- Martin Golding | sync, sync, sync, sank ... sunk:
- DoD #0236 | He who steals my code steals trash.
- HOG #still pending | (Twas mine, tis his, and will be slave to thousands.)
- A poor old decrepit Pick programmer. Sympathize at:
- mcspdx!adpplz!martin or martin@adpplz.uucp
;-) ;-) ;-) ;-) ;-) ;-) ;-) ;-) ;-) ;-) ;-) ;-) ;-) ;-) ;-) ;-) ;-) ;-)
************ SO THERE ***************************************************
Thanks again to all who came, looking forward to March :-)
Mark...
------------------------------------------------------------------------------
Mark Addinall | Cowards die many times before their deaths ;
Managing Director | The valiant never taste of death but once.
Stallion Services Pty Ltd.| Of all the wonders that I yet have heard,
Brisbane, QLD, Australia. | It seems to me most strange that men should fear,
TEL 61 7 870 4999 | Seeming that death, a necessary end,
FAX 61 7 371 8881 | Will come when it will come.
...!uunet!mark@staltec |----------------------------------------------------
mark@stallion.oz.au | My opinions are mine and mine alone.
mobile. 018 880 713 | {{ they are, however, for sale. }}
-------------------------------------------------------------------------------
Technical Details
Message-ID:
<addinall.696229441@cluster>Path:
arc1-ca.pugleaf.net!sparky!uunet!munnari.oz.au!bunyip.cc.uq.oz.au!uqcspe!stallion!addinallShow Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit X-Google-Thread: 10db45,a5ea7d2ac55cf932,start X-Google-Attributes: gid10db45,public X-Google-ArrivalTime: 1992-01-23 20:38:01 PST Path: arc1-ca.pugleaf.net!sparky!uunet!munnari.oz.au!bunyip.cc.uq.oz.au!uqcspe!stallion!addinall From: addinall@stallion.oz.au (Mark Addinall) Newsgroups: aus.auug Subject: QLD. Hello southern AUUG :-) Message-ID: <addinall.696229441@cluster> Date: 24 Jan 92 05:04:01 GMT Sender: news@stallion.stallion.oz.au Distribution: aus Lines: 271