HDTenEightyP/NetNews huggingface dataset:
From: AWOSBORNE@GENVAX.COMPUTER-CENTRE.POLY-OF-WALES.AC.UK
Newsgroups: comp.os.vms
Subject: help with C/fortran and LIB$SPAWN problem
Date: 28 Jul 92 17:26:00 GMT
Distribution: world
Organization: The Internet


	Hi everybody,

	Basically this request is about using FORTRAN or C to get the
	name of the DCL script within which a the program is being run.


	A few months ago a request came onto the net for a means of
	getting the name of a command file from within which a H.L.L
	program is being run, as DCL's f$environment("procedure") does.

	The general concensus was that it couldn't be done with the
	present collection of library and system routines.
	A macro program was then mailed which managed to return the
	command-file name (well done whoever!).

	As I don't have any experience of MACRO and want a solution that
	can work across VMS versions, I tried a different approach
	( and failed ! 8-( )


	Here's my failed attempt:

	Within a DCL script, you could spawn a command such as the
	following:

$spawn define envfile1 'f$environment("procedure")'/table=lnm$job

	which places the DCL script-name into a logical - great !


	I would like to do this from within FORTRAN or C during its
	(not before, which a user can fake) for later reading, and
	tried the following:

	PROGRAM TEST
	IMPLICIT NONE

	CHARACTER*40	COMM1/'def envfile1 testmsg/table=lnm$job'/
	CHARACTER*70	COMM2/'def envfile2 ''f$environment("procedure")''
	1/TABLE=LNM$job'/

	INTEGER*4	STATUS,
	1		LIB$SPAWN

!	This is the test DEFINE with a simple string
	PRINT *,COMM1

!	This is the DEFINE string that doesn't work
	PRINT *,COMM2

	STATUS=LIB$SPAWN(comm1)
	IF (.NOT. STATUS) CALL LIB$SIGNAL(%VAL(STATUS))

	STATUS=LIB$SPAWN(comm2)
	IF (.NOT. STATUS) CALL LIB$SIGNAL(%VAL(STATUS))

	END


	Unfortunately, the first spawned DEFINE worked,
	BUT the second spawned DEFINE didn't,
	returning the following mesages:

V86_ena> @do		! my command file which runs the above program
def envfile1 testmsg/table=lnm$job      
def envfile2 'f$environment("procedure")'/TABLE=LNM$job               
%DCL-W-NULFIL, missing or invalid file specification - respecify
V86_ena> sho log env*

(LNM$PROCESS_TABLE)

(LNM$JOB_83496D10)

  "ENVFILE1" = "TESTMSG"

(LNM$GROUP_000020)

(LNM$SYSTEM_TABLE)

(DECW$LOGICAL_NAMES)


	Can anybody point me in the right direction for passing the
	DEFINE ENVFILE 'F$ENVIRONMENT("PROCEDURE")' command-line
	using SPAWN from within FORTRAN or C, and getting it to store
	the DCL script-name in which it's being run ?. It appears to
	be tripping over the single quotes - any work-arounds ?


	We're on VMS 5.4_2 and I used Fortran version 5.6 for the
	above test.
	Hope somebody can help ...


			Nye Osborne.

				Polytechnic of Wales (POW)
				soon to be:
				University of Glamorgan (UG) Yuk !			

Xref: sparky comp.os.vms:12832 vmsnet.sysmgt:223
Newsgroups: comp.os.vms,vmsnet.sysmgt
Subject: Re: Copying a LONG list of rights identifiers between users.
From: rharwood@east.pima.edu
Date: 27 Jul 92 20:16:28 MST

In article <1992Jul27.093840.943@beckman.com>, dsroberts@beckman.com writes:
> We have a username with about 300 rights identifiers attached to it (sad but
> true).  The user has retired and we want to use a generic username for what we
> were using all those identifiers.  The generic username exists, and I just 
> need to put all those rights identifiers on the generic username.  Is there a 
> simple way to grant/id all those identifiers? 

I take the brute-force-but-simple approach on such one-time tasks:

1)  Get into AUTHORIZE and do a "LIST/FULL OLD_USER", exit and rename
    SYSUAF.LIS to X.COM
