changeset 571:9f99fdab102a

Updated
author MURAKAMI Masaki <c112124@h.koeki-u.ac.jp>
date Thu, 24 Jul 2014 21:10:54 +0900
parents fe953dd9e4c0
children af884996a628
files minato2014/Bingo.css minato2014/Bingo.rb minato2014/accountcheck.rb minato2014/admin/.htaccess minato2014/admin/.htpasswd minato2014/admin/backup/.htaccess minato2014/admin/backup/.htpasswd minato2014/admin/backup/chusen.html minato2014/admin/backup/chusen.rb minato2014/admin/backup/delete.html minato2014/admin/backup/delete.rb minato2014/admin/backup/etsuran.rb minato2014/admin/chusen.html minato2014/admin/chusen.rb minato2014/admin/etsuran.rb
diffstat 15 files changed, 254 insertions(+), 15 deletions(-) [+]
line wrap: on
line diff
--- a/minato2014/Bingo.css	Thu Jul 24 18:44:31 2014 +0900
+++ b/minato2014/Bingo.css	Thu Jul 24 21:10:54 2014 +0900
@@ -24,13 +24,12 @@
 
 }
 
-p {
+p,h3 {
 	margin:0;
 	padding-left: 5%;
 	font-weight: 900;
 	height: 5%;
 	width: 95%;
-	background: #136cf9;
 	border: thin solid #136cf9;
 }
 
--- a/minato2014/Bingo.rb	Thu Jul 24 18:44:31 2014 +0900
+++ b/minato2014/Bingo.rb	Thu Jul 24 21:10:54 2014 +0900
@@ -347,7 +347,11 @@
   message += 'ビンゴ揃いました!!<br>'
 end
 
-printf("<p>%s</p>",message)
+if rank > 0
+  printf("<p style=\"background:red; color:white;\">%sおめでとうございます!☆ %d等 ☆が当選しました!!</p>", message, rank)
+else
+  printf("<p style=\"background:#136cf9;\">%s</p>", message)
+end
 
 ##
 
--- a/minato2014/accountcheck.rb	Thu Jul 24 18:44:31 2014 +0900
+++ b/minato2014/accountcheck.rb	Thu Jul 24 21:10:54 2014 +0900
@@ -34,7 +34,7 @@
 sql = "insert into main(name,sex,age,aria,job,stamp_status,stamp_img,exp,rank,magic) values (?,?,?,?,?,?,?,?,?,?);"
 db.execute(sql,name,sex,age,aria,job,'000010000','n,n,n,n,kamo,n,n,n,n',1,0,mg); #初期値
 
-expires = "Sun, 27 Jul 2016 00:00:00 GMT"
+expires = "Sun, 27 Jul 2014 00:00:00 GMT"
 
 printf("Content-type: text/html; charset=UTF-8
 Set-Cookie:id=%s ;expires=%s
--- a/minato2014/admin/.htaccess	Thu Jul 24 18:44:31 2014 +0900
+++ b/minato2014/admin/.htaccess	Thu Jul 24 21:10:54 2014 +0900
@@ -2,7 +2,7 @@
 AddType	"text/html; charset=utf-8" .rb
 AddType	"text/html; charset=utf-8" .html
 Options +ExecCGI
-AuthUserFile /home/www/skip/minato2014/admin/.htpasswd
+AuthUserFile /home/irhome/c112/c112124/public_html/web/minato2014/admin/.htpasswd
 AuthGroupFile /dev/null
 AuthName "ǧڥ"
 AuthType Basic
--- a/minato2014/admin/.htpasswd	Thu Jul 24 18:44:31 2014 +0900
+++ b/minato2014/admin/.htpasswd	Thu Jul 24 21:10:54 2014 +0900
@@ -1,2 +1,3 @@
 fujix:fu5QjLTqbHEaQ
 shokok:9tQUls7fXzqMA
+Murakami:7Y005Wtya7Ogw
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/minato2014/admin/backup/.htaccess	Thu Jul 24 21:10:54 2014 +0900
@@ -0,0 +1,9 @@
+AddHandler cgi-script   .rb
+AddType	"text/html; charset=utf-8" .rb
+AddType	"text/html; charset=utf-8" .html
+Options +ExecCGI
+AuthUserFile /home/irhome/c112/c112124/public_html/web/minato2014/admin/.htpasswd
+AuthGroupFile /dev/null
+AuthName "ǧڥ"
+AuthType Basic
+require valid-user
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/minato2014/admin/backup/.htpasswd	Thu Jul 24 21:10:54 2014 +0900
@@ -0,0 +1,3 @@
+fujix:fu5QjLTqbHEaQ
+shokok:9tQUls7fXzqMA
+Murakami:7Y005Wtya7Ogw
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/minato2014/admin/backup/chusen.html	Thu Jul 24 21:10:54 2014 +0900
@@ -0,0 +1,26 @@
+<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN"
+	"http://www.w3.org/TR/html4/strict.dtd">
+<html>
+<head>
+<title>Database delete</title>
+</style>
+<link rel="stylesheet" type="text/css" href="design.css">
+</head>
+
+<body>
+<h1>抽選用ページ</h1>
+<p>実行するとデータベースが書き変えられます。</p>
+<p>実行する際は注意してください。</p>
+<form method="POST" action="./chusen.rb">
+<p>抽選を行いますか?<br>
+はい<input type="radio" name="check" value="OK"> 
+いいえ<input type="radio" name="check" value="NO">
+</p>
+<input type="submit" value="削除">
+<input type="reset" value="リセット">
+</form>
+
+<address>c111126@g.koeki-u.ac.jp</address>
+
+</body>
+</html>
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/minato2014/admin/backup/chusen.rb	Thu Jul 24 21:10:54 2014 +0900
@@ -0,0 +1,52 @@
+#!/usr/bin/env ruby
+# -*- coding: utf-8 -*-
+
+require 'sqlite3'
+require 'cgi'
+
+c = CGI.new(:tag_maker => "html5", :accept_charest => "UTF-8")
+db = SQLite3::Database.new("../sql/stamp.sq3")
+
+check = c['check']
+if check == "OK"
+  begin
+    result = db.execute("select id,exp,rank from main;")
+  rescue
+    exit
+  end
+  all = Array.new
+  for id,lv,rank in result
+    if id == "ID" || lv == 0 || rank.to_i != 0
+      next
+    end
+    lv.to_i.times do
+      all << id
+    end
+  end
+  
+  tousen = Array.new(0)
+  atari1 = rand(all.length)
+  tousen << all[atari1]
+  all.delete_if {|x| x == tousen[0]}
+  
+  sql = "update main set rank = 1 where id = ?;"
+  db.execute(sql,tousen[0])
+  
+  sql = "update main set rank = 2 where id = ?;"
+  while tousen.length < 4
+    srand
+    atari2 = rand(all.length)
+    hoge = all[atari2]
+    tousen << all[atari2]
+    all.delete_if {|x| x == hoge}
+    db.execute(sql,hoge)
+  end
+  
+  i=0
+  printf("Content-type: text/html; charset=UTF-8\n\n")
+  
+  printf("<p>1等はIDが%04dの方!おめでとー!</p>\n",tousen[i].to_i)
+  printf("<p>2等はIDが%04dと%04dと%04dの方!おめでとー!</p>\n",tousen[i+=1].to_i,tousen[i+=1].to_i,tousen[i+=1].to_i)
+else
+  print"<p>抽選はまだ行いませんよ</p>"
+end
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/minato2014/admin/backup/delete.html	Thu Jul 24 21:10:54 2014 +0900
@@ -0,0 +1,26 @@
+<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN"
+	"http://www.w3.org/TR/html4/strict.dtd">
+<html>
+<head>
+<title>Database delete</title>
+</style>
+<link rel="stylesheet" type="text/css" href="design.css">
+</head>
+
+<body>
+<h1>データベース消去用</h1>
+<p>実行するとデータベースが削除されます。</p>
+<p>実行する際は注意してください。</p>
+<form method="POST" action="./delete.rb">
+<p>本当に消しますか?<br>
+はい<input type="radio" name="check" value="OK"> 
+いいえ<input type="radio" name="check" value="NO">
+</p>
+<input type="submit" value="削除">
+<input type="reset" value="リセット">
+</form>
+
+<address>c111126@g.koeki-u.ac.jp</address>
+
+</body>
+</html>
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/minato2014/admin/backup/delete.rb	Thu Jul 24 21:10:54 2014 +0900
@@ -0,0 +1,36 @@
+#!/usr/bin/env ruby
+# -*- coding: utf-8 -*-
+
+require 'sqlite3'
+require 'cgi'
+
+db = SQLite3::Database.new("../sql/stamp.sq3")
+
+c = CGI.new(:accept_charaset => "UTF-8")
+check = c['check']
+if check == "OK"
+  begin
+    db.execute("drop table main;")
+    db.extcute("drop table logs;")
+    text = "<p>データを削除しました。</p>"
+  rescue
+    text = "<p>データがありません。</p>"
+  end
+else
+  text = "データは削除されません"
+end
+
+printf("Content-type: text/html; charset=UTF-8\n\n")
+
+printf'<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+<head>
+<title>Delete table</title>
+<link rel="stylesheet" type="text/css" href="design.css">
+</head>
+</body>
+%s
+<p><a href="etsuran.rb">データ閲覧ページへ</a></p>
+<p></p>
+</body></html>
+',text
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/minato2014/admin/backup/etsuran.rb	Thu Jul 24 21:10:54 2014 +0900
@@ -0,0 +1,41 @@
+#!/usr/bin/env ruby
+#coding:utf-8
+
+require'cgi'
+require'sqlite3'
+
+db = SQLite3::Database.new("../sql/stamp.sq3")
+
+c = CGI.new(:accept_charaset => "UTF-8")
+
+flag = 0
+text = "<p>登録者一覧を表示します</p>\n"
+begin
+  result = db.execute("select * from main;")
+rescue
+  flag = 1
+  text = "<p>データがありません</p>\n"
+end
+
+printf("Content-type: text/html; charset=UTF-8\n\n")
+
+printf'<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/h
+tml4/strict.dtd">
+<html>
+<head>
+<title>Delete table</title>
+<link rel="stylesheet" type="text/css" href="design.css">
+</head>
+</body>
+<h1>データ閲覧ページ</h1>'
+puts text
+if flag == 1
+else
+  print"<table border = 1>\n"
+  result.each do |line|
+    printf("<tr><td>%s</td><td>%s</td><td>%s</td><td>%s</td><td>%s</td><td>%s</td><td>%s</td></tr>\n",line[0],line[1],line[2],line[3],line[4],line[8],line[9])
+  end
+ print"</table>"
+end
+
+print'</body></html>'
--- a/minato2014/admin/chusen.html	Thu Jul 24 18:44:31 2014 +0900
+++ b/minato2014/admin/chusen.html	Thu Jul 24 21:10:54 2014 +0900
@@ -16,11 +16,9 @@
 はい<input type="radio" name="check" value="OK"> 
 いいえ<input type="radio" name="check" value="NO">
 </p>
-<input type="submit" value="削除">
+<input type="submit" value="抽選">
 <input type="reset" value="リセット">
 </form>
 
-<address>c111126@g.koeki-u.ac.jp</address>
-
 </body>
 </html>
--- a/minato2014/admin/chusen.rb	Thu Jul 24 18:44:31 2014 +0900
+++ b/minato2014/admin/chusen.rb	Thu Jul 24 21:10:54 2014 +0900
@@ -3,11 +3,29 @@
 
 require 'sqlite3'
 require 'cgi'
+require 'date'
 
 c = CGI.new(:tag_maker => "html5", :accept_charest => "UTF-8")
 db = SQLite3::Database.new("../sql/stamp.sq3")
 
 check = c['check']
+
+printf("Content-type: text/html; charset=UTF-8\n\n")
+
+sum = 'SELECT SUM(rank) FROM main WHERE NOT id=1;'
+rank_sum = db.execute(sum).flatten(2)[0].to_i
+
+t = Time.now
+nt = t.hour*60 + t.min
+p nt
+p rank_sum
+if nt > 1230 && rank_sum == 0
+elsif nt > 1240 && rank_sum == 7
+else
+  check = ""
+  puts check
+end
+
 if check == "OK"
   begin
     result = db.execute("select id,exp,rank from main;")
@@ -16,7 +34,7 @@
   end
   all = Array.new
   for id,lv,rank in result
-    if id == "ID" || lv == 0 || rank.to_i != 0
+    if id == 1 || lv == 0 || rank.to_i != 0
       next
     end
     lv.to_i.times do
@@ -43,10 +61,9 @@
   end
   
   i=0
-  printf("Content-type: text/html; charset=UTF-8\n\n")
   
-  printf("<p>1等はIDが%04dの方!おめでとー!</p>\n",tousen[i].to_i)
-  printf("<p>2等はIDが%04dと%04dと%04dの方!おめでとー!</p>\n",tousen[i+=1].to_i,tousen[i+=1].to_i,tousen[i+=1].to_i)
+  printf("<p>1等はIDが%04dの方!おめでとー!</p>\n",tousen[i].to_i-1)
+  printf("<p>2等はIDが%04dと%04dと%04dの方!おめでとー!</p>\n",tousen[i+=1].to_i-1,tousen[i+=1].to_i-1,tousen[i+=1].to_i-1)
 else
-  print"<p>抽選はまだ行いませんよ</p>"
+  print"<p>抽選はまだ行いませんよ</p>\n"
 end
--- a/minato2014/admin/etsuran.rb	Thu Jul 24 18:44:31 2014 +0900
+++ b/minato2014/admin/etsuran.rb	Thu Jul 24 21:10:54 2014 +0900
@@ -8,21 +8,31 @@
 
 c = CGI.new(:accept_charaset => "UTF-8")
 
+rank = c["rank"]
 flag = 0
 text = "<p>登録者一覧を表示します</p>\n"
 begin
+  if rank == "y"
+    rank_reset = 'UPDATE main SET rank=0 WHERE NOT id=1;'
+    db.execute(rank_reset)
+  end
   result = db.execute("select * from main;")
+  log = 'select * from logs;'
+  logs = db.execute(log)
 rescue
   flag = 1
   text = "<p>データがありません</p>\n"
 end
 
+rank = "n"
+
 printf("Content-type: text/html; charset=UTF-8\n\n")
 
 printf'<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/h
 tml4/strict.dtd">
 <html>
 <head>
+<meta http-equiv="refresh" content="5;http://roy.e.koeki-u.ac.jp/~c112124/web/minato2014/admin/etsuran.rb">
 <title>Delete table</title>
 <link rel="stylesheet" type="text/css" href="design.css">
 </head>
@@ -33,9 +43,26 @@
 else
   print"<table border = 1>\n"
   result.each do |line|
-    printf("<tr><td>%s</td><td>%s</td><td>%s</td><td>%s</td><td>%s</td><td>%s</td><td>%s</td></tr>\n",line[0],line[1],line[2],line[3],line[4],line[8],line[9])
+    printf("<tr><td>%04d</td><td>%s</td><td>%s</td><td>%s</td><td>%s</td><td>%s</td><td>%s</td></tr>\n",line[0].to_i-1,line[1],line[2],line[3],line[4],line[8],line[9])
   end
- print"</table>"
+  print'</table>'
+  print'<p><form method="POST" action="./etsuran.rb">
+rankをリセットしますか?<br>
+NO <input name="rank" type="radio" value="n" checked="checked"> / 
+YES <input name="rank" type="radio" value="y"><br>
+<input type="submit" value="submit">
+</form></p>
+'
+end
+
+print'<h1>ログの閲覧</h1>'
+if flag == 1
+else
+  print'<marquee direction=up hspace=50 scrolldelay=1 loop=1 scrollamount=1000 behavior="slide" width=500 height=200><table style="margin=0;">'
+  logs.each do |line|
+    printf("<tr><td width=50px>%s</td><td width=50px>%04d</td><td width=100px>%s</td><td width=100px>%s</td></tr>\n",line[0],line[1].to_i-1,line[2],line[3])
+  end
+ print"</table></marquee>"
 end
 
 print'</body></html>'

yatex.org