Order::Order(string filename)
{
std::ifstream orderFile;
orderFile.open(filename.c_str());
if(orderFile.fail())
{
std::cerr << "Could no open file " << filename << " for reading.\n";
exit(1);
}
orderFile.seekg(0, orderFile.end);
int length = orderFile.tellg();
orderFile.seekg(0, orderFile.beg);
char *buffer = new char[length];
orderFile.read(buffer, length);
orderFile.close();
std::vector<int> wideString;
utf8::utf8to32(buffer, buffer + length, back_inserter(wideString));
int index = 0;
for(int i = 0; i < wideString.size(); i++)
{
int character = wideString[i];
if(character != 10)
{
std::string utf8Character;
utf8::utf32to8(wideString.begin() + i, wideString.begin() + i + 1, back_inserter(utf8Character));
Kanji kanji(character, utf8Character);
intToChar_[index] = character;
if(charToInt_.find(character) != charToInt_.end())
std::cout << "Duplicate character: " << kanji.utf8Character()
<< ", utf32: " << std::hex << character << std::dec << std::endl;
charToInt_[character] = index;
charToKanji_[character] = kanji;
index++;
}
}
}
void
main(void)
{
int c, n;
char str[100], *args[10];
int jfont, curfont;
if(initdraw(0, fontfile, 0) < 0){
fprint(2, "mnihongo: can't initialize display: %r\n");
exits("open");
}
Binit(&bin, 0, OREAD);
Binit(&bout, 1, OWRITE);
jfont = -1;
curfont = 1;
while ((c = Bgetc(&bin)) >= 0) {
switch (c) {
case '\n': /* when input is text */
case ' ':
case '\0': /* occasional noise creeps in */
putchar(c);
break;
case '0': case '1': case '2': case '3': case '4':
case '5': case '6': case '7': case '8': case '9':
/* two motion digits plus a character */
putchar(c); /* digit 1 */
n = (c-'0')*10;
c = Bgetc(&bin);
putchar(c); /* digit 2 */
n += c - '0';
hmot(n);
putchar(Bgetc(&bin)); /* char itself */
break;
case 'c': /* single character */
c = Bgetrune(&bin);
if(c==' ') /* why does this happen? it's troff - bwk */
break;
else if(jfont == curfont){
Bungetrune(&bin);
Bgetstr(&bin, str);
kanji(str);
}else{
putchar('c');
putchar(c);
}
break;
case 'C':
Bgetstr(&bin, str);
Bprint(&bout, "C%s", str);
break;
case 'f':
Bgetstr(&bin, str);
curfont = atoi(str);
if(curfont < 0 || curfont > 20)
curfont = 1; /* sanity */
Bprint(&bout, "%c%s", c, str);
break;
case 'N': /* absolute character number */
case 's':
case 'p': /* new page */
Bgetint(&bin, &n);
Bprint(&bout, "%c%d", c, n);
break;
case 'H': /* absolute horizontal motion */
Bgetint(&bin, &n);
Bprint(&bout, "%c%d", c, n);
hgoto(n);
break;
case 'h': /* relative horizontal motion */
Bgetint(&bin, &n);
Bprint(&bout, "%c%d", c, n);
hmot(n);
break;
case 'V':
Bgetint(&bin, &n);
Bprint(&bout, "%c%d", c, n);
vgoto(n);
break;
case 'v':
Bgetint(&bin, &n);
Bprint(&bout, "%c%d", c, n);
vmot(n);
break;
case 'w': /* word space */
putchar(c);
break;
case 'x': /* device control */
Bgetline(&bin, str);
Bprint(&bout, "%c%s", c, str);
if(tokenize(str, args, 10)>2 && args[0][0]=='f' && ('0'<=args[1][0] && args[1][0]<='9')){
if(strncmp(args[2], "Jp", 2) == 0)
jfont = atoi(args[1]);
else if(atoi(args[1]) == jfont)
jfont = -1;
}
break;
case 'D': /* draw function */
case 'n': /* end of line */
case '#': /* comment */
Bgetline(&bin, str);
Bprint(&bout, "%c%s", c, str);
break;
default:
fprint(2, "mnihongo: unknown input character %o %c\n", c, c);
exits("error");
}
}
}