2)  Use EVE to cut out all the stuff from X.COM other than the granted 
    rights lines near the bottom of the list:
      IMA_HOLDER         %X80000003
3)  Put the cursor on the beginning of the first rights line
4)  Start an EVE "learn" sequence (usually control-K)
5)  Add "GRANT/ID " in front, advance (by word?) past the rights ID, erase 
    to end of line, and add "NEW_USER" to the end of the line:
GRANT/ID      IMA_HOLDER         NEW_USER
6)  Go down a line, go to beginning of line (2nd rights id).
7)  Tell EVE to REMEMBER the learn sequence and assign to gold-something.
8)  Guess how many more rights IDs there are, and DO REPEAT 300 or something.
9)  Then press your gold-something, and wait while the editor does your work.

Now add DEFINE/USER SYS$INPUT SYS$COMMAND and RUN AUTHORIZE to the top of that
file, and do an @X... NEW_USER now has OLD_USERs rights IDs.
-----
Ray Harwood           |Data Basix           |Adjunct Faculty, East Campus,
Voice: (602)721-1988  |PO Box 18324         |   Pima Community College
FAX:   (602)721-7240  |Tucson, AZ 85731     |Instructor in Ada and Pascal
CompuServe: 76645,1370|AppleLink: DATA.BASIX|Internet: rharwood@east.pima.edu
From: winalski@adserv.enet.dec.com (Paul S. Winalski)
Newsgroups: comp.os.vms
Subject: Re: ?Effect of large number of logical definitions?
Date: 23 Jul 92 14:36:00 GMT
Reply-To: winalski@adserv.enet.dec.com (Paul S. Winalski)
Organization: Digital Equipment Corporation, Nashua NH


In article <1992Jul23.094517.1@woods.ulowell.edu>,
welchb@woods.ulowell.edu writes:
|>
|>What measurable or noticeable effect upon users is caused by having
|>a large number of logicals defined in the system tables?  I ask this
|>because we just installed GKS; it has created close to 100 logical names,
|>which will seldom get used.  
|>Will this slow down the average non-GKS user?  Should the designers
|>of GKS have used a different method?

Little or no effect whatsoever.  Don't worry about it.

--PSW
Newsgroups: comp.os.vms
From: carl@SOL1.GPS.CALTECH.EDU (Carl J Lydick)
Subject: Re: Multiple save-sets on a tape
Reply-To: carl@SOL1.GPS.CALTECH.EDU
Organization: HST Wide Field/Planetary Camera
Distribution: usa
Date: Wed, 29 Jul 1992 09:17:27 GMT

In article <1992Jul22.234539@aminet.uucp>, barrett@aminet.uucp (Keith Barrett) writes:
>In article <1992JUL20.175952.03@pegasus.ch>, imkesun@pegasus.ch (Ralph Kloess) writes:
>>   we put multiple savesets on a 8mm exabyte by doing an
>>   $INIT $1$MUA110: 'label'
>>   and then
>>   $BACKUP disk:[dir-struct-1...] $1$MUA110:saveset-1.bck/SAVE/LABEL='label'
>>   $BACKUP disk:[dir-struct-2...] $1$MUA110:saveset-2.bck/SAVE/LABEL='label'
>>   $BACKUP disk:[dir-struct-n...] $1$MUA110:saveset-n.bck/SAVE/LABEL='label'
>>
>>   It works fine so far (over a year)
>
>You can skip the "INIT" part if you include a "/REWIND" on the first AND ONLY
>FIRST backup command.

NNNNNNNNNNNNNNNNNNNNNOOOOOOOOOOOOOOOOOOO!  Some (all?) SCSI controllers and VMS
v5.4-2 don't get along very well.  In particular, BACKUP/REWIND may or may not
properly initialize your tape.  Please check to see whether or not this is a
problem on YOUR system before you trust BACKUP/REWIND to properly initialize
your tape.  The sanity you save may be your own.
--------------------------------------------------------------------------------
Carl J Lydick | INTERnet: CARL@SOL1.GPS.CALTECH.EDU | NSI/HEPnet: SOL1::CARL

