topic Re: DCL script to FTP files in Operating System - OpenVMS

DCL script to FTP files

ben_moore34 — Fri, 30 Jul 2010 09:28:34 GMT

Morning
I wonder if anyone could help me out with modifying a small DCL script which FTPs some files to a server?
We have 8 VAXs which seem to use different FTPs. Some use FTP & some use MULTI FTP as the command to get into the FTP prompt

There is a script which writes commands to a temp file ftpjob.tmp, executes ftpjob.tmp and then deletes it

$ open/write ftpjob ftpjob.tmp
$ wr ftpjob "$ftp 10.37.2.23 /username=ftp_to_share",-
"/password=""1password23"""
$ wr ftpjob "cd /VAX/OUT/SHARE/"
$ wr ftpjob "put ''source_file' ''target_file'"
$ wr ftpjob "bye"
$ wr ftpjob "$exit"
$ close ftpjob
$ @ftpjob.tmp
$! delete ftpjob.tmp;

This works fine on the systems which FTP is accessed by typing FTP

However, on the systems where Multi FTP is typed to access FTP (see below) I get Login or Password incorrect errors.

$ open/write ftpjob ftpjob.tmp
$ wr ftpjob "$multi ftp 10.37.2.23 /username=ftp_legacy_uk_prd",-
"/password=""1pwd4PRDUK"""
$ wr ftpjob "cd /VAX/OUT/APOLLO/"
$ wr ftpjob "put ''source_file' ''target_file'"
$ wr ftpjob "bye"
$ wr ftpjob "$exit"
$ close ftpjob
$ @ftpjob.tmp
$! delete ftpjob.tmp;

If I manually enter the commands at the prompt I can get in, not really sure what I'm doing wrong here..

Any help gratefully received

Thanks

BM

Re: DCL script to FTP files

abrsvc — Fri, 30 Jul 2010 10:11:24 GMT

This may just be a typo, but in the example you posted, multiftp has a space in it which would lead me to believe that the "multi" is recogniozed as invoking multiftp. This means that the "ftp" is being recognized or processed rather than the /username etc.

Please note that I do not have multiftp so I can not test this.

Dan

Re: DCL script to FTP files

Steven Schweda — Fri, 30 Jul 2010 10:37:21 GMT

> We have 8 VAXs which seem to use different
> FTPs. [...]

It might be useful to know something about
the software here (more than "VAXs").

Is this "MULTI FTP" related to MultiNet?

The DEC/Compaq/HP IP networking package
should identify itself using a command like:

tcpip show version
or:
ucx show version

depending on its age. MultiNet probably has
something similar, but you may be able to
find that about as fas as I could. ("HELP"?)

At a minimum:

WRITE SYS$OUTPUT F$GETSYI( "VERSION")

Other potentially interesting things:

Did this stuff ever work? If so, what has
changed recently?

Are you publishing real passwords here?

> If I manually enter the commands [...]

And what you enter manually is really what's
in those procedures? As usual, a transcript
showing actual commands with their actual
output can be more helpful than vague
descriptions and interpretations.

Re: DCL script to FTP files

Hoff — Fri, 30 Jul 2010 11:01:48 GMT

ftp is an ancient abomination of a protocol and being older than IP itself, is inherently hideous around firewalls, and it has the added bonus of transmitting your username and password credentials in cleartext. All that aside...

If this box is V6.2 or later, you're doing this the hard way.

Use the COPY /FTP command that's available in DCL.

It does symbol substitution.

It does passwords.

It does default directories.

It's trivially easy to use in DCL command procedures, and to substitute symbols within.

COPY /FTP /ASCII -
fromhost"user pass"::"/where/ever.txt" -
localfilename.txt

See the manuals, or see:

http://labs.hoffmanlabs.com/node/136

