/*
* PWman - Password management application
*
* Copyright (C) 2002 Ivan Kelly <ivan@ivankelly.net>
*
* 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.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*/
#include <stdlib.h>
#include <ui.h>
#include <pwman.h>
#include <gnupg.h>
extern Pw * uilist_get_highlighted_item();
extern PWList * uilist_get_highlighted_sublist();
extern PWList * pwlist_new(char*);
extern PWSearchResult * uilist_get_highlighted_searchresult();
extern char *pwgen_ask();
int disp_h = 15, disp_w = 80;
extern int curitem;
extern WINDOW *bottom;
int
action_list_add_pw()
{
Pw *pw;
InputField fields[] = {
{"Name:\t", NULL, STRING_MEDIUM, STRING},
{"Host:\t", NULL, STRING_MEDIUM, STRING},
{"User:\t", NULL, STRING_MEDIUM, STRING},
{"Password:\t", NULL, STRING_SHORT, STRING, pwgen_ask},
{"Launch Command:\t", NULL, STRING_LONG, STRING}
};
int i, x;
pw = pwlist_new_pw();
ui_statusline_ask_str(fields[0].name, pw->name, STRING_MEDIUM);
ui_statusline_ask_str(fields[1].name, pw->host, STRING_MEDIUM);
ui_statusline_ask_str(fields[2].name, pw->user, STRING_MEDIUM);
/*
int x = strlen(msg) + 5;
if(input == NULL){
input = malloc(len);
}
statusline_clear();
statusline_msg(msg);
echo();
show_cursor();
mvwgetnstr(bottom, 1, x, input, len);
noecho();
hide_cursor();
statusline_clear();*/
ui_statusline_ask_str_with_autogen(fields[3].name, pw->passwd, STRING_SHORT, fields[3].autogen, 0x07);
/* statusline_msg(fields[3].name);
x = strlen(fields[3].name) + 5;
if((i = getch()) == 0x07){
pw->passwd = fields[3].autogen();
} else {
echo();
show_cursor();
mvwgetnstr(bottom, 1, x, pw->passwd, PASS_LEN);
mvwaddch(bottom, 1, x, i);
wmove(bottom, 1, x+1);
noecho();
hide_cursor();
statusline_clear();
}*/
ui_statusline_ask_str(fields[4].name, pw->launch, STRING_LONG);
fields[0].value = pw->name;
fields[1].value = pw->host;
fields[2].value = pw->user;
fields[3].value = pw->passwd;
fields[4].value = pw->launch;
i = action_yes_no_dialog(fields, (sizeof(fields)/sizeof(InputField)), NULL, "Add this entry");
if(i){
pwlist_add_ptr(current_pw_sublist, pw);
ui_statusline_msg("New password added");
} else {
pwlist_free_pw(pw);
ui_statusline_msg("New password cancelled");
}
uilist_refresh();
}
int
action_edit_pw(Pw *pw)
{
InputField fields[] = {
{"Name:\t", NULL, STRING_MEDIUM, STRING},
{"Host:\t", NULL, STRING_MEDIUM, STRING},
{"User:\t", NULL, STRING_MEDIUM, STRING},
{"Password:\t", NULL, STRING_SHORT, STRING, pwgen_ask},
{"Launch Command:\t", NULL, STRING_LONG, STRING}
};
if(pw == NULL){
return -1;
}
/*
* Get specified password
*/
fields[0].value = pw->name;
fields[1].value = pw->host;
fields[2].value = pw->user;
fields[3].value = pw->passwd;
fields[4].value = pw->launch;
/*
* initialize the info window
*/
action_input_dialog(fields, (sizeof(fields)/sizeof(InputField)), "Edit Password");
}
int
action_list_rename()
{
Pw* curpw;
PWList* curpwl;
char *new_name;
new_name = malloc(STRING_MEDIUM);
switch(uilist_get_highlighted_type()){
case PW_ITEM:
curpw = uilist_get_highlighted_item();
if(curpw){
ui_statusline_ask_str("New Name", new_name, STRING_MEDIUM);
if(strlen(new_name) > 0) {
pwlist_rename_item(curpw, new_name);
}
}
break;
case PW_SUBLIST:
curpwl = uilist_get_highlighted_sublist();
if(curpwl){
ui_statusline_ask_str("New Sublist Name", new_name, STRING_MEDIUM);
if(strlen(new_name) > 0) {
pwlist_rename_sublist(curpwl, new_name);
}
}
break;
case PW_UPLEVEL:
case PW_NULL:
default:
/* do nothing */
break;
}
uilist_refresh();
}
int
action_edit_options()
{
InputField fields[] = {
{"GnuPG Path:\t", options->gpg_path, STRING_LONG, STRING},
{"GnuPG ID:\t", options->gpg_id, STRING_LONG, STRING},
{"Password File:\t", options->password_file, STRING_LONG, STRING},
{"Passphrase Timeout(in minutes):\t", &options->passphrase_timeout, STRING_SHORT, INT}
};
action_input_dialog(fields, (sizeof(fields)/sizeof(InputField)), "Edit Preferences");
write_options = TRUE;
}
int
action_input_dialog_draw_items(WINDOW* dialog_win, InputField *fields,
int num_fields, char *title, char *msg)
{
int i, h = 0;
wclear(dialog_win);
box(dialog_win, 0, 0);
if(title){
wattron(dialog_win, A_BOLD);
i = strlen(title);
h += 2;
mvwaddstr(dialog_win, h, (disp_w - i)/2, title);
wattroff(dialog_win, A_BOLD);
}
/* loop through fields */
for(i = 0; i < num_fields; i++){
h += 2;
if(fields[i].type == STRING){
mvwprintw(dialog_win, h, 3,
"%d - %s %s", (i+1), fields[i].name, (char*)fields[i].value);
if(fields[i].name == "Password:\t"){
/* Print out a guide beneath password to help with picking individual characters
* I could have changed the string format, but for ease of horizontal alignment
* was easy to do as per password and then replace characters with spaces
*/
mvwprintw(dialog_win, h+1, 3,
"%s %s %s", " ", " \t", "1234567890123456789012345678901234567890");
}
} else if(fields[i].type == INT){
mvwprintw(dialog_win, h, 3,
"%d - %s %d", (i+1), fields[i].name, *((int*)fields[i].value) );
} else if(fields[i].type == INFORMATION){
mvwprintw(dialog_win, h, 3,
"%d - %s", (i+1), fields[i].name);
}
}
wattron(dialog_win, A_BOLD);
if(msg){
i = strlen(msg);
h += 2;
mvwaddstr(dialog_win, h, (disp_w - i)/2, msg);
}
wattroff(dialog_win, A_BOLD);
/*
* do final stuff the put all together
*/
wrefresh(dialog_win);
}
int
action_input_dialog(InputField *fields, int num_fields, char *title)
{
int ch, i;
char *ret;
WINDOW *dialog_win;
char msg[] = "(press 'q' to return to list)";
char msg2[80];
/*
* initialize the info window
*/
if(title){
disp_h = ((num_fields+2) * 2) + 3;
} else {
disp_h = ((num_fields+1) * 2) + 3;
}
dialog_win = newwin(disp_h, disp_w, (LINES - disp_h)/2, (COLS - disp_w)/2);
keypad(dialog_win, TRUE);
action_input_dialog_draw_items(dialog_win, fields, num_fields, title, msg);
/*
* actions loop
*/
while((ch = wgetch(dialog_win)) != 'q'){
if(!options->readonly) {
if( (ch >= '1') && (ch <= NUM_TO_CHAR(num_fields)) ){
i = CHAR_TO_NUM(ch);
if(fields[i].autogen != NULL){
fields[i].value = (char*)ui_statusline_ask_str_with_autogen(
fields[i].name, (char*)fields[i].value,
fields[i].max_length, fields[i].autogen, 0x07);
} else if(fields[i].type == STRING){
fields[i].value = (char*)ui_statusline_ask_str(fields[i].name,
(char*)fields[i].value, fields[i].max_length);
} else if(fields[i].type == INT){
ui_statusline_ask_num(fields[i].name, (int*)fields[i].value);
} else if(fields[i].type == INFORMATION){
// Easy, do nothing!
}
action_input_dialog_draw_items(dialog_win, fields, num_fields, title, msg);
} else if(ch == 'l'){
delwin(dialog_win);
action_list_launch();
break;
}
} else {
statusline_readonly();
}
}
/*
* clean up
*/
delwin(dialog_win);
uilist_refresh();
}
int
action_input_gpgid_dialog(InputField *fields, int num_fields, char *title)
{
int i, valid_id;
int ch = '1', first_time = 1;
char *ret;
WINDOW *dialog_win;
char msg[] = "(press 'q' when export recipient list is complete)";
char msg2[80];
/*
* initialize the info window
*/
disp_h = ((num_fields+2) * 2) + 3;
dialog_win = newwin(disp_h, disp_w, (LINES - disp_h)/2, (COLS - disp_w)/2);
keypad(dialog_win, TRUE);
action_input_dialog_draw_items(dialog_win, fields, num_fields, title, msg);
/*
* actions loop - ignore read only as not changing main state
*/
while(first_time || ((ch = wgetch(dialog_win)) != 'q')){
// On first loop, drop straight into recipient 1
first_time = 0;
if( (ch >= '1') && (ch <= NUM_TO_CHAR(num_fields)) ){
i = CHAR_TO_NUM(ch);
fields[i].value = (char*)ui_statusline_ask_str(fields[i].name,
(char*)fields[i].value, fields[i].max_length);
// Now verify it's a valid recipient
if(strlen(fields[i].value)) {
valid_id = gnupg_check_id(fields[i].value);
if(valid_id == 0) {
// Good, valid id
} else {
// Invalid id. Warn and blank
if(valid_id == -2) {
snprintf(msg2, 80, "Key expired for '%s'", (char*)fields[i].value);
} else {
snprintf(msg2, 80, "Invalid recipient '%s'", (char*)fields[i].value);
}
ui_statusline_msg(msg2);
snprintf(fields[i].value, STRING_LONG, "");
}
// Redraw display
action_input_dialog_draw_items(dialog_win, fields, num_fields, title, msg);
}
}
}
/*
* clean up
*/
delwin(dialog_win);
uilist_refresh();
}
int
action_yes_no_dialog(InputField *fields, int num_fields, char *title, char *question)
{
int ch, i;
char *ret;
WINDOW *dialog_win;
/*
* initialize the info window
*/
if(title){
disp_h = ((num_fields+2) * 2) + 3;
} else {
disp_h = ((num_fields+1) * 2) + 3;
}
dialog_win = newwin(disp_h, disp_w, (LINES - disp_h)/2, (COLS - disp_w)/2);
keypad(dialog_win, TRUE);
action_input_dialog_draw_items(dialog_win, fields, num_fields, title, NULL);
i = ui_statusline_yes_no(question, 1);
/*
* clean up
*/
delwin(dialog_win);
uilist_refresh();
return i;
}
int
action_list_add_sublist()
{
char *name;
PWList *sublist, *iter;
name = malloc(STRING_MEDIUM);
ui_statusline_ask_str("Sublist Name:", name, STRING_MEDIUM);
for(iter = current_pw_sublist->sublists; iter != NULL; iter = iter->next){
if( strcmp(iter->name, name) == 0){
free(name);
return -1;
}
}
sublist = pwlist_new(name);
pwlist_add_sublist(current_pw_sublist, sublist);
uilist_refresh();
}
int
action_list_at_top_level()
{
if(current_pw_sublist->parent){
action_list_up_one_level();
uilist_refresh();
return 0;
} else {
return 1;
}
}
int
action_list_select_item()
{
Pw* curpw;
PWList* curpwl;
PWSearchResult* cursearch;
// Are they searching, or in normal mode?
if(search_results != NULL) {
cursearch = uilist_get_highlighted_searchresult();
curpwl = cursearch->sublist;
curpw = cursearch->entry;
if(curpw){
action_edit_pw(curpw);
} else if(curpwl){
// Quite out of searching
search_remove();
// Now display the selected sublist
current_pw_sublist = curpwl;
uilist_refresh();
}
} else {
switch(uilist_get_highlighted_type()){
case PW_ITEM:
curpw = uilist_get_highlighted_item();
if(curpw){
action_edit_pw(curpw);
}
break;
case PW_SUBLIST:
curpwl = uilist_get_highlighted_sublist();
if(curpwl){
current_pw_sublist = curpwl;
uilist_refresh();
}
break;
case PW_UPLEVEL:
action_list_up_one_level();
break;
case PW_NULL:
default:
/* do nothing */
break;
}
}
}
int
action_list_delete_item()
{
Pw* curpw;
PWList* curpwl;
int i;
char str[STRING_LONG];
switch(uilist_get_highlighted_type()){
case PW_ITEM:
curpw = uilist_get_highlighted_item();
if(curpw){
snprintf(str, STRING_LONG, "Really delete \"%s\"", curpw->name);
i = ui_statusline_yes_no(str, 0);
if(i){
pwlist_delete_pw(current_pw_sublist, curpw);
ui_statusline_msg("Password deleted");
} else {
ui_statusline_msg("Password not deleted");
}
}
break;
case PW_SUBLIST:
curpwl = uilist_get_highlighted_sublist();
if(curpwl){
snprintf(str, STRING_LONG, "Really delete Sublist \"%s\"", curpwl->name);
i = ui_statusline_yes_no(str, 0);
if(i){
pwlist_delete_sublist(curpwl->parent, curpwl);
ui_statusline_msg("Password Sublist deleted");
} else {
ui_statusline_msg("Password not deleted");
}
}
break;
case PW_UPLEVEL:
case PW_NULL:
default:
/* do nothing */
break;
}
uilist_refresh();
}
int
action_list_move_item()
{
Pw* curpw;
PWList *curpwl, *iter;
int i;
char str[STRING_LONG];
char answer[STRING_MEDIUM];
int sublistfound;
switch(uilist_get_highlighted_type()){
case PW_ITEM:
curpw = uilist_get_highlighted_item();
if(curpw){
sublistfound = 0;
snprintf(str, STRING_LONG, "Move \"%s\" to where?", curpw->name);
ui_statusline_ask_str(str, answer, STRING_MEDIUM);
for(iter = current_pw_sublist->sublists; iter != NULL; iter = iter->next){
if( strcmp(iter->name, answer) == 0 ){
pwlist_detach_pw(current_pw_sublist, curpw);
pwlist_add_ptr(iter, curpw);
uilist_refresh();
sublistfound = 1;
}
}
/* then only do this if not found */
if ( sublistfound == 0 ){
ui_statusline_msg("Sublist does not exist, try again");
getch();
ui_statusline_clear();
}
}
break;
case PW_SUBLIST:
curpwl = uilist_get_highlighted_sublist();
if(curpwl){
sublistfound = 0;
snprintf(str, STRING_LONG, "Move sublist \"%s\" to where?", curpwl->name);
ui_statusline_ask_str(str, answer, STRING_MEDIUM);
for(iter = current_pw_sublist->sublists; iter != NULL; iter = iter->next){
if( strcmp(iter->name, answer) == 0 ){
pwlist_detach_sublist(current_pw_sublist, curpwl);
pwlist_add_sublist(iter, curpwl);
uilist_refresh();
sublistfound = 1;
}
}
/* then only do this if not found */
if ( sublistfound == 0 ){
ui_statusline_msg("Sublist does not exist, try again");
getch();
ui_statusline_clear();
}
}
break;
case PW_UPLEVEL:
case PW_NULL:
default:
/* do nothing */
break;
}
}
int
action_list_move_item_up_level()
{
Pw* curpw;
PWList *curpwl, *iter;
int i;
char str[STRING_LONG];
char answer[STRING_MEDIUM];
// Do nothing if searching
if(search_results != NULL) {
return;
}
// Do the right thing based on type
switch(uilist_get_highlighted_type()){
case PW_ITEM:
curpw = uilist_get_highlighted_item();
if(curpw && current_pw_sublist->parent){
pwlist_detach_pw(current_pw_sublist, curpw);
pwlist_add_ptr(current_pw_sublist->parent, curpw);
uilist_refresh();
}
break;
case PW_SUBLIST:
curpwl = uilist_get_highlighted_sublist();
if(curpwl && current_pw_sublist->parent){
pwlist_detach_sublist(current_pw_sublist, curpwl);
pwlist_add_sublist(current_pw_sublist->parent, curpwl);
uilist_refresh();
}
break;
case PW_UPLEVEL:
case PW_NULL:
default:
/* do nothing */
break;
}
}
int
action_list_up_one_level()
{
/* move up one sublist */
if(current_pw_sublist->parent){
current_pw_sublist = current_pw_sublist->parent;
uilist_refresh();
}
}
int
action_list_export()
{
Pw* curpw;
PWList *curpwl;
debug("list_export: enter switch");
switch(uilist_get_highlighted_type()){
case PW_ITEM:
debug("list_export: is a pw");
curpw = uilist_get_highlighted_item();
if(curpw){
pwlist_export_passwd(curpw);
}
break;
case PW_SUBLIST:
debug("list_export: is a pwlist");
curpwl = uilist_get_highlighted_sublist();
if(curpwl){
pwlist_export_list(curpwl);
}
break;
case PW_UPLEVEL:
case PW_NULL:
default:
/* do nothing */
break;
}
}
void _create_information_field(char* name, InputField* field)
{
field->name = name;
field->value = NULL;
field->max_length = 0;
field->type = INFORMATION;
}
int
action_list_locate()
{
int depth = 0, count = 0;
char* currentName;
InputField* fields;
Pw* curpw = NULL;
PWList *curpwl = NULL;
PWList *parent = NULL;
PWSearchResult* cursearch;
if(search_results != NULL) {
cursearch = uilist_get_highlighted_searchresult();
curpwl = cursearch->sublist;
curpw = cursearch->entry;
if(curpw) {
parent = curpwl;
} else {
parent = curpwl->parent;
}
} else {
parent = current_pw_sublist;
switch(uilist_get_highlighted_type()){
case PW_ITEM:
curpw = uilist_get_highlighted_item();
break;
case PW_SUBLIST:
curpwl = uilist_get_highlighted_sublist();
break;
default:
/* do nothing */
break;
}
}
if(curpw) {
currentName = curpw->name;
depth = 1;
} else if(curpwl) {
currentName = curpwl->name;
depth = 1;
}
// Figure out how many parents we have
curpwl = parent;
while(curpwl){
curpwl = curpwl->parent;
depth++;
}
count = depth;
// Now grab their names
fields = calloc(sizeof(InputField), depth);
if(currentName){
depth--;
_create_information_field(currentName, &fields[depth]);
}
curpwl = parent;
while(curpwl){
depth--;
_create_information_field(curpwl->name, &fields[depth]);
curpwl = curpwl->parent;
}
// Have it rendered
action_input_dialog(fields, count, "Location of Item");
// All done, tidy up
free(fields);
}
int
action_list_launch()
{
int i;
Pw* curpw;
char msg[STRING_LONG];
switch(uilist_get_highlighted_type()){
case PW_ITEM:
debug("list_launch: is a pw");
curpw = uilist_get_highlighted_item();
if(curpw){
i = launch(curpw);
snprintf(msg, STRING_LONG, "Application exited with code %d", i);
ui_statusline_msg(msg);
}
break;
case PW_SUBLIST:
case PW_UPLEVEL:
case PW_NULL:
default:
/* do nothing */
break;
}
}
int
action_list_read_file()
{
pwlist_free_all();
if(pwlist_read_file() != 0){
pwlist = pwlist_new("Main");
current_pw_sublist = pwlist;
}
uilist_refresh();
return -1;
}
int
action_list_move_item_up()
{
Pw* curpw;
PWList *curpwl;
int worked = 0;
// Do nothing if searching
if(search_results != NULL) {
return;
}
switch(uilist_get_highlighted_type()){
case PW_ITEM:
curpw = uilist_get_highlighted_item();
worked = pwlist_change_item_order(curpw, current_pw_sublist, 1);
break;
case PW_SUBLIST:
curpwl = uilist_get_highlighted_sublist();
worked = pwlist_change_list_order(curpwl, 1);
break;
case PW_UPLEVEL:
case PW_NULL:
default:
/* do nothing */
break;
}
if(worked) {
uilist_up();
}
}
int
action_list_move_item_down()
{
Pw* curpw;
PWList *curpwl;
int worked = 0;
// Do nothing if searching
if(search_results != NULL) {
return;
}
switch(uilist_get_highlighted_type()){
case PW_ITEM:
curpw = uilist_get_highlighted_item();
worked = pwlist_change_item_order(curpw, current_pw_sublist, 0);
break;
case PW_SUBLIST:
curpwl = uilist_get_highlighted_sublist();
worked = pwlist_change_list_order(curpwl, 0);
break;
case PW_UPLEVEL:
case PW_NULL:
default:
/* do nothing */
break;
}
if(worked) {
uilist_down();
}
}