Disclaimer:  Hey, I understand VAXen and VMS.  That's what I get paid for.  My
understanding of astronomy is purely at the amateur level (or below).  So
unless what I'm saying is directly related to VAX/VMS, don't hold me or my
organization responsible for it.  If it IS related to VAX/VMS, you can try to
hold me responsible for it, but my organization had nothing to do with it.
From: greenie@drycas.club.cc.cmu.edu
Newsgroups: comp.os.vms
Subject: Latest version of MX for the VAX?
Date: 22 Jul 92 09:06:58 GMT
Article-I.D.: drycas.1992Jul22.140658.1596
Organization: Carnegie Mellon Computer Club

Can anyone tell me where I can get the latest version of MX Message Exchange
for VMS?  (Sorry if this is FAQ or an absurd question, but I couldn't find
it anywhere...)

Andy, greenie@drycas.club.cc.cmu.edu
Newsgroups: comp.os.vms
From: goathunter@wkuvx1.bitnet
Newsgroups: comp.os.vms
Subject: Re: DECwindows ==> Motif license upgrade
Date: 30 Jul 92 08:08:28 CDT
Distribution: world
Organization: Western Kentucky University, Bowling Green, KY

In article <0095E4A750ABDE80.29E0FB4E@tchden.UUCP>, lbmoore@tchden.UUCP ("Louis B. Moore") writes:
> 
>>> the deadline was past.  We beat up on our DEC-critter, saying that we should
>>> get it for free since we never were informed (we were told about the upgrade
>>> one week after it expired), but our words fell on deaf ears.
> 
>>What was the offer, I still haven't heard anything ?
> 
> The offer was in the VMS 5.4-3 release notes.  We had to fill in a form
> listing all the machines we used DECwindows on.  Many months later, we
> got the PAKs and kits.  I had to beat our DEC-critters until my arm was
> tired but it worked. 
> 
> Perhaps somebody who still has the release notes can fill us in on the
> details.
> 
Sounds like I was lucky.  When the offer was out, I read about it
here.  A couple of days later, I received a big white envelope from
DEC with a neon-orange sticker that said something like "FREE VMS
MOTIF OFFER" on it.  I filled out the forms, sent them in, and
received the PAK and tape about three weeks later.

Wonder how I managed to be so lucky?!?!

Hunter
------
Hunter Goatley, VMS Systems Programmer, Western Kentucky University
goathunter@WKUVX1.BITNET, 502-745-5251
From: jeh@cmkrnl.com
Newsgroups: comp.os.vms
Subject: Re: Q: DECterm fonts change (100dpi) after Motif installation.
Date: 23 Jul 92 01:05:16 GMT
Organization: Kernel Mode Consulting, San Diego, CA

In article <1992Jul17.112257.411@vms.huji.ac.il>, yehavi@vms.huji.ac.il writes:
> [under V5.5 with Motif 1.0A] the new little [DECterm] font is the same as 
> the old big font. The new big font is
> a huge thing (which is almost unuseable, except from lectures...) and the old
> little-font (which allowed us to use little windows) has gone. Any idea why is
> the change and how to restore the old behavior?

I don't know why it changed, but here's how to fix it:  In SYS$MANAGER, copy
DECW$PRIVATE_SERVER_SETUP.TEMPLATE to *.COM, and edit the latter so that for
the affected workstations the command 

	$ DECW$SERVER_DENSITY == 75

is executed.  Reboot.  

This effectively lies to anybody who asks and tells them that you have a 75 dpi
monitor.  So the old, smaller fonts are selected.  I don't quite understand the
logic of this, but that's what it does.  Then you can have, for example, four
non-overlapping 24x80 DECterms (two with condensed font, two with normal). Or a
48x80 with normal font, and two 24x80 with condensed. Everything else, starting
with the login window, gets smaller too, so you can more effectively use the
additional pixels on a 1280x1024 screen.  (Which you need to do, because Motif
gobbles lots of pixels for "overhead" like the menu bar, the resize borders,
etc., etc., etc.) 

	--- Jamie Hanrahan, Kernel Mode Consulting, San Diego CA
