Initial commit

1 files changed, 70 insertions, 0 deletions

diff --git a/dviware/beebe/src/cvt.c b/dviware/beebe/src/cvt.c
new file mode 100644
index 0000000000..f1ab02c742
--- /dev/null
+++ b/dviware/beebe/src/cvt.c
@@ -0,0 +1,70 @@
+/***********************************************************************
+Convert a stream format file to fixed binary, supplying trailing NUL's
+for padding if necessary.
+
+Usage:
+  	cvt infile outfile
+[22-Aug-87]
+***********************************************************************/
+
+#define PAD '\0'
+#define FAILURE ((1 << 28) + 2)
+#define SUCCESS 1
+
+#include <stdio.h>
+
+main(argc,argv)
+int argc;
+char* argv[];
+{
+	FILE* in;
+	FILE* out;
+	int c;
+	long count;
+
+	if (argc != 3)
+	  {
+	    fprintf(stderr,"Usage: cvf infile outfile\n");
+	    exit(FAILURE);
+	  }
+
+	in = fopen(argv[1],"rb","rfm=stm","ctx=stm");
+	if (in == (FILE*)NULL)
+	  {
+	    fprintf(stderr,"?Cannot open [%s] for input\n",argv[1]);
+	    exit(FAILURE);
+	  }
+
+	out = fopen(argv[2],"wb","rfm=fix","bls=512","mrs=512");
+	if (out == (FILE*)NULL)
+	  {
+	    fprintf(stderr,"?Cannot open [%s] for output\n",argv[1]);
+	    exit(FAILURE);
+	  }
+
+	count = 0;
+	while ((c = getc(in)) != EOF)
+	  {
+	    putc(c,out);
+	    count++;
+	  }
+	fprintf(stderr,"File size = %ld\n",count);
+	/* Now supply trailing padding to ensure output is a multiple of
+	   512 characters; otherwise, RMS will not close the output file
+	   correctly. */
+	count %= 512;
+	if (count > 0)
+	    for (; count < 512; ++count)
+	        putc(PAD,out);
+	if (fclose(in) == EOF)
+	  {
+		fprintf(stderr,"?Close failure on [%s]\n",argv[1]);
+		exit(FAILURE);
+	  }
+	if (fclose(out) == EOF)
+	  {
+		fprintf(stderr,"?Close failure on [%s]\n",argv[2]);
+		exit(FAILURE);
+	  }
+	exit(SUCCESS);
+}