160 lines
4.2 KiB
C
160 lines
4.2 KiB
C
/***********************************************************
|
|
Copyright (C) 1997 Martin von Löwis
|
|
|
|
Permission to use, copy, modify, and distribute this software and its
|
|
documentation for any purpose and without fee is hereby granted,
|
|
provided that the above copyright notice appear in all copies.
|
|
|
|
This software comes with no warranty. Use at your own risk.
|
|
******************************************************************/
|
|
#include <stdio.h>
|
|
#include <errno.h>
|
|
#include <libintl.h>
|
|
#include <locale.h>
|
|
#include "Python.h"
|
|
|
|
static PyObject*
|
|
PyIntl_gettext(PyObject* self,PyObject *args)
|
|
{
|
|
char *in;
|
|
if (!PyArg_ParseTuple(args,"z",&in))
|
|
return 0;
|
|
|
|
if (*in == '\0')
|
|
return PyString_FromString("");
|
|
return PyString_FromString(gettext(in));
|
|
}
|
|
|
|
static PyObject*
|
|
PyIntl_dgettext(PyObject* self,PyObject *args)
|
|
{
|
|
char *domain,*in;
|
|
if(!PyArg_ParseTuple(args,"zz",&domain,&in))return 0;
|
|
return PyString_FromString(dgettext(domain,in));
|
|
}
|
|
|
|
static PyObject*
|
|
PyIntl_dcgettext(PyObject *self,PyObject *args)
|
|
{
|
|
char *domain,*msgid;
|
|
int category;
|
|
if(!PyArg_ParseTuple(args,"zzi",&domain,&msgid,&category))
|
|
return 0;
|
|
return PyString_FromString(dcgettext(domain,msgid,category));
|
|
}
|
|
|
|
static PyObject*
|
|
PyIntl_textdomain(PyObject* self,PyObject* args)
|
|
{
|
|
char *domain;
|
|
if(!PyArg_ParseTuple(args,"z",&domain))return 0;
|
|
return PyString_FromString(textdomain(domain));
|
|
}
|
|
|
|
static PyObject*
|
|
PyIntl_bindtextdomain(PyObject* self,PyObject*args)
|
|
{
|
|
char *domain,*dirname;
|
|
if(!PyArg_ParseTuple(args,"zz",&domain,&dirname))return 0;
|
|
return PyString_FromString(bindtextdomain(domain,dirname));
|
|
}
|
|
|
|
static PyObject*
|
|
PyIntl_setlocale(PyObject* self,PyObject* args)
|
|
{
|
|
int category;
|
|
char *locale=0;
|
|
if(!PyArg_ParseTuple(args,"i|z",&category,&locale))return 0;
|
|
return Py_BuildValue("z",setlocale(category,locale));
|
|
}
|
|
|
|
static PyObject*
|
|
PyIntl_localeconv(PyObject* self,PyObject* args)
|
|
{
|
|
PyObject* result;
|
|
struct lconv *l;
|
|
if(!PyArg_NoArgs(args))return 0;
|
|
result = PyDict_New();
|
|
if(!result)return 0;
|
|
l=localeconv();
|
|
#define RESULT_STRING(s) \
|
|
PyDict_SetItemString(result,#s,PyString_FromString(l->s))
|
|
#define RESULT_INT(i) \
|
|
PyDict_SetItemString(result,#i,PyInt_FromLong(l->i))
|
|
|
|
#define RESULT_CHAR(c) {\
|
|
char tmp[2]; \
|
|
tmp[0]=l->c;tmp[1]='\0';\
|
|
PyDict_SetItemString(result,#c,PyString_FromString(tmp)); \
|
|
}
|
|
|
|
/* Numeric information */
|
|
RESULT_STRING(decimal_point);
|
|
RESULT_STRING(thousands_sep);
|
|
RESULT_STRING(grouping);
|
|
|
|
/* Monetary information */
|
|
RESULT_STRING(int_curr_symbol);
|
|
RESULT_STRING(currency_symbol);
|
|
RESULT_STRING(mon_decimal_point);
|
|
RESULT_STRING(mon_thousands_sep);
|
|
RESULT_STRING(mon_grouping);
|
|
RESULT_STRING(positive_sign);
|
|
RESULT_STRING(negative_sign);
|
|
RESULT_INT(int_frac_digits);
|
|
RESULT_INT(frac_digits);
|
|
RESULT_INT(p_cs_precedes);
|
|
RESULT_INT(p_sep_by_space);
|
|
RESULT_INT(n_cs_precedes);
|
|
RESULT_INT(n_sep_by_space);
|
|
RESULT_INT(p_sign_posn);
|
|
RESULT_INT(n_sign_posn);
|
|
|
|
return result;
|
|
}
|
|
|
|
|
|
static struct PyMethodDef PyIntl_Methods[] = {
|
|
{"gettext",(PyCFunction)PyIntl_gettext,1},
|
|
{"dgettext",(PyCFunction)PyIntl_dgettext,1},
|
|
{"dcgettext",(PyCFunction)PyIntl_dcgettext,1},
|
|
{"textdomain",(PyCFunction)PyIntl_textdomain,1},
|
|
{"bindtextdomain",(PyCFunction)PyIntl_bindtextdomain,1},
|
|
{"setlocale",(PyCFunction)PyIntl_setlocale,1},
|
|
{"localeconv",(PyCFunction)PyIntl_localeconv,0},
|
|
{NULL, NULL}
|
|
};
|
|
|
|
void
|
|
#ifdef VER15
|
|
initintl15()
|
|
#elif VER20
|
|
initintl20()
|
|
#elif VER21
|
|
initintl21()
|
|
#elif VER22
|
|
initintl22()
|
|
#endif
|
|
{
|
|
PyObject *m,*d;
|
|
#ifdef VER15
|
|
m=Py_InitModule("intl15",PyIntl_Methods);
|
|
#elif VER20
|
|
m=Py_InitModule("intl20",PyIntl_Methods);
|
|
#elif VER21
|
|
m=Py_InitModule("intl21",PyIntl_Methods);
|
|
#elif VER22
|
|
m=Py_InitModule("intl22",PyIntl_Methods);
|
|
#endif
|
|
d = PyModule_GetDict(m);
|
|
PyDict_SetItemString(d,"LC_CTYPE",PyInt_FromLong(LC_CTYPE));
|
|
PyDict_SetItemString(d,"LC_NUMERIC",PyInt_FromLong(LC_NUMERIC));
|
|
PyDict_SetItemString(d,"LC_TIME",PyInt_FromLong(LC_TIME));
|
|
PyDict_SetItemString(d,"LC_COLLATE",PyInt_FromLong(LC_COLLATE));
|
|
PyDict_SetItemString(d,"LC_MONETARY",PyInt_FromLong(LC_MONETARY));
|
|
PyDict_SetItemString(d,"LC_MESSAGES",PyInt_FromLong(LC_MESSAGES));
|
|
PyDict_SetItemString(d,"LC_ALL",PyInt_FromLong(LC_ALL));
|
|
if(PyErr_Occurred())
|
|
Py_FatalError("Can't initialize module intl");
|
|
}
|