Chair, VMS Programming and Internals Working Group, U.S. DECUS VAX Systems SIG 
Internet:  jeh@cmkrnl.com, hanrahan@eisner.decus.org, or jeh@crash.cts.com
Uucp:  ...{crash,eisner,uunet}!cmkrnl!jeh
From: PETERSC0@CTRVAX.VANDERBILT.EDU (Ghost in the -Turing- Machine)
Newsgroups: comp.os.vms
Subject: Re: LAT for unix (not ULTRIX) cpus
Date: 21 Jul 92 02:40:00 GMT
Distribution: world
Organization: The Internet


    I have had fairly good luck with KiNET on an AIX system.  It provides
DECNET and LAT services and more if you're a little crafty...  We should
be running TSSnet (same or more functionality) on an AIX box pretty soon
in the lab.

-Chris Petersen
 (formerly of) Vanderbilt University
 Enterprise Systems Associates, St. Louis
 petersc0@vuctrvax.bitnet
 petersc0@ctrvax.Vanderbilt.Edu
From: powers@ELROS.STG.TRW.COM
Newsgroups: comp.os.vms
Subject: Re: QUESTION FOR DIGITAL ON OPEN SYSTEMS
Date: 21 Jul 92 01:30:55 GMT
Organization: The Internet


>If someone were to stumble onto such a situation as was described, and the user
>wrote (assuming mail was installed on the system) a message to the op, warning
>him of the situation, would such an action be considered "malicious hacking"?
>Note that this hypothetical situation assumes the user gets on the system
>writes the mail then does a "logout. I am curious as to opinions on this one.
>
>                                                                        Joshua

That actually happened to me a year or two back.  I logged on to a bulletin-
board type of system (VMS), over the network, to browse around in some data.
This was a public account chained to a menu program.  Well, the menu program
broke and dumped me into the arms of DCL and the $ prompt.  Oops!  Fortunately,
the sysop had included his E-mail address in the login welcome message, a few
lines under the advisory

                   THIS IS A U.S. GOVERNMENT COMPUTER
    ANY UNAUTHORIZED ATTEMPT TO ACCESS THIS SYSTEM IS A FEDERAL OFFENSE

I simply wrote an E-mail message to the sysop explaining what happened, signed
it with my real name and real E-mail address, and logged off.  The sysop fixed
the problem, I went back to using his bulletin board system, and we lived
happily ever after.

Obviously, I and everyone else on the planet are authorized to use that BBS
account for its intended purpose, and it ain't our fault if the menu program
breaks.  Failure to report such a problem to the sysop creates the risk that
some idiot will come along and exploit the bug, do mischief, and force the
sysop to shut down the board altogether -- bad news if it's one of your
favorite boards.

      Lester Powers
      powers@elros.stg.trw.com
From: GREG@POMONA.CLAREMONT.EDU (Tigger)
Newsgroups: comp.os.vms
Subject: VS 4000-90 question
Date: 31 Jul 92 16:14:45 GMT
Organization: The Internet

I was just looking at the test of the VAXstation 4000-90 in the latest
_Digital Review_, and a question springs to mind.  Does anyone know if
Ultrix (or better yet, OSF/1) are available on that machine?

Greg Orman                                   greg@pomona.claremont.edu
Systems Manager                              greg@pomona.bitnet
Seaver Academic Computing Services
Pomona College                               Standard disclaimer-type stuff
From: DWING@UH01.Colorado.EDU (Dan Wing)
Newsgroups: comp.os.vms
Subject: Re: How to split a UUENCODED file?
Date: 30 Jul 92 15:19:31 GMT
Distribution: world
Organization: The Internet

Brin, ulowell!woods.ulowell.edu!coteb@UUNET.UU.NET, wrote:

>Can anyone tell me how to split a file that was uuencoded?  I can't mail the
>file because it is too large.  Can anyone tell me where to get a program that
>will do this for me?  Thank you very much.  I really appreciate it.

If both systems are VMS systems, you can use VMS_SHARE; see the monthly
software list for sites that have this program (one that comes to mind is
FileServ@Cerritos.EDU).