The more secure version of this operation, which avoids passwords, uses sftp. (There's unfortunately no DCL verb for that, though.) See the sftp documentation or see:

http://labs.hoffmanlabs.com/node/1118

Re: DCL script to FTP files

ben_moore34 — Fri, 30 Jul 2010 12:19:34 GMT

Thanks for the help so far!

I'm getting somewhere with it

If I issue the following at a command prompt I can get in

Multi ftp 10.37.1.23 /username=username /password="""password""" (I think it needs these quotes to be in the right case)

ATSR22 MultiNet FTP user process V4.0(118)
Connection opened (Assuming 8-bit connections)
<
[Attempting to log in as ******]
FTP>

However I'm trying to run this procedure within a script so that it writes the commands to ftpjob.tmp and then executes it(it's all within an existing procedure which sends lots of reports out)

$ open/write ftpjob ftpjob.tmp
$ wr ftpjob "$Multi ftp 10.37.1.23 /username= username /password="""password""""
$ wr ftpjob "cd /VAX/OUT/SHARE/"
$ wr ftpjob "put ben.txt ben.txt"
$ wr ftpjob "bye"
$ wr ftpjob "$exit"
$ close ftpjob
$ @ftpjob.tmp
$! delete ftpjob.tmp;
$ exit

I'm thinking that somehow it's either submitting the password in the incorrect casing or there's a space missing.

if try for example

Multi ftp 10.37.1.23 /username=******** /password="""****"""

then it'll connect

but if I

open/write benjob benjob.tmp
wr benjob "multi ftp 10.37.1.23 /username= ftp_legacy_uk_prd /password="""1pwd4PRDUK""" "
close benjob

then look inside the benjob.tmp file I have

multi ftp 10.37.1.23 /username= ftp_legacy_uk_prd /password="1PWD4PRDUK"

It has to be something small that I'm missing here I'd imagine

BM

Re: DCL script to FTP files

Joseph Huber_1 — Fri, 30 Jul 2010 12:30:43 GMT

Is the remote systems username case sensitive ?
If yes, then it must be quoted on the DCL command as well, like the password.

Re: DCL script to FTP files

ben_moore34 — Fri, 30 Jul 2010 12:36:40 GMT

yes the host has a mixed case password.
It's got to be something to do with how the commands get written into the temp file first and then read back.

Re: DCL script to FTP files

Hoff — Fri, 30 Jul 2010 12:36:51 GMT

If the password is causing a problem...

Just get rid of the password.

Why?

At least that's being honest about the security here.

Re: DCL script to FTP files

ben_moore34 — Fri, 30 Jul 2010 12:38:34 GMT

By the way - some more info on Multi ftp

ATSR19 MultiNet FTP user process V4.0(118)
Connection opened (Assuming 8-bit connections)

ucx show version

DEC TCP/IP Services for OpenVMS VAX Version V4.0 - ECO Level 2
on a VAX 4000-600A running OpenVMS V7.1

Re: DCL script to FTP files

The Brit — Fri, 30 Jul 2010 12:44:03 GMT

BM
this is what you are currently doing

Write Outfile "Password="""Test""""

this appears in OutFile as

Password="TEST" (Not what you want!)

Try

Write Outfile "Password=""Test"""
(i.e. one less doublequote around the password string)

Should give;

Password="Test"

HTH

Dave

Re: DCL script to FTP files

ben_moore34 — Fri, 30 Jul 2010 13:00:10 GMT

Thanks for the answers guys

I'd love to get rid of the password, not my decision unfortunately.
It looks like the command in multi ftp does need the 3""" around the password to recognise it.

OPS> multi ftp 10.37.1.23 /username= ****** /password="""xxxxxx"""
ATSR22 MultiNet FTP user process V4.0(118)
Connection opened (Assuming 8-bit connections)
<
[Attempting to log in as ********]
FTP>exit

The above will let me in

OPS> multi ftp 10.37.1.23 /username= ******** /password=XXXXXXXX
ATSR22 MultiNet FTP user process V4.0(118)
Connection opened (Assuming 8-bit connections)
<
[Attempting to log in as ********]
FTP>exit
OPS>

I have to somehow retain the 3""" when I write the command to the temp file without DCL interpreting them.

