Navigation

Changeset 45

Timestamp:

07/25/06 16:01:49 (2 years ago)

Author:

jm3

Message:

added additional config file variable and removed some hardcoded references to the root dir.
Nb. there are *still* some hardcoded paths inside the perl file... *we have* to fix these before we can beta!!!
added additional error dump to gm script

Files:

r44	r45
240	240	return bail( "Incorrect password - please try again" );
241	241	else
242		return bail( "Unexpected error back from GPG when signing message" );
	242	return bail( "Unexpected error back from GPG when signing message: " + resp );
243	243	}
244	244	} else {

r43	r45
1	1	#!/bin/bash
	2
	3	# pull in config params like KEY_HOME, GPG_HOME, and app ROOT
	4	. configure.sh
2	5
3	6	echo Content-type: text/plain
…	…
8	11	exit 1
9	12	fi
	13
	14	root=$ROOT/shell
10	15
11	16	#echo "<pre>"
…	…
29	34
30	35
31		decoded=`echo $safe_value \| ~~/Users/erdnase/www/10kz/shell~~/urldecode \| sed "s/^'//" \| sed "s/'$//"`
	36	decoded=`echo $safe_value \| $root/urldecode \| sed "s/^'//" \| sed "s/'$//"`
32	37	echo decoded value is \'$decoded\'
33		export `echo $name`="`echo '$value' \| ~~/Users/erdnase/www/10kz/shell~~/urldecode`"
	38	export `echo $name`="`echo '$value' \| $root/urldecode`"
34	39	echo
35	40	done </tmp/params

r43	r45
2	2	# $Id$
3	3
4		HOMEDIR="/Users/erdnase/.gnupg/"
	4	# pull in config params like KEY_HOME, GPG_HOME, and app ROOT
	5	. configure.sh
5	6
6	7	echo Content-type: text/HTML
…	…
9	10
10	11	echo "<select value='key_id'>"
11		/sw/bin/gpg --list-secret-keys --no-permission-warning --load-extension idea --homedir $~~HOMEDIR~~ \| grep '^sec' \
	12	/sw/bin/gpg --list-secret-keys --no-permission-warning --load-extension idea --homedir $KEY_HOME \| grep '^sec' \
12	13	\| sed "s:^sec .*/::" \
13	14	\| sed "s/^$[0-9A-F]$ $.$$/<option value='\1'>\1 \/ \2<\/option>/" \

r43	r45
10	10	$debug = 0;
11	11
12		my $bin = "/sw/bin";
13		my $gpg_home = "/Users/erdnase/www/10kz/gpg-home";
	12	# FIXME: ugh, unless we perl-ify the other shell scripts, we need a way to share the configure.sh info between perl + shell
	13	my $bin = "/usr/local/bin";
	14	my $KEY_HOME = "/Users/jmanoogi/.gnupg";
14	15
15	16	#print header;
…	…
40	41
41	42	my $default_ops = "--no-tty "
42		. " --no-permission-warning --load-extension idea --homedir ~~/Users/erdnase/.gnupg~~";
	43	. " --no-permission-warning --load-extension idea --homedir $KEY_HOME";
43	44	my $recips = "$recipients -r $key_id --default-key $key_id ";
44	45

r43	r45
1	1	#!/bin/bash
2	2	# $Id$
	3
	4	# pull in config params like KEY_HOME, GPG_HOME, and app ROOT
	5	. configure.sh
3	6
4	7	KEY_ID=9112BC51
5	8	KEY_ID=19ACA985
6	9	PASSPHRASE="dingus magic"
7		~~HOMEDIR="/Users/erdnase/.gnupg/"~~
8	10	PLAINTEXT=working-context/foo.txt
9	11	RECIPIENTS="jas@juniorplenty.com nick@nicksfriends.com"
…	…
35	37	-r $KEY_ID \
36	38	--default-key $KEY_ID \
37		--homedir $~~HOMEDIR~~ \
	39	--homedir $KEY_HOME \
38	40	--no-permission-warning \
39	41	--command-fd 0 \

r43	r45
1	1
	2	export ROOT=/usr/local/10kz
2	3	export KEY_HOME=/Users/jmanoogi/.gnupg
3	4	export GPG_HOME=/usr/local/bin