blob: 8b6ac00723b7ee3ee39852d7464da33845138acb [file] [log] [blame]
/* liblouis Braille Translation and Back-Translation Library
Based on the Linux screenreader BRLTTY, copyright (C) 1999-2006 by
The BRLTTY Team
Copyright (C) 2004, 2005, 2006, 2009
ViewPlus Technologies, Inc. www.viewplus.com and
JJB Software, Inc. www.jjb-software.com
This program is free software: you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation, either version 3 of the License, or
(at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program. If not, see <http://www.gnu.org/licenses/>.
*/
#include <config.h>
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include "liblouis.h"
#include "internal.h"
#include <getopt.h>
#include "progname.h"
#include "unistr.h"
#include "version-etc.h"
static const struct option longopts[] = {
{ "help", no_argument, NULL, 'h' }, { "version", no_argument, NULL, 'v' },
{ NULL, 0, NULL, 0 },
};
const char version_etc_copyright[] =
"Copyright %s %d ViewPlus Technologies, Inc. and JJB Software, Inc.";
#define AUTHORS "John J. Boyer"
static void
print_help(void) {
printf("\
Usage: %s [OPTIONS]\n",
program_name);
fputs("\
This program tests every capability of the liblouis library. It is\n\
completely interactive. \n\n",
stdout);
fputs("\
-h, --help display this help and exit\n\
-v, --version display version information and exit\n",
stdout);
printf("\n");
printf("Report bugs to %s.\n", PACKAGE_BUGREPORT);
#ifdef PACKAGE_PACKAGER_BUG_REPORTS
printf("Report %s bugs to: %s\n", PACKAGE_PACKAGER, PACKAGE_PACKAGER_BUG_REPORTS);
#endif
#ifdef PACKAGE_URL
printf("%s home page: <%s>\n", PACKAGE_NAME, PACKAGE_URL);
#endif
}
#define BUFSIZE 256
static char inputBuffer[BUFSIZE];
static void *validTable = NULL;
static int forwardOnly = 0;
static int backOnly = 0;
static int showPositions = 0;
static int minimalist = 0;
static int outputSize = BUFSIZE;
static int showSizes = 0;
static int enteredCursorPos = -1;
static unsigned int mode;
static char table[BUFSIZE];
static formtype emphasis[BUFSIZE];
static char spacing[BUFSIZE];
static char enteredEmphasis[BUFSIZE];
static char enteredSpacing[BUFSIZE];
static int
getInput(void) {
int inputLength;
inputBuffer[0] = 0;
if (!fgets(inputBuffer, sizeof(inputBuffer), stdin)) exit(EXIT_FAILURE);
inputLength = strlen(inputBuffer) - 1;
if (inputLength < 0) /* EOF on script */
{
lou_free();
exit(EXIT_SUCCESS);
}
inputBuffer[inputLength] = 0;
return inputLength;
}
static int
getYN(void) {
printf("? y/n: ");
getInput();
if (inputBuffer[0] == 'y') return 1;
return 0;
}
static void
paramLetters(void) {
printf("Press one of the letters in parentheses, then enter.\n");
printf("(t)able, (r)un, (m)ode, (c)ursor, (e)mphasis, (s)pacing, (h)elp,\n");
printf("(q)uit, (f)orward-only, (b)ack-only, show-(p)ositions m(i)nimal.\n");
printf("test-(l)engths.\n");
}
static int
getCommands(void) {
paramLetters();
do {
printf("Command: ");
getInput();
switch (inputBuffer[0]) {
case 0:
break;
case 't':
do {
printf("Enter the name of a table: ");
getInput();
strcpy(table, inputBuffer);
} while ((validTable = lou_getTable(table)) == NULL);
break;
case 'r':
if (validTable == NULL) {
printf("You must enter a valid table name.\n");
inputBuffer[0] = 0;
}
break;
case 'm':
printf("Reset mode");
if (getYN()) mode = 0;
printf("No contractions");
mode |= getYN();
printf("Computer braille at cursor");
mode |= 2 * getYN();
printf("Dots input and output");
mode |= 4 * getYN();
printf("8-dot computer braille");
mode |= 8 * getYN();
printf("Pass1 only");
mode |= 16 * getYN();
break;
case 'l':
printf("Do you want to test input and output lengths");
showSizes = getYN();
if (!showSizes) {
outputSize = BUFSIZE;
break;
}
printf("Enter a maximum output size: ");
getInput();
outputSize = atoi(inputBuffer);
if (outputSize < 0 || outputSize > BUFSIZE) {
printf("Output size must be from 0 tu %d.\n", BUFSIZE);
outputSize = BUFSIZE;
showSizes = 0;
}
break;
case 'c':
printf("Enter a cursor position: ");
getInput();
enteredCursorPos = atoi(inputBuffer);
if (enteredCursorPos < -1 || enteredCursorPos > outputSize) {
printf("Cursor position must be from -1 to %d.\n", outputSize);
enteredCursorPos = -1;
}
break;
case 'e':
printf("(Enter an x to cancel emphasis.)\n");
printf("Enter an emphasis string: ");
getInput();
strcpy(enteredEmphasis, inputBuffer);
break;
case 's':
printf("(Enter an x to cancel spacing.)\n");
printf("Enter a spacing string: ");
getInput();
strcpy(enteredSpacing, inputBuffer);
break;
case 'h':
printf("Commands: action\n");
printf("(t)able: Enter a table name\n");
printf("(r)un: run the translation/back-translation loop\n");
printf("(m)ode: Enter a mode parameter\n");
printf("(c)ursor: Enter a cursor position\n");
printf("(e)mphasis: Enter an emphasis string\n");
printf("(s)pacing: Enter a spacing string\n");
printf("(h)elp: print this page\n");
printf("(q)uit: leave the program\n");
printf("(f)orward-only: do only forward translation\n");
printf("(b)ack-only: do only back-translation\n");
printf("show-(p)ositions: show input and output positions\n");
printf("m(i)nimal: test translator and back-translator with minimal "
"parameters\n");
printf("test-(l)engths: test accuracy of returned lengths\n");
printf("\n");
paramLetters();
break;
case 'q':
lou_free();
exit(EXIT_SUCCESS);
case 'f':
printf("Do only forward translation");
forwardOnly = getYN();
break;
case 'b':
printf("Do only backward translation");
backOnly = getYN();
break;
case 'p':
printf("Show input and output positions");
showPositions = getYN();
break;
case 'i':
printf("Test translation/back-translation loop with minimal parameters");
minimalist = getYN();
break;
default:
printf("Bad choice.\n");
break;
}
if (forwardOnly && backOnly)
printf("You cannot specify both forward-only and backward-only "
"translation.\n");
} while (inputBuffer[0] != 'r');
return 1;
}
int
main(int argc, char **argv) {
char *charbuf;
size_t charlen;
widechar inbuf[BUFSIZE];
widechar transbuf[BUFSIZE];
widechar outbuf[BUFSIZE];
int outputPos[BUFSIZE];
int inputPos[BUFSIZE];
int inlen;
int translen;
int outlen;
int cursorPos = -1;
int realInlen = 0;
int k;
int optc;
set_program_name(argv[0]);
while ((optc = getopt_long(argc, argv, "hv", longopts, NULL)) != -1) {
switch (optc) {
/* --help and --version exit immediately, per GNU coding standards. */
case 'v':
version_etc(
stdout, program_name, PACKAGE_NAME, VERSION, AUTHORS, (char *)NULL);
exit(EXIT_SUCCESS);
break;
case 'h':
print_help();
exit(EXIT_SUCCESS);
break;
default:
fprintf(stderr, "Try `%s --help' for more information.\n", program_name);
exit(EXIT_FAILURE);
break;
}
}
if (optind < argc) {
/* Print error message and exit. */
fprintf(stderr, "%s: extra operand: %s\n", program_name, argv[optind]);
fprintf(stderr, "Try `%s --help' for more information.\n", program_name);
exit(EXIT_FAILURE);
}
validTable = NULL;
enteredCursorPos = -1;
mode = 0;
while (1) {
getCommands();
printf("Type something, press enter, and view the results.\n");
printf("A blank line returns to command entry.\n");
if (minimalist)
while (1) {
translen = outputSize;
outlen = outputSize;
inlen = getInput();
if (inlen == 0) break;
if (!(realInlen = _lou_extParseChars(inputBuffer, inbuf))) break;
inlen = realInlen;
if (!lou_translateString(
table, inbuf, &inlen, transbuf, &translen, NULL, NULL, 0))
break;
transbuf[translen] = 0;
printf("Translation:\n");
#ifdef WIDECHARS_ARE_UCS4
charbuf = u32_to_u8(transbuf, translen, NULL, &charlen);
#else
charbuf = u16_to_u8(transbuf, translen, NULL, &charlen);
#endif
printf("%.*s\n", (int)charlen, charbuf);
free(charbuf);
if (showSizes)
printf("input length = %d; output length = %d\n", inlen, translen);
lou_backTranslateString(
table, transbuf, &translen, outbuf, &outlen, NULL, NULL, 0);
printf("Back-translation:\n");
#ifdef WIDECHARS_ARE_UCS4
charbuf = u32_to_u8(outbuf, outlen, NULL, &charlen);
#else
charbuf = u16_to_u8(outbuf, outlen, NULL, &charlen);
#endif
printf("%.*s\n", (int)charlen, charbuf);
free(charbuf);
if (showSizes)
printf("input length = %d; output length = %d.\n", translen, outlen);
if (outlen == realInlen) {
for (k = 0; k < realInlen; k++)
if (inbuf[k] != outbuf[k]) break;
if (k == realInlen) printf("Perfect roundtrip!\n");
}
}
else
while (1) {
memset(emphasis, 0, sizeof(formtype) * BUFSIZE);
for (k = 0; k < strlen(enteredEmphasis); k++)
emphasis[k] = (formtype)enteredEmphasis[k] - '0';
emphasis[k] = 0;
strcpy(spacing, enteredSpacing);
cursorPos = enteredCursorPos;
inlen = getInput();
if (inlen == 0) break;
outlen = outputSize;
if (backOnly) {
if (!(translen = _lou_extParseChars(inputBuffer, transbuf))) break;
inlen = realInlen;
} else {
translen = outputSize;
if (!(realInlen = _lou_extParseChars(inputBuffer, inbuf))) break;
inlen = realInlen;
if (!lou_translate(table, inbuf, &inlen, transbuf, &translen,
emphasis, spacing, &outputPos[0], &inputPos[0],
&cursorPos, mode))
break;
transbuf[translen] = 0;
if (mode & dotsIO) {
printf("Translation dot patterns:\n");
printf("%s\n", _lou_showDots(transbuf, translen));
} else {
printf("Translation:\n");
#ifdef WIDECHARS_ARE_UCS4
charbuf = u32_to_u8(transbuf, translen, NULL, &charlen);
#else
charbuf = u16_to_u8(transbuf, translen, NULL, &charlen);
#endif
printf("%.*s\n", (int)charlen, charbuf);
free(charbuf);
if (showSizes)
printf("input length = %d; output length = %d\n", inlen,
translen);
}
}
if (cursorPos != -1) printf("Cursor position: %d\n", cursorPos);
if (enteredSpacing[0]) printf("Returned spacing: %s\n", spacing);
if (showPositions) {
printf("Output positions:\n");
for (k = 0; k < inlen; k++) printf("%d ", outputPos[k]);
printf("\n");
printf("Input positions:\n");
for (k = 0; k < translen; k++) printf("%d ", inputPos[k]);
printf("\n");
}
if (!forwardOnly) {
if (!lou_backTranslate(table, transbuf, &translen, outbuf, &outlen,
emphasis, spacing, &outputPos[0], &inputPos[0],
&cursorPos, mode))
break;
printf("Back-translation:\n");
#ifdef WIDECHARS_ARE_UCS4
charbuf = u32_to_u8(outbuf, outlen, NULL, &charlen);
#else
charbuf = u16_to_u8(outbuf, outlen, NULL, &charlen);
#endif
printf("%.*s\n", (int)charlen, charbuf);
free(charbuf);
if (showSizes)
printf("input length = %d; output length = %d\n", translen,
outlen);
if (cursorPos != -1) printf("Cursor position: %d\n", cursorPos);
if (enteredSpacing[0]) printf("Returned spacing: %s\n", spacing);
if (showPositions) {
printf("Output positions:\n");
for (k = 0; k < translen; k++) printf("%d ", outputPos[k]);
printf("\n");
printf("Input positions:\n");
for (k = 0; k < outlen; k++) printf("%d ", inputPos[k]);
printf("\n");
}
}
if (!(forwardOnly || backOnly)) {
if (outlen == realInlen) {
for (k = 0; k < realInlen; k++)
if (inbuf[k] != outbuf[k]) break;
if (k == realInlen) printf("Perfect roundtrip!\n");
}
}
}
}
lou_free();
exit(EXIT_SUCCESS);
}