-Dan Wing, DWING@UH01.Colorado.EDU or WING_D@UCOLMCC.BITNET (DGW11)
 Systems Programmer, University Hospital, Denver
From: stevens@vms.macc.wisc.edu (PAul STevens - MACC - 2-9618)
Newsgroups: comp.os.vms
Subject: Re: Vax to Ultrix delay over decnet
Date: 23 Jul 92 17:18:41 GMT
Distribution: usa,local
Organization: University of Wisconsin Academic Computing Center

In article <1992Jul22.135053.3523@arizona.edu>, leonard@telcom.arizona.edu (Aaron Leonard) writes...

>>Telnet's timeout is generally a few tens of milliseconds.
> 
>Not true.  If it were, then every high- or variable-delay network
>would quickly be destroyed by TELNET.  TCP uses a sophisticated
>adaptive retransmission mechanism, but RFC-1122 recommends
>beginning with a retransmission timeout of 3 seconds.

 You are probably right.  My information comes from watching what
 happens on the network when a packet is lost.  I see a retransmission
 in only a few tens of milliseconds.  In fact, I have seen them occur
 in only a few milliseconds.  This may have happened after the nodes
 discovered how close together they were.

> 
>Your TELNET users must have the patience of Job, then.  Performance on
>all network protocols that I am familiar with will go right down the 
>toilet if you have as much as 2% packet loss, let alone 80%.
> 

 Not at all!  This I have seen with my own eyes.  People call me
 to complain that their Novell server is dead and that their
 VAX/VMS nodes are printing adjacency messages and when I arrive with
 a network sniffer I discover that someone has extended their thinwire
 with 75 ohm wire from Radio Shack.  But when I use telnet on a PC,
 I cannot tell that anything is wrong.  And I have *seen* that each
 packet is repeated many times before being acknowledged.  I am pretty
 sure that NCSA telnet is very simple; it has a timeout value in
 CONFIG.TEL that specifies timout in 1/18ths of a second.  Mine came
 with a value of one.
> 
>A properly configured Ethernet will lose virtually no packets (<0.1%)
>until it's grotesquely overloaded (>>90%).  Greater packet loss than
>that is sign of electrical misconfiguration or hardware malfunction.
>Find someone responsible for your network, and encourage him to
>fix it.
> 

  I agree with this paragraph 100%.  Unfortunately it is I who am 
  called upon to fix about 60 of the ethernet segments on the
  campus.  But they are always fixable to the standards you suggest.
  In fact, I like to think I can make it much less than 0.1%.  I
  don't think overload should cause packet loss except perhaps
  in software queues on the machines connected to the net.

  And thanks to everyone for the hints about the DECNET EXEC parameters
  to adjust retransmission delays.  I will try them and if they don't
  work you will hear from my boys.  ;-)
From: OZMINSKI@MSUKBS.BITNET (Stephan Ozminski)
Newsgroups: comp.os.vms
Subject: Re: Redirect printer queue
Date: 23 Jul 92 17:50:00 GMT
Organization: The Internet

>
>Is there any easy and quick way to catch what is sent to a printer queue and
>redirect it to another file? The only way I can think of is to modify the
>symbiont. Any suggestions?
>
>Gong Su

The closest we can come to what might help you is to send the file
to a generic queue that is stopped.  A stopped queue will accept print
jobs and put them in a pending state.  We have a dcl procedure that
runs in a detached process and checks the queue every 30 seconds and
modifies the print jobs before moving them with set entry/requeue.
With a privileged account you could do whatever you want to the print
job while it is pending, including using f$getqui() to find the file
name and process the file submitted.

-Stephan


Stephan J. Ozminski                    Bitnet:    OZMINSKI@MSUKBS
Michigan State University              Internet:  OZMINSKI%KBS.DECNET@CLVAX1.CL.
   MSU.EDU
