Computing.Net > Forums > OpenVMS > script needed

script needed

Reply to Message Icon

Original Message
Name: wistler
Date: January 22, 2008 at 09:09:55 Pacific
Subject: script needed
OS: windows
CPU/Ram: amd 1gb
Model/Manufacturer: microsoft
Comment:

hi guys...I need a script to convert vms directory path to unix equivalent

Eg:- convert dka0:[a.b.c]temp.txt to /dka0/a/b/c/temp.txt


thx



Report Offensive Message For Removal

Response Number 1
Name: HakZan
Date: January 22, 2008 at 11:18:11 Pacific
Subject: script needed
Reply: (edit)

How about this.......quick and dirty

$ file = f$search("login.com")
$ device = f$parse(file,,,"device") - ":"
$ directory = f$parse(file,,,"directory") - "<"-"["-">"-"]"
$ num = 0
$ unixdir = ""
$next_subdir:
$ subdir = f$element(num,".",directory)
$ if subdir .nes. "."
$ then
$ unixdir = unixdir + "/" + subdir
$ num = num + 1
$ goto next_subdir
$ endif
$ filename = f$parse(file,,,"name")
$ filetype = f$parse(file,,,"type")
$ unix_file_name = device+unixdir+"/"+filename+filetype
$ show sym unix_file_name

regards,

Hakan Zanderau
HA-solutions



Report Offensive Follow Up For Removal

Response Number 2
Name: wistler
Date: January 23, 2008 at 04:01:29 Pacific
Subject: script needed
Reply: (edit)

thx for the script


Report Offensive Follow Up For Removal

Response Number 3
Name: Joseph.Huber
Date: January 30, 2008 at 00:58:01 Pacific
Subject: script needed
Reply: (edit)

HakZans procedure covers most, but not all cases: try it e.g. with [-.otherdir]file.typ .

If You have Perl installed, the following procedure may be of value:
<http://wwwvms.mppmu.mpg.de/util_root/com/unixify.com>
It makes use of the perl unixify() function in the VMS::Filespec package.

Also DECC has a function decc$from_vms, which does the translation.
See an example in
<http://wwwvms.mppmu.mpg.de/~huber/util/main/vms_to_unic.c>



Report Offensive Follow Up For Removal







Use following form to reply to current message:

   Name: From My Computing.Net Settings
 E-Mail: From My Computing.Net Settings

Subject: script needed

Comments:

 


  Homepage URL (*): 
Homepage Title (*): 
         Image URL: 
 
Data Recovery Software