Tadashi Okoshi
slash****@users*****
2005年 12月 10日 (土) 09:46:28 JST
Index: affelio/incoming.cgi
diff -u affelio/incoming.cgi:1.9 affelio/incoming.cgi:1.10
--- affelio/incoming.cgi:1.9 Thu Oct 27 20:15:00 2005
+++ affelio/incoming.cgi Sat Dec 10 09:46:28 2005
@@ -16,7 +16,7 @@
# along with this program; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
#
-# $Id: incoming.cgi,v 1.9 2005/10/27 11:15:00 slash5234 Exp $
+# $Id: incoming.cgi,v 1.10 2005/12/10 00:46:28 slash5234 Exp $
use strict;
@@ -69,6 +69,8 @@
my $referrer = $q->param("referrer");
debug_print("incoming.cgi: forward_id =$forward_id");
+my $dest_URL = $wi->PTN_URL($q->url_param("dest_url"));
+
############################################################################
#Load Friend manager and get passAB
############################################################################
@@ -219,8 +221,15 @@
debug_print("incoming.cgi: user_nickname:" . $ss->param("user_nickname") );
debug_print("incoming.cgi: end. Forwarding to my homepage.");
- print $q->redirect( -url => $af->{site__web_root},
- -cookie => $cookie);
+ if($dest_URL ne ""){
+ print $q->redirect( -url => $dest_URL,
+ -cookie => $cookie);
+ }else{
+ print $q->redirect( -url => $af->{site__web_root},
+ -cookie => $cookie);
+ }
+
+
}
exit(1);
Index: affelio/outgoing.cgi
diff -u affelio/outgoing.cgi:1.8 affelio/outgoing.cgi:1.9
--- affelio/outgoing.cgi:1.8 Thu Oct 27 20:15:00 2005
+++ affelio/outgoing.cgi Sat Dec 10 09:46:28 2005
@@ -16,7 +16,7 @@
# along with this program; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
-# $Id: outgoing.cgi,v 1.8 2005/10/27 11:15:00 slash5234 Exp $
+# $Id: outgoing.cgi,v 1.9 2005/12/10 00:46:28 slash5234 Exp $
use strict;
@@ -89,6 +89,7 @@
#########################################
# Retrieve destination URL
my $dest_URL = $wi->PTN_URL($q->param("dest_url"));
+my $dest_URL2 = $wi->PTN_URL($q->param("dest_url2"));
debug_print("outgoing.cgi: dst_URL=$dest_URL");
#########################################
@@ -166,7 +167,8 @@
my $forwarding_to = "$dest_URL/incoming.cgi?"
. "forward_id=$cipher_msg"
. "&"
- . "referrer=$af->{site__web_root}";
+ . "referrer=$af->{site__web_root}"
+ . "&dest_url=$dest_URL2";
debug_print("outgoing.cgi: forwarding_to= $forwarding_to\n");