/* COPYDESC version 1.02 Copyright (C) 1992 by Jim Robeson
* 11/11/92
* Function:
* Read a PCBoard DIR LIST file (arg-1),
* and copy it to a file (arg-2),
* changing all multi-line descriptions to "long lines".
* with the output position of the '|' set in arg-3,
* and the starting position of the text set in arg-4.
* note: requirment: 1 < arg-3 < arg-4 <= 34
*
* Other uses:
* None.
*
* Execution:
* Run from command line or .BAT:
* COPYDESC drv:\path\in-file-name drv:\path\out-file-name |pos txtpos
* If run without arguments, a bit of help appears.
*
* Compiled with:
* Borland's Turbo C 2.0.
* tcc copydesc
*
* Disclaimer:
* This program is contributed to the Public Domain. It can be
* freely used, modified and/or distributed by anyone. The only
* thing I ask is that you remember that I am not responsible
* for anything that might go wrong through the use of this
* program. I have tested the program enough for my own use.
* I also realize that bugs can appear in most every program.
* Therefore, YOU USE THIS PROGRAM AT YOUR OWN RISK.
*
* To-do:
* > See if the blank in split-line hyphenated words can be eliminated.
*
* Enjoy,
* Jim Robeson
* The Cricket BBS, Pacific Grove CA, 408-373-3773
*/
#include "stdio.h" /* Standard I/O definitions */
#include "string.h"
#define TRUE 1
#define FALSE 0
/* test to see if 'ch' is an acceptable DOS filename character */
#define vld_dos(ch) ( (( (ch) >= 'A' && (ch) <= 'Z' ) || \
( (ch) >= '0' && (ch) <= '9' ) || \
(ch) == '!' || \
(ch) == '$' || \
(ch) == '#' || \
(ch) == '@' || \
(ch) == '_' || \
(ch) == '-' || \
(ch) == '{' || \
(ch) == '}' || \
(ch) == '~' || \
(ch) == '%' || \
(ch) == '^' || \
(ch) == '(' || \
(ch) == ')') \
? 1 \
: 0 )
/* test to see if 'ch' is numeric..... <compare to isdigit(c)> */
#define is_digit(ch) ( ( (ch) < '0' || (ch) > '9' ) \
? 0 \
: ch )
void write_desc ( ); /* prototype */
void save_desc ( ); /* prototype */
void showhelp ( ); /* prototype */
FILE *infile; /* the IN file */
FILE *outfile; /* the OUT file */
char inbuf[BUFSIZ]; /* line buffer for reading from file */
/* BUFSIZ = 512 in stdio.h */
char outbuf[3300]; /* Description Lines save area */
/* Lets start by assuming 40 max lines coming in. */
/* Therefore, we need on the output side: */
/* a maximum of 80*40 = 3200. */
/* Make it 3300 for safety's sake! */
/* Watch this over run itself now! */
int in_a_desc; /* working on a description indicator */
int ipt,opt,linept; /* index pointers */
int pos_mark; /* line position of the '|' character */
int pos_text; /* starting position of output text */
/* ========================================= */
/* === MAIN === */
/* ========================================= */
main(int argc, char *argv[]) /* main reads command args */
{
char *progname;
char *filein;
char *fileout;
char *adr_mark;
char *adr_text;
/* Display a little how-to "help" if arguments are null or improper */
if (argc != 5) /* should be 4 args + prognam */
{ if (argc != 1)
printf("\nERROR: needs 4 arguments\n");
showhelp();
exit (1); } /* exit with errorlevel=1 */
progname = argv[0];
filein = argv[1];
fileout = argv[2];
adr_mark = argv[3]; /* get arg-3: the position of the output '|' */
sscanf(&adr_mark[0],"%2d",&pos_mark);
adr_text = argv[4]; /* get arg-4: the 1st position of output text */
sscanf(&adr_text[0],"%2d",&pos_text);
if (pos_text >= 35) /* 1st text position must be 34 or less */
{ printf("\nERROR: text position must be less than 35. (arg-4)\n");
showhelp();
exit (1); } /* exit with errorlevel=1 */
if (pos_mark >= pos_text) /* the '|' must be on the left of the text */
{ printf("\nERROR: '|' position must be less than text position. (arg-3 or arg-4)\n");
showhelp();
exit (1); } /* exit with errorlevel=1 */
if (pos_mark <= 1) /* the '|' must be 2 or higher */
{ printf("\nERROR: '|' position is 1 or less. (arg-3)\n");
showhelp();
exit (1); } /* exit with errorlevel=1 */
printf("\nCOPYDESC IS RUNNING:\n");
printf(" input = %s, output = %s,\n",filein,fileout);
printf(" mark = %2d, text = %2d.\n",pos_mark,pos_text);
infile = fopen(filein,"r"); /* open the input file */
if (infile == NULL)
{
fprintf(stderr,"\n\007%s can't open the INPUT file: %s.\n",progname,filein);
exit (1);
}
outfile = fopen(fileout,"w"); /* open the output file */
if (outfile == NULL)
{
fprintf(stderr,"\n\007%s can't open the OUTPUT file: %s.\n",progname,fileout);
exit (1);
}
in_a_desc = FALSE; /* say we're not inside a description yet */
/* ======================== copy the file ========================= */
while ( fgets(inbuf,BUFSIZ,infile) != NULL ) /* TOP-OF-LOOP */
{
/* test for line 1 of a file description: */
if (vld_dos(inbuf[0]) && /* pos 1 valid DOS chars & */
is_digit(inbuf[20]) && /* pos 21 is numeric */
inbuf[25] == '-' && /* pos 26 = '-' */
inbuf[28] == '-') /* pos 29 = '-' */
{ /* ==== FILE DESCRIPTION LINE # 1 FOUND ======== */
/* if we're already in a description, write the old one */
if (in_a_desc) write_desc();
in_a_desc = TRUE; /* say we are 'inside' */
/* save the 1st line */
ipt = 0;
opt = 0;
while (inbuf[ipt] != '\0')
{ outbuf[opt] = inbuf[ipt];
ipt++;
opt++;
}
/* ++++ add a blank to the end for wrap problem */
opt--;
while (outbuf[opt] == ' ' || outbuf[opt] == '\n')
opt--;
opt++;
outbuf[opt] = ' ';
opt++;
outbuf[opt] = '\n';
opt++;
/* ++++ */
outbuf[opt] = '\0';
linept = opt; /* card pointer (1-80), pointing */
opt--; /* at the '\n' right now. */
} /* ====== end FILE #1 LINE HERE =============== */
else
{ /* =========== OTHER LINES HERE ================ */
/* if we're already in a description, continue saving data */
if (in_a_desc) save_desc();
else /* if not, write junk straight out */
fprintf(outfile,"%s",inbuf);
} /* ====== end OTHER LINES HERE ================ */
} /* end of while at TOP-OF-LOOP */
/* === Since we dropped through, ============== */
/* === implies end of file found. ============== */
if (in_a_desc) write_desc(); /* if we're in a description, write it */
fclose(infile);
fclose(outfile);
printf("COPYDESC IS FINISHED.\n");
exit (0); /* job done, get out, errorvalue = 0 */
} /* ------------- end of main ------------------------------- */
/* ========================================= */
/* === SHOWHELP === */
/* ========================================= */
void showhelp ()
{
printf("\nCOPYDESC v1.02:\n");
printf(" Copy PCBoard DIR files (descriptions) converting them to long-liners.\n");
printf(" by Jim Robeson, 11-15-92\n\n");
printf("USAGE:\n");
printf(" COPYDESC drv:\path\in-file-name drv:\path\out-file-name |pos txtpos \n");
printf(" where 1 < |pos < txtpos <= 34 \n\n");
return;
} /* ------------- end of showhelp --------------------------- */
/* ========================================= */
/* === WRITE_DESC === */
/* ========================================= */
void write_desc ()
{
fprintf(outfile,"%s",outbuf);
in_a_desc = FALSE;
return;
} /* ------------- end of write_desc ------------------------- */
/* ========================================= */
/* === SAVE_DESC === */
/* ========================================= */
/* this is to save all but the first card into the output buffer */
/* the first card is saved in MAIN */
/* ipt goes 0-n thru input line, not flexible */
/* opt goes 0-x thru output line, set/resets */
/* according to needs */
/* linept is RELEATIVE to each OUTPUT LINE, */
/* ranging from 1-78 (PCBoard max); */
/* it gets reset as we fill lines. */
/* When coming from line 1, linept points */
/* at the '\n' while opt = '\0' */
void save_desc ()
{
int skipping;
int tmpipt;
int i;
skipping = TRUE;
ipt = 0;
while (inbuf[ipt] != '\0')
{
if (inbuf[ipt] == '\n')
{ ipt++; /* skip over any '\n' */
continue; }
if (inbuf[ipt] == '|')
{ ipt++; /* skip over any '|' */
continue; }
if (inbuf[ipt] == ' ' && skipping)
{ ipt++; /* skip over leading blanks */
continue; }
skipping = FALSE;
tmpipt = ipt; /* see if there is room for a word */
for (i=0; !(inbuf[tmpipt]==' ' || inbuf[tmpipt]=='\n' || inbuf[tmpipt]=='\0' ); tmpipt++) i++;
if (i+linept > 79)
{ /* do newline wrap first */
if (outbuf[opt] != '\n') outbuf[opt] = '\n';
opt++;
/* run out the '|' character & leading blanks */
for (linept=1; linept<pos_mark; linept++)
{ outbuf[opt] = ' ';
opt++;
}
outbuf[opt] = '|';
opt++;
linept++;
for (; linept<pos_text; linept++)
{ outbuf[opt] = ' ';
opt++;
}
}
/* now stuff the word */
for (; i >= 1; i--) /* ++++ was >=0 */
{ outbuf[opt] = inbuf[ipt];
ipt++;
opt++;
linept++;
}
/* now pop a blank IFF not '\n' nor '\0' */
if (inbuf[ipt]=='\n') continue;
if (inbuf[ipt]=='\0') continue;
for (; inbuf[ipt]==' '; ipt++);
outbuf[opt] = ' ';
opt++;
linept++;
}
outbuf[opt] = ' ';
opt++;
linept++;
outbuf[opt] = '\n';
opt++;
outbuf[opt] = '\0';
opt--;
return;
} /* ------------- end of save_desc -------------------------- */
/*------------- End of COPYDESC.C ------------------------------------*/
