OSDN Git Service

improved external link with session switched
authormorimoto <morimoto@180c8125-5b33-4295-ad04-72a68a15b4cc>
Sat, 23 Feb 2008 19:45:07 +0000 (19:45 +0000)
committermorimoto <morimoto@180c8125-5b33-4295-ad04-72a68a15b4cc>
Sat, 23 Feb 2008 19:45:07 +0000 (19:45 +0000)
lib/plugins/10url
lib/plugins/11url_session [new file with mode: 0644]
lib/templates/url.html
lib/templates/url_session.html [new file with mode: 0644]

index 8ae9b64..c0bcbc5 100644 (file)
@@ -1,7 +1,7 @@
 # -*-perl-*-
 # keitairc/lib/plugins/10url
 # URL\8f\88\97\9d
-# $Id: 10url,v 1.4 2008-02-23 18:58:22 morimoto Exp $
+# $Id: 10url,v 1.5 2008-02-23 19:45:07 morimoto Exp $
 # $Source: /home/ishikawa/work/keitairc/tmp/keitairc/lib/plugins/10url,v $
 
 $plugin = {
@@ -24,13 +24,9 @@ $plugin = {
                my ($request, $name, $session_id, $param_string) = @_;
                my $ci = new Keitairc::ClientInfo($request);
                my $view = new Keitairc::View($::cf, $ci);
-
-               # \90V\82µ\82¢ session_id \82ð\8dì\82Á\82Ä\8cÃ\82¢\82Ì\82Í\8fÁ\82·
-               $::sm->delete($session_id);
-               my $new_session = $::sm->add($ci->{header}->{user_agent}, $ci->serial_key());
                return $view->render('url.html', {
                        url => $param_string,
-                       session_id => $new_session->{id},
+                       session_id => $session_id,
                        escaped_url => ::uri_escape($param_string),
                             });
        }
diff --git a/lib/plugins/11url_session b/lib/plugins/11url_session
new file mode 100644 (file)
index 0000000..bb5146c
--- /dev/null
@@ -0,0 +1,25 @@
+# -*-perl-*-
+# keitairc/lib/plugins/11url_session
+# URL\8f\88\97\9d(\83Z\83b\83V\83\87\83\93\8dX\90V\82µ\82Ä\83\8a\83t\83@\83\89\8bt\92T\92m\96h\8cä)
+# $Id: 11url_session,v 1.1 2008-02-23 19:45:07 morimoto Exp $
+# $Source: /home/ishikawa/work/keitairc/tmp/keitairc/lib/plugins/11url_session,v $
+
+$plugin = {
+       name => 'url_session',
+       action_imprementation => sub {
+               my ($request, $name, $session_id, $param_string) = @_;
+               my $ci = new Keitairc::ClientInfo($request);
+               my $view = new Keitairc::View($::cf, $ci);
+
+               # \90V\82µ\82¢ session_id \82ð\8dì\82Á\82Ä\8cÃ\82¢\82Ì\82Í\8fÁ\82·
+               $::sm->delete($session_id);
+               my $new_session = $::sm->add($ci->{header}->{user_agent}, $ci->serial_key());
+               return $view->render('url_session.html', {
+                       url => $param_string,
+                       session_id => $new_session->{id},
+                       escaped_url => ::uri_escape($param_string),
+                            });
+       }
+};
+
+1;
index 91efff7..7fe48ad 100644 (file)
   <body>
     <!-- tmpl_var url -->
     <hr />
-    <font color="#f3333">\82±\82ÌÍß-¼Þ\82Å\82Í[\96ß\82é]ÎÞÀÝ\82Í\8eg\82¦\82Ü\82¹\82ñ</font><br />
     <form method="post" action="<!-- tmpl_var root --><!-- tmpl_var session_id -->/postme">
       <a accesskey="1" href="<!-- tmpl_var url -->">
        [1] \92¼\90Ú±¸¾½</a><br />
-      <a accesskey="2" href="http://mgw.hatena.ne.jp/?url=<!-- tmpl_var escaped_url -->&noimage=0&split=1">
-       [2] Îß¹¯Ä\82Í\82Ä\82È\82ű¸¾½</a><br />
-      <a accesskey="3" href="http://p.m.livedoor.com/?__u=<!-- tmpl_var escaped_url -->">
-       [3] ÓÊÞ³»Þ-\83À\82ű¸¾½</a><br />
+      <a accesskey="2" href="<!-- tmpl_var root --><!-- tmpl_var session_id -->/url_session/<!-- tmpl_var url -->">
+       [2] \92¼\90Ú±¸¾½(Ø̧×-\95Ï\8dX)</a><br />
+      <a accesskey="3" href="http://mgw.hatena.ne.jp/?url=<!-- tmpl_var escaped_url -->&noimage=0&split=1">
+       [3] Îß¹¯Ä\82Í\82Ä\82È\82ű¸¾½</a><br />
+      <a accesskey="4" href="http://p.m.livedoor.com/?__u=<!-- tmpl_var escaped_url -->">
+       [4] ÓÊÞ³»Þ-\83À\82ű¸¾½</a><br />
       <tmpl_if is_ezweb>
-       <a accesskey="4" href="device:pcsiteviewer?url=<!-- tmpl_var url -->">
-         [4] PC»²ÄËÞ­-±\82ű¸¾½</a><br />
+       <a accesskey="5" href="device:pcsiteviewer?url=<!-- tmpl_var url -->">
+         [5] PC»²ÄËÞ­-±\82ű¸¾½</a><br />
       </tmpl_if>
       URL\82ðºËß-<br />
       <input type="text" name="text" value="<!-- tmpl_var url -->" />
diff --git a/lib/templates/url_session.html b/lib/templates/url_session.html
new file mode 100644 (file)
index 0000000..2443d0d
--- /dev/null
@@ -0,0 +1,26 @@
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=Shift_JIS" />
+    <meta http-equiv="Cache-Control" content="max-age=0" />
+    <tmpl_if viewport>
+      <meta name="viewport" content="width=device-width" />
+      <meta name="viewport" content="initial-scale=1.0, user-scalable=yes" />
+    </tmpl_if>
+    <title><!-- tmpl_var title -->: URL <!-- tmpl_var url --></title>
+  </head>
+  <body>
+    <!-- tmpl_var url -->
+    <hr />
+    <font color="#ff3333">
+      Ø̧×-\8co\97R\82Ì\8bt±¸¾½\82ð\96h\82®\82½\82ß¾¯¼®Ý\82ð\8dX\90V\82µ\82Ü\82µ\82½\81B<br />
+      \82±\82±\82Å\82Í\82à\82¤[\96ß\82é]ÎÞÀÝ\82Í\8eg\82¦\82Ü\82¹\82ñ\81B
+    </font><br />
+    <a accesskey="1" href="<!-- tmpl_var url -->">
+      [1] \92¼\90Ú±¸¾½</a><br />
+    <hr />
+    <a accesskey="8" href="<!-- tmpl_var root --><!-- tmpl_var session_id -->/index">[8] Á¬ÈÙؽÄ</a>
+    <hr />
+    <!-- tmpl_var timestamp --><br />
+    keitairc <!-- tmpl_var version -->
+  </body>
+</html>