Mercurial > hgrepos > hgweb.cgi > skipweb
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>'