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.
tdenetwork/kopete/plugins/cryptography/kgpgselkey.cpp

246 lines
6.5 KiB

//Code from KGPG
/***************************************************************************
listkeys.cpp - description
-------------------
begin : Thu Jul 4 2002
copyright : (C) 2002 by y0k0
email : bj@altern.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. *
* *
***************************************************************************/
////////////////////////////////////////////////////// code for the key management
#include <stdlib.h>
#include <unistd.h>
#include <sys/wait.h>
#include <tqlayout.h>
#include <tqlabel.h>
#include <klistview.h>
#include <klocale.h>
#include <tqcheckbox.h>
#include <kprocess.h>
#include <kiconloader.h>
#include "kgpgselkey.h"
////////////////////////////////////////////////////////////////////////////////////////////////////
//////////////// Secret key selection dialog, used when user wants to sign a key
KgpgSelKey::KgpgSelKey(TQWidget *parent, const char *name,bool showlocal):KDialogBase( parent, name, true,i18n("Private Key List"),Ok | Cancel)
{
TQString keyname;
TQWidget *page = new TQWidget(this);
TQLabel *labeltxt;
KIconLoader *loader = KGlobal::iconLoader();
keyPair=loader->loadIcon("kgpg_key2",KIcon::Small,20);
setMinimumSize(300,200);
keysListpr = new KListView( page );
keysListpr->setRootIsDecorated(true);
keysListpr->addColumn( i18n( "Name" ) );
keysListpr->setShowSortIndicator(true);
keysListpr->setFullWidth(true);
labeltxt=new TQLabel(i18n("Choose secret key:"),page);
TQVBoxLayout *vbox=new TQVBoxLayout(page,3);
vbox->addWidget(labeltxt);
vbox->addWidget(keysListpr);
if (showlocal==true)
{
local = new TQCheckBox(i18n("Local signature (cannot be exported)"),page);
vbox->addWidget(local);
}
FILE *fp,*fp2;
TQString tst,tst2;
char line[130];
// FIXME: Why use popen instead of KProcess, TQProcess or KProcIO?!?
// Are we interested in having buffer overflows now? - Martijn
fp = popen( "gpg --no-tty --with-colon --list-secret-keys", "r" );
while ( fgets( line, sizeof(line), fp))
{
tst=line;
if (tst.startsWith("sec"))
{
const TQString trust=tst.section(':',1,1);
TQString val=tst.section(':',6,6);
TQString id=TQString("0x"+tst.section(':',4,4).right(8));
if (val.isEmpty())
val=i18n("Unlimited");
TQString tr;
switch( trust[0] )
{
case 'o':
tr= i18n("Unknown");
break;
case 'i':
tr= i18n("Invalid");
break;
case 'd':
tr=i18n("Disabled");
break;
case 'r':
tr=i18n("Revoked");
break;
case 'e':
tr=i18n("Expired");
break;
case 'q':
tr=i18n("Undefined");
break;
case 'n':
tr=i18n("None");
break;
case 'm':
tr=i18n("Marginal");
break;
case 'f':
tr=i18n("Full");
break;
case 'u':
tr=i18n("Ultimate");
break;
default:
tr=i18n("?");
break;
}
tst=tst.section(":",9,9);
// FIXME: Same here: don't use popen! - Martijn
fp2 = popen( TQString( "gpg --no-tty --with-colon --list-key %1" ).tqarg( KShellProcess::quote( id ) ).latin1(), "r" );
bool dead=true;
while ( fgets( line, sizeof(line), fp2))
{
tst2=line;
if (tst2.startsWith("pub"))
{
const TQString trust2=tst2.section(':',1,1);
switch( trust2[0] )
{
case 'f':
dead=false;
break;
case 'u':
dead=false;
break;
default:
break;
}
}
}
pclose(fp2);
if (!tst.isEmpty() && (!dead))
{
KListViewItem *item=new KListViewItem(keysListpr,extractKeyName(tst));
KListViewItem *sub= new KListViewItem(item,i18n("ID: %1, trust: %2, expiration: %3").tqarg(id).tqarg(tr).tqarg(val));
sub->setSelectable(false);
item->setPixmap(0,keyPair);
}
}
}
pclose(fp);
TQObject::connect(keysListpr,TQT_SIGNAL(doubleClicked(TQListViewItem *,const TQPoint &,int)),this,TQT_SLOT(slotpreOk()));
TQObject::connect(keysListpr,TQT_SIGNAL(clicked(TQListViewItem *)),this,TQT_SLOT(slotSelect(TQListViewItem *)));
keysListpr->setSelected(keysListpr->firstChild(),true);
page->show();
resize(this->minimumSize());
setMainWidget(page);
}
TQString KgpgSelKey::extractKeyName(TQString fullName)
{
TQString kMail;
if (fullName.find("<")!=-1)
{
kMail=fullName.section('<',-1,-1);
kMail.truncate(kMail.length()-1);
}
TQString kName=fullName.section('<',0,0);
if (kName.find("(")!=-1) kName=kName.section('(',0,0);
return TQString(kMail+" ("+kName+")").stripWhiteSpace();
}
void KgpgSelKey::slotpreOk()
{
if (keysListpr->currentItem()->depth()!=0)
return;
else
slotOk();
}
void KgpgSelKey::slotOk()
{
if (keysListpr->currentItem()==NULL)
reject();
else
accept();
}
void KgpgSelKey::slotSelect(TQListViewItem *item)
{
if (item==NULL) return;
if (item->depth()!=0)
{
keysListpr->setSelected(item->parent(),true);
keysListpr->setCurrentItem(item->parent());
}
}
TQString KgpgSelKey::getkeyID()
{
TQString userid;
///// emit selected key
if (keysListpr->currentItem()==NULL) return("");
else
{
userid=keysListpr->currentItem()->firstChild()->text(0);
userid=userid.section(',',0,0);
userid=userid.section(':',1,1);
userid=userid.stripWhiteSpace();
return(userid);
}
}
TQString KgpgSelKey::getkeyMail()
{
TQString username;
///// emit selected key
if (keysListpr->currentItem()==NULL) return("");
else
{
username=keysListpr->currentItem()->text(0);
//username=username.section(' ',0,0);
username=username.stripWhiteSpace();
return(username);
}
}
bool KgpgSelKey::getlocal()
{
///// emit exportation choice
return(local->isChecked());
}
#include "kgpgselkey.moc"