HP3000-L Archives

March 2003, Week 2

HP3000-L@RAVEN.UTC.EDU

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
From:
"Bartram, Chris (Contractor)" <[log in to unmask]>
Reply To:
Bartram, Chris (Contractor)
Date:
Thu, 13 Mar 2003 15:48:22 -0500
Content-Type:
text/plain
Parts/Attachments:
text/plain (59 lines)
Ok, as always seems to happen, right after I sent this, I found a minor
problem. Seems the 7.0 patch bundle has fewer files (I was figuring on 12
like the 6.0 and 6.5), so a quick fix should accommodate any variations. New
version of job stream:

!job getpatix,manager.sys,install;outclass=lp,1
!
!#
!# Author: Chris Bartram, 03/13/2003
!#
!# This job retrieves the "current" Patch/iX package from HP's ITRC
!# ftp site.
!#
!# Set proxyhost to the name of the ftp proxy server you need to use -
!#  leave it blank ("") if you don't need to use a proxy
!#
!# Set DO_RESTORE to "Y" if you want the job to actually restore the
!# Patch/iX files for you (overwriting what you already have in INSTALL.SYS)
!# **Use with caution; backup your existing files first if you're not sure
!
!setvar proxyhost ""
!setvar DO_RESTORE "Y"
!
!setvar _nn word("!hpversion",".",2)
!
!continue
!PURGE PAT![_nn]STD > $NULL
!
!if "!proxyhost"<>"" then
!  echo open !proxyhost                                   >  FTPIN
!  echo user [log in to unmask] [log in to unmask]  >> FTPIN
! else
!  echo open ftp.itrc.hp.com                              >  FTPIN
!  echo user anonymous [log in to unmask]                  >> FTPIN
!endif
!echo cd /export/bin                                      >> FTPIN
!echo binary                                              >> FTPIN
!setvar _p1 "rec=128,,f,binary;code=2501;disc=30000"
!echo get patchix!_nn.store PAT![_nn]STD;!_p1             >> FTPIN
!echo exit                                                >> FTPIN
!
!run ftp.arpa.sys < FTPIN
!file p=PAT![_nn]STD;dev=disc
!vstore *p;@[log in to unmask]@;show
!
!if "!DO_RESTORE"="Y" then
!  if !TS_FILES_FAILED_TO_RESTORE=0 then
!
!    # looks like patch files were retrieved successfully.
!
!    restore *p;@[log in to unmask]@;local;show;olddate;creator=MANAGER.SYS
!
!  endif
!endif
!eoj

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

ATOM RSS1 RSS2