Cheers

Re: DCL script to FTP files

Oswald Knoppers_1 — Fri, 30 Jul 2010 13:39:05 GMT

You have VMS 7.1 so why not try Hoff's suggestion and use copy/ftp. I think both multinet and TCPIP/UCX support this.

Oswald

Re: DCL script to FTP files

Joseph Huber_1 — Fri, 30 Jul 2010 13:44:12 GMT

It's not easy to communicate the right number of quotes in the ITRC interface ...
and to write the number of quotes correctly in a DCL statement.
I usually do it by putting the quote in a DCL symbol, then use symbol substitution in the WRITE statement, like:

$ Q:= """
$ write file Q,Q,Q,"text",Q,Q,Q

to put text in 3 quotes in the output file.

Re: DCL script to FTP files

ben_moore34 — Fri, 30 Jul 2010 14:57:56 GMT

Thanks everyone for all the help & suggestions.

Joseph - I set up a symbol as suggested to represent " and it's working now. Took a little bit of messing around

Thanks again & have a good weekend

Cheers

BM I

Re: DCL script to FTP files

RBrown_1 — Fri, 30 Jul 2010 15:00:54 GMT

If three pairs of quotes work when done interactively (ie """Test"""), then you will need more quotes inside the command file. It seems to me that for every command level, another set of quotes gets stripped off.

My two cents.

Re: DCL script to FTP files

ben_moore34 — Fri, 30 Jul 2010 15:34:52 GMT

Yeah I see what you are saying, got it set up like this now & it's working fine

$ Q:= """
$ open/write ftpjob ftpjob.tmp

$ wr ftpjob "$Multi ftp 10.37.1.23 /username= ********",-
"/password=",Q,Q,Q,"XXXXXXX""",Q,Q

$ wr ftpjob "cd /VAX/OUT/SHARE/"
$ wr ftpjob "put ben.txt ben.txt"
$ wr ftpjob "bye"
$ wr ftpjob "$exit"
$ close ftpjob
$ @ftpjob.tmp
$! delete ftpjob.tmp;
$ exit

As a matter of interest do you all use VMS at work? We have a lot of VAXs and a few Alphas here which the company keep threatening to get rid of. Thing is they are so embedded in the infrastructure of the business so it's hard to replace them (keeps me in work for a little longer I guess).

Cheers

BM

Re: DCL script to FTP files

Hoff — Fri, 30 Jul 2010 15:55:46 GMT

$ srcfil ="srcfile.txt"
$ trgfil = "trgfile.txt"
$ copy/ftp/ascii -
'srcfil'
10.37.1.23"user pass"::"/HERE/THERE/WHATEVER/''trgfil'"

Re: DCL script to FTP files

Hoff — Fri, 30 Jul 2010 15:56:44 GMT

missing hyphen on a continuation...

$ srcfil ="srcfile.txt"
$ trgfil = "trgfile.txt"
$ copy/ftp/ascii -
'srcfil' -
10.37.1.23"user pass"::"/HERE/THERE/WHATEVER/''trgfil'"

Re: DCL script to FTP files

ben_moore34 — Fri, 30 Jul 2010 16:16:12 GMT

Thanks Hoff

I think in future I'll be using copy/ftp, seems much simpler. I'll probably get asked to modify other scripts before long.

Cheers everyone

BM

Re: DCL script to FTP files

Craig A — Fri, 30 Jul 2010 16:52:10 GMT

The last time I looked at this in any great detail (and that is a good couple of years ago) I decided against COPY/FTP because I wanted to trnasfer the file over as a .TMP file and then RENAME it to its correct extention.

Since I would need to establish a connection to do the rename I just did it as follows:

PUT CRAIG.DAT CRAIG.TMP
RENAME CRAIG.TMP CRAIG.DAT

The advantage of this approach is that if the network connection breaks part-way through the transmit, there isn't a correctly named file left overhanging. Many of the processes were automated and would poll incoming folders for specific files. Not good.

HTH

Craig