diff options
Diffstat (limited to 'Mac/Modules/macspeechmodule.c')
| -rw-r--r-- | Mac/Modules/macspeechmodule.c | 546 |
1 files changed, 0 insertions, 546 deletions
diff --git a/Mac/Modules/macspeechmodule.c b/Mac/Modules/macspeechmodule.c deleted file mode 100644 index a8388e9..0000000 --- a/Mac/Modules/macspeechmodule.c +++ /dev/null @@ -1,546 +0,0 @@ -/*********************************************************** -Copyright 1991-1997 by Stichting Mathematisch Centrum, Amsterdam, -The Netherlands. - - All Rights Reserved - -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 and that -both that copyright notice and this permission notice appear in -supporting documentation, and that the names of Stichting Mathematisch -Centrum or CWI not be used in advertising or publicity pertaining to -distribution of the software without specific, written prior permission. - -STICHTING MATHEMATISCH CENTRUM DISCLAIMS ALL WARRANTIES WITH REGARD TO -THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND -FITNESS, IN NO EVENT SHALL STICHTING MATHEMATISCH CENTRUM BE LIABLE -FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES -WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN -ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT -OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. - -******************************************************************/ - - -#include "Python.h" -#include "macglue.h" - -#include <Gestalt.h> -#include "Speech.h" - -#ifdef __MWERKS__ -#define OLDP2C 1 -#include <TextUtils.h> -#ifndef c2pstr -#define c2pstr C2PStr -#endif -#ifndef p2cstr -#define p2cstr P2CStr -#endif -#else -#include "pascal.h" -#endif /* __MWERKS__ */ - -#include <CodeFragments.h> -int lib_available; - -/* Somehow the Apple Fix2X and X2Fix don't do what I expect */ -#define fixed2double(x) (((double)(x))/32768.0) -#define double2fixed(x) ((Fixed)((x)*32768.0)) - -char *CurrentSpeech; -PyObject *ms_error_object; -int speech_available; - -static -init_available() { - OSErr err; - long result; - - lib_available = ((ProcPtr)SpeakString != (ProcPtr)0); - err = Gestalt(gestaltSpeechAttr, &result); - if ( err == noErr && (result & (1<<gestaltSpeechMgrPresent))) - return 1; - return 0; -} - -static -check_available() { - if ( !speech_available ) { - PyErr_SetString(ms_error_object, "Speech Mgr not available"); - return 0; - } - if ( !lib_available ) { - PyErr_SetString(ms_error_object, "Speech Mgr available, but shared lib missing"); - return 0; - } - return 1; -} - -/* ------------- -** -** Part one - the speech channel object -*/ -typedef struct { - PyObject_HEAD - SpeechChannel chan; - PyObject *curtext; /* If non-NULL current text being spoken */ -} scobject; - -static PyTypeObject sctype; - -#define is_scobject(v) ((v)->ob_type == &sctype) - -static scobject * -newscobject(arg) - VoiceSpec *arg; -{ - scobject *self; - OSErr err; - - self = PyObject_NEW(scobject, &sctype); - if (self == NULL) - return NULL; - if ( (err=NewSpeechChannel(arg, &self->chan)) != 0) { - Py_DECREF(self); - return (scobject *)PyErr_Mac(ms_error_object, err); - } - self->curtext = NULL; - return self; -} - -/* sc methods */ - -static void -sc_dealloc(self) - scobject *self; -{ - DisposeSpeechChannel(self->chan); - PyObject_DEL(self); -} - -static PyObject * -sc_Stop(self, args) - scobject *self; - PyObject *args; -{ - OSErr err; - - if (!PyArg_NoArgs(args)) - return NULL; - if ((err=StopSpeech(self->chan)) != 0) { - PyErr_Mac(ms_error_object, err); - return NULL; - } - if ( self->curtext ) { - Py_DECREF(self->curtext); - self->curtext = NULL; - } - Py_INCREF(Py_None); - return Py_None; -} - -static PyObject * -sc_SpeakText(self, args) - scobject *self; - PyObject *args; -{ - OSErr err; - char *str; - int len; - - if (!PyArg_Parse(args, "s#", &str, &len)) - return NULL; - if ( self->curtext ) { - StopSpeech(self->chan); - Py_DECREF(self->curtext); - self->curtext = NULL; - } - if ((err=SpeakText(self->chan, (Ptr)str, (long)len)) != 0) { - PyErr_Mac(ms_error_object, err); - return 0; - } - (void)PyArg_Parse(args, "O", &self->curtext); /* Or should I check this? */ - Py_INCREF(self->curtext); - Py_INCREF(Py_None); - return Py_None; -} - -static PyObject * -sc_GetRate(self, args) - scobject *self; - PyObject *args; -{ - OSErr err; - Fixed farg; - - if (!PyArg_NoArgs(args)) - return NULL; - if ((err=GetSpeechRate(self->chan, &farg)) != 0) { - PyErr_Mac(ms_error_object, err); - return 0; - } - return PyFloat_FromDouble(fixed2double(farg)); -} - -static PyObject * -sc_GetPitch(self, args) - scobject *self; - PyObject *args; -{ - OSErr err; - Fixed farg; - - if (!PyArg_NoArgs(args)) - return NULL; - if ((err=GetSpeechPitch(self->chan, &farg)) != 0) { - PyErr_Mac(ms_error_object, err); - return 0; - } - return PyFloat_FromDouble(fixed2double(farg)); -} - -static PyObject * -sc_SetRate(self, args) - scobject *self; - PyObject *args; -{ - OSErr err; - double darg; - - if (!PyArg_Parse(args, "d", &darg)) - return NULL; - if ((err=SetSpeechRate(self->chan, double2fixed(darg))) != 0) { - PyErr_Mac(ms_error_object, err); - return 0; - } - Py_INCREF(Py_None); - return Py_None; -} - -static PyObject * -sc_SetPitch(self, args) - scobject *self; - PyObject *args; -{ - OSErr err; - double darg; - - if (!PyArg_Parse(args, "d", &darg)) - return NULL; - if ((err=SetSpeechPitch(self->chan, double2fixed(darg))) != 0) { - PyErr_Mac(ms_error_object, err); - return NULL; - } - Py_INCREF(Py_None); - return Py_None; -} - -static struct PyMethodDef sc_methods[] = { - {"Stop", (PyCFunction)sc_Stop}, - {"SetRate", (PyCFunction)sc_SetRate}, - {"GetRate", (PyCFunction)sc_GetRate}, - {"SetPitch", (PyCFunction)sc_SetPitch}, - {"GetPitch", (PyCFunction)sc_GetPitch}, - {"SpeakText", (PyCFunction)sc_SpeakText}, - {NULL, NULL} /* sentinel */ -}; - -static PyObject * -sc_getattr(self, name) - scobject *self; - char *name; -{ - return Py_FindMethod(sc_methods, (PyObject *)self, name); -} - -static PyTypeObject sctype = { - PyObject_HEAD_INIT(&PyType_Type) - 0, /*ob_size*/ - "macspeech.MacSpeechChannel", /*tp_name*/ - sizeof(scobject), /*tp_basicsize*/ - 0, /*tp_itemsize*/ - /* methods */ - (destructor)sc_dealloc, /*tp_dealloc*/ - 0, /*tp_print*/ - (getattrfunc)sc_getattr, /*tp_getattr*/ - 0, /*tp_setattr*/ - 0, /*tp_compare*/ - 0, /*tp_repr*/ - 0, /*tp_as_number*/ - 0, /*tp_as_sequence*/ - 0, /*tp_as_mapping*/ - 0, /*tp_hash*/ -}; - -/* ------------- -** -** Part two - the voice object -*/ -typedef struct { - PyObject_HEAD - int initialized; - VoiceSpec vs; - VoiceDescription vd; -} mvobject; - -static PyTypeObject mvtype; - -#define is_mvobject(v) ((v)->ob_type == &mvtype) - -static mvobject * -newmvobject() -{ - mvobject *self; - self = PyObject_NEW(mvobject, &mvtype); - if (self == NULL) - return NULL; - self->initialized = 0; - return self; -} - -static int -initmvobject(self, ind) - mvobject *self; - int ind; -{ - OSErr err; - - if ( (err=GetIndVoice((short)ind, &self->vs)) != 0 ) { - PyErr_Mac(ms_error_object, err); - return 0; - } - if ( (err=GetVoiceDescription(&self->vs, &self->vd, sizeof self->vd)) != 0) { - PyErr_Mac(ms_error_object, err); - return 0; - } - self->initialized = 1; - return 1; -} -/* mv methods */ - -static void -mv_dealloc(self) - mvobject *self; -{ - PyObject_DEL(self); -} - -static PyObject * -mv_getgender(self, args) - mvobject *self; - PyObject *args; -{ - PyObject *rv; - - if (!PyArg_NoArgs(args)) - return NULL; - if (!self->initialized) { - PyErr_SetString(ms_error_object, "Uninitialized voice"); - return NULL; - } - rv = PyInt_FromLong(self->vd.gender); - return rv; -} - -static PyObject * -mv_newchannel(self, args) - mvobject *self; - PyObject *args; -{ - if (!PyArg_NoArgs(args)) - return NULL; - if (!self->initialized) { - PyErr_SetString(ms_error_object, "Uninitialized voice"); - return NULL; - } - return (PyObject *)newscobject(&self->vs); -} - -static struct PyMethodDef mv_methods[] = { - {"GetGender", (PyCFunction)mv_getgender}, - {"NewChannel", (PyCFunction)mv_newchannel}, - {NULL, NULL} /* sentinel */ -}; - -static PyObject * -mv_getattr(self, name) - mvobject *self; - char *name; -{ - return Py_FindMethod(mv_methods, (PyObject *)self, name); -} - -static PyTypeObject mvtype = { - PyObject_HEAD_INIT(&PyType_Type) - 0, /*ob_size*/ - "macspeech.MacVoice", /*tp_name*/ - sizeof(mvobject), /*tp_basicsize*/ - 0, /*tp_itemsize*/ - /* methods */ - (destructor)mv_dealloc, /*tp_dealloc*/ - 0, /*tp_print*/ - (getattrfunc)mv_getattr, /*tp_getattr*/ - 0, /*tp_setattr*/ - 0, /*tp_compare*/ - 0, /*tp_repr*/ - 0, /*tp_as_number*/ - 0, /*tp_as_sequence*/ - 0, /*tp_as_mapping*/ - 0, /*tp_hash*/ -}; - - -/* ------------- -** -** Part three - The module interface -*/ - -/* See if Speech manager available */ - -static PyObject * -ms_Available(self, args) - PyObject *self; /* Not used */ - PyObject *args; -{ - - if (!PyArg_NoArgs(args)) - return NULL; - return PyInt_FromLong(speech_available); -} - -/* Count number of busy speeches */ - -static PyObject * -ms_Busy(self, args) - PyObject *self; /* Not used */ - PyObject *args; -{ - short result; - - if (!PyArg_NoArgs(args)) - return NULL; - if ( !check_available() ) - return NULL; - result = SpeechBusy(); - return PyInt_FromLong(result); -} - -/* Say something */ - -static PyObject * -ms_SpeakString(self, args) - PyObject *self; /* Not used */ - PyObject *args; -{ - OSErr err; - char *str; - int len; - - if (!PyArg_Parse(args, "s", &str)) - return NULL; - if ( !check_available()) - return NULL; - if (CurrentSpeech) { - /* Free the old speech, after killing it off - ** (note that speach is async and c2pstr works inplace) - */ - SpeakString("\p"); - free(CurrentSpeech); - } - len = strlen(str); - CurrentSpeech = malloc(len+1); - strcpy(CurrentSpeech, str); - err = SpeakString(c2pstr(CurrentSpeech)); - if ( err ) { - PyErr_Mac(ms_error_object, err); - return NULL; - } - Py_INCREF(Py_None); - return Py_None; -} - - -/* Count number of available voices */ - -static PyObject * -ms_CountVoices(self, args) - PyObject *self; /* Not used */ - PyObject *args; -{ - short result; - - if (!PyArg_NoArgs(args)) - return NULL; - if ( !check_available()) - return NULL; - CountVoices(&result); - return PyInt_FromLong(result); -} - -static PyObject * -ms_GetIndVoice(self, args) - PyObject *self; /* Not used */ - PyObject *args; -{ - mvobject *rv; - long ind; - - if( !PyArg_Parse(args, "i", &ind)) - return NULL; - if ( !check_available() ) - return NULL; - rv = newmvobject(); - if ( !initmvobject(rv, ind) ) { - Py_DECREF(rv); - return NULL; - } - return (PyObject *)rv; -} - - -static PyObject * -ms_Version(self, args) - PyObject *self; /* Not used */ - PyObject *args; -{ - NumVersion v; - - if (!PyArg_NoArgs(args)) - return NULL; - if ( !check_available()) - return NULL; - v = SpeechManagerVersion(); - return PyInt_FromLong(*(int *)&v); -} - - -/* List of functions defined in the module */ - -static struct PyMethodDef ms_methods[] = { - {"Available", ms_Available}, - {"CountVoices", ms_CountVoices}, - {"Busy", ms_Busy}, - {"SpeakString", ms_SpeakString}, - {"GetIndVoice", ms_GetIndVoice}, - {"Version", ms_Version}, - {NULL, NULL} /* sentinel */ -}; - -/* Initialization function for the module (*must* be called initmacspeech) */ - -void -initmacspeech() -{ - PyObject *m, *d; - - speech_available = init_available(); - /* Create the module and add the functions */ - m = Py_InitModule("macspeech", ms_methods); - - /* Add some symbolic constants to the module */ - d = PyModule_GetDict(m); - ms_error_object = PyErr_NewException("macspeech.error", NULL, NULL); - PyDict_SetItemString(d, "error", ms_error_object); -} |