Article 158405 of comp.os.vms: Path: nntpd.lkg.dec.com!lead.zk3.dec.com!pa.dec.com!decwrl!lll-winken.llnl.gov!fnnews.fnal.gov!nntp-server.caltech.edu!seqaxp.bio.caltech.edu!MATHOG From: mathog@seqaxp.bio.caltech.edu Newsgroups: comp.os.vms Subject: Re: Anyone know of a binhex decoder and MS Word converter ? Date: 2 Nov 1996 17:59:38 GMT Organization: Biology Division, Caltech, Pasadena CA 91125 Lines: 169 Message-ID: <55g26a$lfb@gap.cco.caltech.edu> References: <43274875@MVB.SAIC.COM> Reply-To: mathog@seqaxp.bio.caltech.edu NNTP-Posting-Host: seqaxp.bio.caltech.edu Xref: nntpd.lkg.dec.com comp.os.vms:158405 In article <43274875@MVB.SAIC.COM>, Gaylon Stockman Hello, > > Background and available products: > OpenVMS 6.2 VAX and Alpha workstations and servers > DCPS v1.2 > PMDF v5.3 > > I thought I had seen this come up before but can not seem to find >anything on the subject. I am looking for a binhex 4.0 decoder (and possibly >encoder) for OpenVMS (VAX and Alpha). Does anyone know of one that is >available ?? Here are my notes on the one we have From ftp://infolane.com/pub/picutils/unix/decode/binhex.tar.Z 25-SEP-1995. Had to make a few code changes to get it to build cleanly on OpenVMS AXP 6.1 + DECC 4.1. Use make_vms.com to build it. $ type make_vms.com $! make_VMS.com $! For AXP + DECC, probably will on VAX + DECC too. $! David Mathog, Biology Division, Caltech $! $ cc/nolis/nowarn/prefix=all xbin $ link/nomap xbin $! $ library/help/create xbin.hlb xbin.hlp $! $ set file/prot=w:re *.*.* $ Let's see, what were the changes... ************ File TOOL_ROOT:[BINHEX]XBIN.C;15 3 /*__VMS version, lint in comment, in original it was #endif lint */ 4 #endif /* lint */ 5 ****** File TOOL_ROOT:[BINHEX]XBIN.C_DIST;1 3 #endif lint 4 ************ ************ File TOOL_ROOT:[BINHEX]XBIN.C;15 9 #ifndef __VMS 10 #include 11 #else 12 #include 13 #include 14 #include 15 #include 16 #define MAXNAMLEN 30 17 #endif 18 ****** File TOOL_ROOT:[BINHEX]XBIN.C_DIST;1 8 #include 9 ************ ************ File TOOL_ROOT:[BINHEX]XBIN.C;15 118 #ifdef __VMS 119 int 120 #endif 121 main(ac, av) ****** File TOOL_ROOT:[BINHEX]XBIN.C_DIST;1 109 main(ac, av) ************ ************ File TOOL_ROOT:[BINHEX]XBIN.C;15 257 #ifdef __VMS 258 /*No error checking here - if the name already has a "." then this 259 will fail!!!*/ 260 sprintf(files.f_data, "%s_data", namebuf); 261 sprintf(files.f_rsrc, "%s_rsrc", namebuf); 262 sprintf(files.f_info, "%s_info", namebuf); 263 #else 264 sprintf(files.f_data, "%s.data", namebuf); ****** File TOOL_ROOT:[BINHEX]XBIN.C_DIST;1 245 sprintf(files.f_data, "%s.data", namebuf); ************ ************ File TOOL_ROOT:[BINHEX]XBIN.C;15 267 #endif 268 if (verbose) ****** File TOOL_ROOT:[BINHEX]XBIN.C_DIST;1 248 if (verbose) ************ ************ File TOOL_ROOT:[BINHEX]XBIN.C;15 310 #if defined(BSD) || defined(__VMS) 311 struct timeb tbuf; ****** File TOOL_ROOT:[BINHEX]XBIN.C_DIST;1 290 #ifdef BSD 291 struct timeb tbuf; ************ ************ File TOOL_ROOT:[BINHEX]XBIN.C;15 333 #if defined(BSD) || defined(__VMS) 334 ftime(&tbuf); ****** File TOOL_ROOT:[BINHEX]XBIN.C_DIST;1 313 #ifdef BSD 314 ftime(&tbuf); ************ ************ File TOOL_ROOT:[BINHEX]XBIN.C;15 351 352 if (fp == NULL) { ****** File TOOL_ROOT:[BINHEX]XBIN.C_DIST;1 331 if (fp == NULL) { ************ Number of difference sections found: 8 Number of difference records found: 25 DIFFERENCES /IGNORE=()/MERGED=1/OUTPUT=SEQAXP$DKB200:[USERS.MATHOG]KILL.TXT;1- TOOL_ROOT:[BINHEX]XBIN.C;15- TOOL_ROOT:[BINHEX]XBIN.C_DIST;1 > > Also - does anyone know of a program (freeware) that can take a MS Word >doc and convert it to ascii text on a OpenVMS system? Sort of - it has to be free? There are commercial sources for this for VMS. Ask Digital about the CDA converter library (I think they still sell it), and there is a German company that apparently but most of that together, but sells it's own produce call SYCOnvert, here's their info: SYSTEM CONSULT GmbH - Sales Dept. - An der Rehwiese 28 D-14129 Berlin, Germany Fon: +49 / (0)30 / 816 991-0 or directly (-54) or (-46) Fax: +49 / (0)30 / 816 991-33 VAX-Mail: CSONET::CONSULT01 E-Mail: 100303.112@CompuServe.Com (I don't use their software, but I saved their address.) Anyway, if it has to be free use the *OLD* rtf2html program to get it to html (the new version is better, but you do have to pay for it): http://seqaxp.bio.caltech.edu:8000/pub/software/rtftohtml.zip Then use any web browser to get from HTML to text. Regards, David Mathog mathog@seqaxp.bio.caltech.edu Manager, sequence analysis facility, biology division, Caltech *************************************************************************** If you are an American voter, *please* read up on what Common Cause sent to Janet Reno on October 9th: http://www.cco.caltech.edu/~mathog/cclinks.html