1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
|
/***************************************************************************
A KTextEditor (Kate Part) plugin for speaking text.
Copyright:
(C) 2003-2004 by Olaf Schmidt <ojschmidt@kde.org>
(C) 2005 by Gary Cramblitt <garycramblitt@comcast.net>
Original Author: Olaf Schmidt <ojschmidt@kde.org>
***************************************************************************/
/***************************************************************************
* *
* 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 2 of the License, or *
* (at your option) any later version. *
* *
***************************************************************************/
// TQt includes.
#include <tqmessagebox.h>
#include <dcopclient.h>
#include <tqtimer.h>
// KDE includes.
#include <tdetexteditor/editinterface.h>
#include <tdetexteditor/selectioninterface.h>
#include <tdeaction.h>
#include <tdelocale.h>
#include <kstandarddirs.h>
#include <tdeapplication.h>
#include <kgenericfactory.h>
// KateKttsdPlugin includes.
#include "katekttsd.h"
#include "katekttsd.moc"
K_EXPORT_COMPONENT_FACTORY( tdetexteditor_kttsd, KGenericFactory<KateKttsdPlugin>( "tdetexteditor_kttsd" ) )
KateKttsdPlugin::KateKttsdPlugin( TQObject *parent, const char* name, const TQStringList& )
: KTextEditor::Plugin ( (KTextEditor::Document*) parent, name )
{
}
KateKttsdPlugin::~KateKttsdPlugin()
{
}
void KateKttsdPlugin::addView(KTextEditor::View *view)
{
KateKttsdPluginView *nview = new KateKttsdPluginView (view, "KTTSD Plugin");
m_views.append (nview);
}
void KateKttsdPlugin::removeView(KTextEditor::View *view)
{
for (uint z=0; z < m_views.count(); ++z)
if (m_views.at(z)->parentClient() == view)
{
KateKttsdPluginView *nview = m_views.at(z);
m_views.remove (nview);
delete nview;
}
TDEGlobal::locale()->removeCatalogue("kttsd");
}
KateKttsdPluginView::KateKttsdPluginView( KTextEditor::View *view, const char *name )
: TQObject( view, name ),
KXMLGUIClient( view )
{
view->insertChildClient( this );
setInstance( KGenericFactory<KateKttsdPlugin>::instance() );
TDEGlobal::locale()->insertCatalogue("kttsd");
(void) new TDEAction( i18n("Speak Text"), "kttsd", 0, this, TQT_SLOT(slotReadOut()), actionCollection(), "tools_kttsd" );
setXMLFile( "tdetexteditor_kttsdui.rc" );
}
void KateKttsdPluginView::slotReadOut()
{
KTextEditor::View *v = (KTextEditor::View*)parent();
KTextEditor::SelectionInterface *si = KTextEditor::selectionInterface( v->document() );
TQString text;
if ( si->hasSelection() )
text = si->selection();
else {
KTextEditor::EditInterface *ei = KTextEditor::editInterface( v->document() );
text = ei->text();
}
DCOPClient *client = kapp->dcopClient();
// If KTTSD not running, start it.
if (!client->isApplicationRegistered("kttsd"))
{
TQString error;
if (kapp->startServiceByDesktopName("kttsd", TQStringList(), &error))
TQMessageBox::warning(0, i18n( "Starting KTTSD Failed"), error );
}
TQByteArray data;
TQByteArray data2;
TQCString replyType;
TQByteArray replyData;
TQDataStream arg(data, IO_WriteOnly);
arg << text << "";
if ( !client->call("kttsd", "KSpeech", "setText(TQString,TQString)",
data, replyType, replyData, true) )
TQMessageBox::warning( 0, i18n( "DCOP Call Failed" ),
i18n( "The DCOP call setText failed." ));
TQDataStream arg2(data2, IO_WriteOnly);
arg2 << 0;
if ( !client->call("kttsd", "KSpeech", "startText(uint)",
data2, replyType, replyData, true) )
TQMessageBox::warning( 0, i18n( "DCOP Call Failed" ),
i18n( "The DCOP call startText failed." ));
}
|