You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
89 lines
3.9 KiB
89 lines
3.9 KiB
/****************************************************************************
|
|
|
|
Copyright (C) 2003 Lubos Lunak <l.lunak@kde.org>
|
|
|
|
Permission is hereby granted, free of charge, to any person obtaining a
|
|
copy of this software and associated documentation files (the "Software"),
|
|
to deal in the Software without restriction, including without limitation
|
|
the rights to use, copy, modify, merge, publish, distribute, sublicense,
|
|
and/or sell copies of the Software, and to permit persons to whom the
|
|
Software is furnished to do so, subject to the following conditions:
|
|
|
|
The above copyright notice and this permission notice shall be included in
|
|
all copies or substantial portions of the Software.
|
|
|
|
THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
|
IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
|
FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
|
|
THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
|
LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
|
|
FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
|
|
DEALINGS IN THE SOFTWARE.
|
|
|
|
****************************************************************************/
|
|
|
|
#include <tdecmdlineargs.h>
|
|
#include <tdeapplication.h>
|
|
#include <tdemessagebox.h>
|
|
#include <kprocess.h>
|
|
#include <tdelocale.h>
|
|
#include <unistd.h>
|
|
#include <twin.h>
|
|
#include <X11/Xlib.h>
|
|
|
|
static const TDECmdLineOptions options[] =
|
|
{
|
|
// no need for I18N_NOOP(), this is not supposed to be used directly
|
|
{ "pid <pid>", "PID of the application to terminate.", 0 },
|
|
{ "hostname <hostname>", "Hostname on which the application is running.", 0 },
|
|
{ "windowname <caption>", "Caption of the window to be terminated.", 0 },
|
|
{ "applicationname <name>", "Name of the application to be terminated.", 0 },
|
|
{ "wid <id>", "ID of resource belonging to the application.", 0 },
|
|
{ "timestamp <time>", "Time of user action causing killing.", 0 },
|
|
TDECmdLineLastOption
|
|
};
|
|
|
|
int main( int argc, char* argv[] )
|
|
{
|
|
TDELocale::setMainCatalogue( "twin" ); // the messages are in twin's .po file
|
|
TDECmdLineArgs::init( argc, argv, "twin_killer_helper", I18N_NOOP( "TWin" ),
|
|
I18N_NOOP( "TWin helper utility" ), "1.0" );
|
|
TDECmdLineArgs::addCmdLineOptions( options );
|
|
TDEApplication app;
|
|
TDECmdLineArgs* args = TDECmdLineArgs::parsedArgs();
|
|
TQCString hostname = args->getOption( "hostname" );
|
|
bool pid_ok = false;
|
|
pid_t pid = args->getOption( "pid" ).toULong( &pid_ok );
|
|
TQString caption = TQString::fromUtf8( args->getOption( "windowname" ));
|
|
TQString appname = TQString::fromLatin1( args->getOption( "applicationname" ));
|
|
bool id_ok = false;
|
|
Window id = args->getOption( "wid" ).toULong( &id_ok );
|
|
bool time_ok = false;
|
|
Time timestamp =args->getOption( "timestamp" ).toULong( &time_ok );
|
|
args->clear();
|
|
if( !pid_ok || pid == 0 || !id_ok || id == None || !time_ok || timestamp == CurrentTime
|
|
|| hostname.isEmpty() || caption.isEmpty() || appname.isEmpty())
|
|
{
|
|
TDECmdLineArgs::usage( i18n( "This helper utility is not supposed to be called directly." ));
|
|
return 1;
|
|
}
|
|
TQString question = i18n(
|
|
"<qt>Window with title \"<b>%2</b>\" is not responding. "
|
|
"This window belongs to application <b>%1</b> (PID=%3, hostname=%4).<p>"
|
|
"Do you wish to terminate this application? (All unsaved data in this application will be lost.)</qt>" )
|
|
.arg( appname ).arg( caption ).arg( pid ).arg( static_cast<const char *>(hostname) );
|
|
app.updateUserTimestamp( timestamp );
|
|
if( KMessageBox::warningYesNoWId( id, question, TQString::null, i18n("Terminate"), i18n("Keep Running") ) == KMessageBox::Yes )
|
|
{
|
|
if( hostname != "localhost" )
|
|
{
|
|
TDEProcess proc;
|
|
proc << "xon" << hostname << "kill" << pid;
|
|
proc.start( TDEProcess::DontCare );
|
|
}
|
|
else
|
|
::kill( pid, SIGKILL );
|
|
XKillClient( tqt_xdisplay(), id );
|
|
}
|
|
}
|