W.K. Kellogg Biological Station
3700 E. Gull Lake Dr.
Hickory Corners, MI 49060
Newsgroups: comp.os.vms
From: coar@Nephi.Enet.DEC.Com (Rodent of Unusual Size)
Subject: Re: ?Effect of large number of logical definitions?
Summary: Keep on tunin'
Keywords: VMS, logical names, performance
Organisation: Employed by (*NOT* speaker for) DEC, Boxborough, MA, U.S.A.
Organization: Digital Equipment Corp.
Distribution: comp
Date: Thu, 23 Jul 1992 17:38:37 GMT


In article <1992Jul23.143600.3476@rdg.dec.com>, winalski@adserv.enet.dec.com (Paul S. Winalski) writes...
> 
>In article <1992Jul23.094517.1@woods.ulowell.edu>,
>welchb@woods.ulowell.edu writes:
>|>
>|>What measurable or noticeable effect upon users is caused by having
>|>a large number of logicals defined in the system tables?  I ask this
>|>because we just installed GKS; it has created close to 100 logical names,
>|>which will seldom get used.  
>|>Will this slow down the average non-GKS user?  Should the designers
>|>of GKS have used a different method?
> 
>Little or no effect whatsoever.  Don't worry about it.

    As long as you let AUTOGEN resize the LNMSHASHTBL (which controls the size
    of the hash table for all shared logical name tables) appropriately.  If
    the hash table is too dense, you'll get hit in the performance because of
    collisions and $TRNLNM having to walk the bucket chain.

>--PSW

    #ken    :-)}	Jeratol the Chaotic

Coar@Nephi.Enet.DEC.Com	 | All opinions herein contained, stated or implied,
Coar@DECUS.Org		 | are solely those of the author.  And he's fullovem.
Coar@Eisner.DECUS.Org	 | `... it was mine art, ... that made gape the pine 
Massachusetts, USA       | and let thee out.'  - Prospero (_The Tempest_)
From: carl@SOL1.GPS.CALTECH.EDU (Carl J Lydick)
Newsgroups: comp.os.vms
Subject: Re: Problem with ANALYZE/DISK/REPAIR
Date: 22 Jul 92 01:49:38 GMT
Reply-To: carl@SOL1.GPS.CALTECH.EDU
Organization: HST Wide Field/Planetary Camera

In article <21JUL199211212307@robot.nuceng.ufl.edu>, sysop writes:
>
>Hello net,
>
>	Im running V5.3-1 and for a while now when I run ANALYZE/DISK/REPAIR
>I get the message:
>
>%VERIFY-E-SORTERROR, error sorting multiply allocated block list
>-RMS-E-WLCK, device currently write locked
>
>	I said something to DEC as an aside but didn't really get an answer.
>Is this a problem?  Any ideas how to fix or why it exists?

The reason it exists is that:
	1)  The first thing ANAL/DISK/REPAIR does after parsing the command,
	    making sure the device exists, and so forth, is to "[w]rite-lock
	    the volume set to prevent simultaneous updates."  This is necesary
	    since otherwise VERIFY could get confused when INDEXF.SYS,
	    BITMAP.SYS, or directories were updated by other programs.
	2)  VERIFY tries to create a work file to sort the multiply allocated
	    block list.
Now, this is normally not a problem, unless VERIFY tries to create the work
file on the disk you're analyzing.  If that happens, then the file create fails
since VERIFY has the disk write-locked (actually, it's not really write-locked,
it's got the bit that inhibits file extension set, but since it wants to
allocate a file header and some blocks to the file it's creating, for our
purposes the disk IS write-locked).

So, what can you do about it?  Well, if you redefine SYS$SCRATCH to point to a
directory on some other disk, I think that will do it.
--------------------------------------------------------------------------------
Carl J Lydick | INTERnet: CARL@SOL1.GPS.CALTECH.EDU | NSI/HEPnet: SOL1::CARL

Disclaimer:  Hey, I understand VAXen and VMS.  That's what I get paid for.  My
understanding of astronomy is purely at the amateur level (or below).  So
unless what I'm saying is directly related to VAX/VMS, don't hold me or my
organization responsible for it.  If it IS related to VAX/VMS, you can try to
hold me responsible for it, but my organization had nothing to do with it.
Xref: sparky comp.os.vms:12933 comp.periphs.printers:2259