/*-----------------------------------------------------------------------*
 * ebc.c
 * 2001/06/20
 *-----------------------------------------------------------------------*/
#include <stdio.h>
#include <string.h>
#define BUFSIZE 4096

static void e2pc(unsigned char* destbuf, unsigned char* srcbuf,
		 int startColumn, int endColumn){
  int n;
  unsigned char* q, * p;

  static unsigned char t[] = {
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 90 */ 0xd7, 0,
    0xdd, 0, 0, 0, /* 96 */
    0xb1, 0xb2, 0xb3, 0xb4, 0xb5, 0xb6, 0xb7, 0xb8, 0xb9,
    0xc0 /* 106=タ */,
    0xc1, 0xc2, 0xc3, 0xc4, 0xc5, 0xc6, 0xc7, 0xc8 /* 114=ネ */,
    0xcd /* 115=ヘ */,
    0xce, 0xcf, 0xd0, 0xd1, 0xd2, 0xd3, 0xd4 /* 122=ヤ */,
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0xa9 /* 139=ゥ */,
    0xbf /* 140=ソ */,
    0xda /* 141=レ */,
    0, 0, 0xa5 /* 144=中ドット */,
    0, 0, 0xca /* 147=ハ */,
    0, 0, 0xba /* 150=コ */,
    0xc9 /* 151=ノ */, 0, 0xaf /* 153=ッ */, 0, 0,
    0xac /* 156=ャ */, 0, 0, 0, 0,
    0, 0, 0, 0, 0xae /* 165=ョ */, 0, 0, 0xb0 /* 168=ー */,
    0xaa /* 169=ェ */, 0xab /* 170=ォ */,
    0xa8 /* 171=ィ */, 0, 0, 0xbd /* 174=ス */, 0xbc, 0, 0, 0, 0, 0,
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
    0xdc /* 191=ワ */, 0, 0, 0, 0, 0xdf /* 196=゜*/,
    0xbe /* 197=セ */, 0, 0, 0,
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0xde, /* 216=゛ */
    0xdb /* 217=ロ */, 0xd6 /* 218=ヨ */, 0xad /* 219=ュ */, 0,
    0, 0, 0, 0, 0, 0xa7/* 226=ァ */, 0, 0, 0, 0,
    0, 0, 0, 0, 0, 0, 0, 0, 0xd5 /* 239=ユ */, 0,
    0xcb /* ヒ */, 0xd8 /* リ */, 0xbb /* サ */, 0, 0,
    0, 0, 0, 0xd9 /* ル */, 0,
    0, 0, 0, 0xcc /* フ */, 0
  };

  /* nは1から */
  for(q=destbuf, p=srcbuf, n=1; * p && n<startColumn; *q++=*p++, n++) ;
  if(! * p){ *q='\0'; return; }
  for(; * p && n<=endColumn; p++, n++){
    *q++ = t[*p] ? t[*p] : *p;
  }
  for(; * p; *q++=*p++, n++) ;
  *q = '\0';
}

int main(int argc, char* argv[]){
  int startColumn = 0;
  int endColumn = 9999;

  int i;

  FILE* fin = stdin;
  FILE* fout = stdout;
  char* infile = NULL;
  char* outfile = NULL;

  unsigned char srcbuf[BUFSIZE], destbuf[BUFSIZE];

  /* usage: ebc ?infile? ?outfile? */
  for(i=1; i<argc; i++){
    if(! strncmp(argv[i], "-f", 2) && i<argc-1){
      sscanf(argv[++i], "%d", & startColumn);
    }
    else if(! strncmp(argv[i], "-t", 2) && i<argc-1){
      sscanf(argv[++i], "%d", & endColumn);
    }
    else if(! infile)  infile = argv[i];
    else if(! outfile) outfile = argv[i];
  }
  fprintf(stdout, "from %d to %d.\n", startColumn, endColumn);
  if(infile){
    if((fin = fopen(infile, "r")) == NULL){
      fprintf(stderr, "cannot open %s.\n", infile);
      return 1;
    }
  }
  if(outfile){
    if((fout = fopen(outfile, "w")) == NULL){
      fprintf(stderr, "cannot create %s.\n", outfile);
      fclose(fin);
      return 1;
    }
  }

  while(fgets(srcbuf, BUFSIZE, fin)){
    srcbuf[strlen(srcbuf)-1] = '\0';
    e2pc(destbuf, srcbuf, startColumn, endColumn);
    fprintf(fout, "%s\n", destbuf);
  }

  if(infile)
    fclose(fin);
  if(outfile)
    fclose(fout);
  return 0;
}
/* end. */