struct spelling *
spelling_init(char *lang)
{
AspellConfig *config;
AspellCanHaveError *ret;
struct spelling *spelling = malloc(sizeof(struct spelling));
if (spelling == NULL) {
warn("malloc(spelling)");
return NULL;
}
config = new_aspell_config();
aspell_config_replace(config, "lang", spelling_lookup_lang(lang));
aspell_config_replace(config, "dict-dir", bfile("data/dict/"));
aspell_config_replace(config, "encoding", "iso-8859-1");
ret = new_aspell_speller(config);
delete_aspell_config(config);
spelling->speller = to_aspell_speller(ret);
if (aspell_error(ret) != 0) {
printf("Error: %s\n", aspell_speller_error_message(spelling->speller));
delete_aspell_can_have_error(ret);
return NULL;
}
spelling->conv = iconv_open("iso-8859-1", "utf-8");
spelling->conv_out = iconv_open("utf-8", "iso-8859-1");
return spelling;
}
void permute(char* a, int l, int r)
{
int i;
if (l == r) {
int correct = aspell_speller_check(spell_checker, a, -1);
if (correct) {
printf("%s\n", a);
}
else if (!correct) {
}
else {
fprintf(stderr, "Error: %s\n",
aspell_speller_error_message(spell_checker));
}
}
else {
for (i = l; i <= r; i++) {
swap((a + l), (a + i));
permute(a, l + 1, r);
swap((a + l), (a + i)); //backtrack
}
}
}
/* method:saveallwords ********************************************************/
static PyObject* m_saveallwords(PyObject* self, PyObject* args) {
aspell_speller_save_all_word_lists(Speller(self));
if (aspell_speller_error(Speller(self)) != 0) {
PyErr_SetString(_AspellSpellerException, aspell_speller_error_message(Speller(self)));
return NULL;
}
return_None;
}
/* method:clearsession ********************************************************/
static PyObject* m_clearsession(PyObject* self, PyObject* args) {
aspell_speller_clear_session(Speller(self));
if (aspell_speller_error(Speller(self)) != 0) {
PyErr_SetString(_AspellSpellerException, aspell_speller_error_message(Speller(self)));
return NULL;
}
return_None;
}
void Speller::Aspell::Suggest::checkError() throw( std::runtime_error )
{
if( aspell_speller_error_number( fspeller ) != 0 )
{
std::string err_msg =
std::string( "(Aspell::Speller::Suggest::checkError): "
"aspell speller error " ) +
aspell_speller_error_message( fspeller );
throw std::runtime_error( err_msg );
}
}
/**
* Check a given word for correctness.
* @param word the word to check
* @return true if the word is correct, otherwise false.
*/
static VALUE aspell_check(VALUE self, VALUE word) {
AspellSpeller *speller = get_speller(self);
VALUE result = Qfalse;
int code = aspell_speller_check(speller, STR2CSTR(word), -1);
if (code == 1)
result = Qtrue;
else if (code == 0)
result = Qfalse;
else
rb_raise( cAspellError, "%s", aspell_speller_error_message(speller));
return result;
}
/* method:addReplacement ******************************************************/
static PyObject* m_addReplacement(PyObject* self, PyObject* args) {
char *mis; int ml;
char *cor; int cl;
if (!PyArg_ParseTuple(args, "s#s#", &mis, &ml, &cor, &cl)) {
PyErr_SetString(PyExc_TypeError, "two strings are required (misspelled, correct word)");
return NULL;
}
aspell_speller_store_replacement(Speller(self), mis, ml, cor, cl);
if (aspell_speller_error(Speller(self)) != 0) {
PyErr_SetString(_AspellSpellerException, aspell_speller_error_message(Speller(self)));
return NULL;
}
return_None;
}
static void print_word_list(AspellSpeller * speller,
const AspellWordList *wl,
char delem)
{
if (wl == 0) {
printf("Error: %s\n", aspell_speller_error_message(speller));
} else {
AspellStringEnumeration * els = aspell_word_list_elements(wl);
const char * word;
while ( (word = aspell_string_enumeration_next(els)) != 0) {
fputs(word, stdout);
putc(delem, stdout);
}
}
}
/* method:addtoSession ********************************************************/
static PyObject* m_addtoSession(PyObject* self, PyObject* args) {
char *word;
int length;
if (!PyArg_ParseTuple(args, "s#", &word, &length)) {
PyErr_SetString(PyExc_TypeError, "Invalid argument");
return NULL;
}
aspell_speller_add_to_session(Speller(self), word, length);
if (aspell_speller_error(Speller(self)) != 0) {
PyErr_SetString(_AspellSpellerException, aspell_speller_error_message(Speller(self)));
return NULL;
}
return_None;
}
/* method:addtoPersonal *******************************************************/
static PyObject* m_addtoPersonal(PyObject* self, PyObject* args) {
char *word;
int length;
if (!PyArg_ParseTuple(args, "s#", &word, &length)) {
PyErr_SetString(PyExc_TypeError, "a string is required");
return NULL;
}
aspell_speller_add_to_personal(Speller(self), word, length);
if (aspell_speller_error(Speller(self)) != 0) {
PyErr_SetString(_AspellSpellerException, aspell_speller_error_message(Speller(self)));
return NULL;
}
return_None;
}
/* method:check ***************************************************************/
static PyObject* m_check(PyObject* self, PyObject* args) {
char* word;
int length;
if (!PyArg_ParseTuple(args, "s#", &word, &length)) {
PyErr_SetString(PyExc_TypeError, "a string is required");
return NULL;
}
if (!length)
return Py_BuildValue("i", 1);
switch (aspell_speller_check(Speller(self), word, length)) {
case 0:
return Py_BuildValue("i", 0);
case 1:
return Py_BuildValue("i", 1);
default:
PyErr_SetString(_AspellSpellerException, aspell_speller_error_message(Speller(self)));
return NULL;
}
}
/**
* Check for an error - raise exception if so.
* @param speller the spellchecker-object.
* @return void
* @exception Exception if there was an error.
*/
static void check_for_error(AspellSpeller * speller) {
if (aspell_speller_error(speller) != 0) {
rb_raise(cAspellError, "%s", aspell_speller_error_message(speller));
}
}
int main(int argc, const char *argv[])
{
AspellCanHaveError * ret;
AspellSpeller * speller;
int have;
char word[81];
char * p;
char * word_end;
AspellConfig * config;
if (argc < 2) {
printf("Usage: %s <language> [<size>|- [[<jargon>|- [<encoding>]]]\n", argv[0]);
return 1;
}
config = new_aspell_config();
aspell_config_replace(config, "lang", argv[1]);
if (argc >= 3 && argv[2][0] != '-' && argv[2][1] != '\0')
aspell_config_replace(config, "size", argv[2]);
if (argc >= 4 && argv[3][0] != '-')
aspell_config_replace(config, "jargon", argv[3]);
if (argc >= 5 && argv[4][0] != '-')
aspell_config_replace(config, "encoding", argv[4]);
ret = new_aspell_speller(config);
delete_aspell_config(config);
if (aspell_error(ret) != 0) {
printf("Error: %s\n",aspell_error_message(ret));
delete_aspell_can_have_error(ret);
return 2;
}
speller = to_aspell_speller(ret);
config = aspell_speller_config(speller);
fputs("Using: ", stdout);
fputs(aspell_config_retrieve(config, "lang"), stdout);
fputs("-", stdout);
fputs(aspell_config_retrieve(config, "jargon"), stdout);
fputs("-", stdout);
fputs(aspell_config_retrieve(config, "size"), stdout);
fputs("-", stdout);
fputs(aspell_config_retrieve(config, "module"), stdout);
fputs("\n\n", stdout);
puts("Type \"h\" for help.\n");
while (fgets(word, 80, stdin) != 0) {
/* remove trailing spaces */
word_end = strchr(word, '\0') - 1;
while (word_end != word && (*word_end == '\n' || *word_end == ' '))
--word_end;
++word_end;
*word_end = '\0';
putchar('\n');
switch (word[0]) {
case '\0':
break;
case 'h':
puts(
"Usage: \n"
" h(elp) help\n"
" c <word> check if a word is the correct spelling\n"
" s <word> print out a list of suggestions for a word\n"
" a <word> add a word to the personal word list\n"
" i <word> ignore a word for the rest of the session\n"
" d <file> spell checks a document\n"
" p dumps the personal word list\n"
" P dumps the session word list\n"
" m dumps the main word list\n"
" o <option> <value> sets a config option\n"
" r <option> retrieves a config option\n"
" l <option> retrieves a config option as a list\n"
" S saves all word lists\n"
" C clear the curent sesstion word list\n"
" x quite\n" );
break;
case 'p':
print_word_list(speller,
aspell_speller_personal_word_list(speller), '\n');
break;
case 'P':
print_word_list(speller,
aspell_speller_session_word_list(speller), '\n');
break;
case 'm':
print_word_list(speller,
aspell_speller_main_word_list(speller), '\n');
break;
case 'S':
aspell_speller_save_all_word_lists(speller);
check_for_error(speller);
break;
case 'C':
aspell_speller_clear_session(speller);
check_for_error(speller);
break;
case 'x':
goto END;
case 'c':
if (strlen(word) < 3) {
printf("Usage: %c <word>\n", word[0]);
} else {
have = aspell_speller_check(speller, word + 2, -1);
if (have == 1)
puts("correct");
else if (have == 0)
puts("incorrect");
else
printf("Error: %s\n", aspell_speller_error_message(speller));
}
break;
case 's':
if (strlen(word) < 3) {
printf("Usage: %c <word>\n", word[0]);
} else {
print_word_list(speller,
aspell_speller_suggest(speller, word + 2, -1), '\n');
}
break;
case 'a':
if (strlen(word) < 3) {
printf("Usage: %c <word>\n", word[0]);
} else {
aspell_speller_add_to_personal(speller, word + 2, -1);
check_for_error(speller);
}
break;
case 'i':
if (strlen(word) < 3) {
printf("Usage: %c <word>\n", word[0]);
} else {
aspell_speller_add_to_session(speller, word + 2, -1);
check_for_error(speller);
}
break;
case 'o':
word[80] = '\0'; /* to make sure strchr doesn't run off end of string */
p = strchr(word + 3, ' ');
if (strlen(word) < 3 || p == 0) {
printf("Usage: %c <option> <value>\n", word[0]);
} else {
*p = '\0';
++p;
aspell_config_replace(config, word + 2, p);
check_for_config_error(config);
}
break;
case 'r':
if (strlen(word) < 3) {
printf("Usage: %c <option>\n", word[0]);
} else {
const char * val = aspell_config_retrieve(config, word + 2);
check_for_config_error(config);
if (val)
printf("%s = \"%s\"\n", word + 2, val);
}
break;
case 'l':
if (strlen(word) < 3) {
printf("Usage: %c <option>\n", word[0]);
} else {
AspellStringList * lst = new_aspell_string_list();
AspellMutableContainer * lst0
= aspell_string_list_to_mutable_container(lst);
AspellStringEnumeration * els;
const char * val;
aspell_config_retrieve_list(config, word + 2, lst0);
check_for_config_error(config);
els = aspell_string_list_elements(lst);
printf("%s:\n", word + 2);
while ( (val = aspell_string_enumeration_next(els)) != 0)
printf(" %s\n", val);
delete_aspell_string_enumeration(els);
delete_aspell_string_list(lst);
}
break;
case 'd':
if (strlen(word) < 3) {
printf("Usage: %c <file>\n", word[0]);
} else {
check_document(speller, word + 2);
printf("\n");
}
break;
default:
printf("Unknown Command: %s\n", word);
}
putchar('\n');
}
END:
delete_aspell_speller(speller);
return 0;
}