Mercurial > hgrepos > hgweb.cgi > skipweb

changeset 580:878baca5e265

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
merge
author SATO Tomohisa <c111080@g.koeki-u.ac.jp>
date Fri, 25 Jul 2014 15:47:50 +0900
parents 3df22ea8c526 (current diff) 2e0448324d8b (diff)
children 79ce5c5b2e21
files
diffstat 8 files changed, 534 insertions(+), 7 deletions(-) [+]
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/minato2014/#Bingo.rb#	Fri Jul 25 15:47:50 2014 +0900
@@ -0,0 +1,446 @@
+#!/usr/bin/env ruby
+# -*- coding: utf-8 -*-
+
+require 'sqlite3'
+require 'cgi'
+require 'date'
+require './sub.rb'
+require 'net/http'
+
+c = CGI.new(:tag_maker => "html5", :accept_charest => "UTF-8")
+db = SQLite3::Database.new("sql/stamp.sq3")
+
+id = c.cookies["id"][0].to_i
+magic = c.cookies["magic"][0].to_i
+err = 0                         # 不正な動きであれば負の値になる
+sidesize = 3
+message = "はりきって行きましょう!<br>"                    # ビンゴ用テキスト
+
+print("Content-type: text/html; charset=UTF-8 \n\n")
+
+### DROP TABLE ###
+
+getcom = ARGV[0].to_s
+drop = 'DROP TABLE main ;'
+if getcom == 'ududlrllba'
+  db.execute(drop)
+end
+
+######
+
+### DELETE TABLE ###
+
+del = 'DELETE FROM main WHERE id=?'
+if getcom == 'ududlrlrba'
+  db.execute(del, id)
+end
+
+######
+
+##### CHECKING UID #####
+
+sql = "SELECT stamp_status, stamp_img, name, job, sex, exp FROM main WHERE id=? AND magic=?"
+begin
+  user_data = db.execute(sql, id, magic)
+rescue
+  user_data = []
+end
+
+if user_data == []              # ログインエラー(-1)
+  err -= 1
+end
+
+### LOGIN ERROR HTML ###
+
+if err == -1
+  print'
+<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN"
+        "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+<head>
+<meta http-equiv="refresh" content="2.5;http://skip.koeki-prj.org/minato2014/account.html">
+</head>
+<title>たいとる</title>
+<body>
+'
+print'
+<p> ログインに失敗しました。 </p>
+<p>
+アカウント登録ページへ接続中…<br>
+* 3秒経っても移動しない場合は<a href="account.html">こちら</a>から移動して下さい。
+</p>
+</body>
+</html>
+'
+  exit
+end
+
+######
+
+##########
+
+##### RE-ARRAYING STAMP_STATUS AND STAMP_IMG #####
+
+# stamp status
+stamp_st = user_data[0][0]
+stamp_st = stamp_st.split(//)   # 一文字ずつ分けて配列にする
+stamp_st = stamp_st.map {|s| s.to_i} # 配列内の文字列を数列になおす
+
+# stamp img
+stamp_img = user_data[0][1]     
+stamp_img = stamp_img.split(",") # 文字列を","で区切って配列にする
+
+##########
+
+##### STAMPPING #####
+
+### Making randam number ###
+
+def taiou(sidesize)
+  srand(123456789)
+  stamp = Hash.new("n")
+  stamp_name = ["kamo", "kite", "mame", "mo2usa", "inuwasi", "hanabu", "be", "UMIMARU", "pero"]
+  (sidesize**2).times do |n|
+    stamp[rand(10000000)] = stamp_name[n]
+  end
+  stamp
+end
+
+######
+
+##### Checking bingo method #####
+
+def bingocheck(start, sidesize, stepon, stamp, decision, bingo)
+  nbox = []
+  setbox = Hash.new
+  if sidesize == stepon
+    x = sidesize
+  else
+    x = 1
+  end
+  x.times do |m|
+    start.step(sidesize*sidesize - 1, stepon) do |n|
+      nbox << n + m
+      if nbox.length == sidesize
+        dbox = Array.new(0)     # next bingo or reach numbers(bingoed -> nothing)
+        for i in nbox
+          if stamp[i] == 0
+            dbox << i
+          end
+        end
+        # sidesizeにdecisionの値を加えることで、ビンゴ、次ビンゴ、リーチをそれぞれdecisionに0,1,2を加えることで表現。
+        if dbox.length == decision 
+          setbox[dbox] = nbox
+          bingo << setbox
+          setbox = Hash.new
+          nbox = []
+        else
+          nbox = []
+        end
+      end
+    end
+  end
+end 
+# bingo[{[ビンゴまたはリーチに必要な番号] => [ビンゴまたはリーチのラインを形成する番号]}]
+##########
+
+bingo =          # 現在のビンゴ数
+
+### Checking Access Cord(AC) ###
+
+getAC = ARGV[0].to_i            # URL?以降の引数を取得
+rightAC = taiou(sidesize)       # taiouで生成したACのハッシュ
+#p rightAC
+rightAC = rightAC[getAC]        # ACが正しければスタンプ名が入り、異なる場合はn
+
+##### ACCESS LOG #####
+t = Time.now
+time = (t.hour * 3600) + (t.min * 60) + t.sec
+
+## Checking sql_master table. If sqlite_master don't have tablename, it create.
+
+sql_master = "SELECT name FROM sqlite_master WHERE name='logs';"
+check_master = db.execute(sql_master)
+sql_logs = 'CREATE TABLE logs(
+id INTEGER PRIMARY KEY AUTOINCREMENT,
+uid INTEGER,
+ac TEXT,
+time INTEGER);
+'
+if check_master == []
+  db.execute(sql_logs)
+end
+
+##########
+
+begin
+  get_log = 'SELECT ac, time FROM logs WHERE uid=(SELECT MAX(id) FROM logs WHERE uid=?);' # ユーザーの最新のログ情報を取得
+  log_check = db.execute(get_log, id)
+rescue
+  print'GETTING LOG ERROR!'
+end
+begin
+  log = 'INSERT INTO logs(uid, ac, time) VALUES(?, ?, ?)'
+  db.execute(log, id, rightAC, time)
+rescue
+  print'INSERT LOG ERROR!'
+end
+# /* memo: 再度同じようなシステムを作る際はスタンプ用のテーブルがほしい。 */ #
+
+##########
+
+### ビンゴしたラインを判定(decision = 0) ###
+bingo = []
+# 横
+bingocheck(0, sidesize, 1, stamp_st, 0, bingo)
+# 縦
+bingocheck(0, sidesize, sidesize, stamp_st, 0, bingo)
+# 左斜め
+bingocheck(0, sidesize, sidesize+1, stamp_st, 0, bingo)
+# 右斜め
+bingocheck(sidesize-1, sidesize, sidesize-1, stamp_st, 0, bingo)
+#######
+
+bingo = bingo.length            # ビンゴの数
+last_bingo = bingo
+
+if rightAC != "n"               # rightACが正しければ
+  
+  ### Update Stamp_status And Stamp_img ###
+  
+  # Replacing Image #
+  
+  index_st = []
+  stamp_st.length.times { |c|
+    if stamp_st[c] == 0
+      index_st << c
+    end
+  }
+  
+  ### リーチ（decision = 1）# [{[ビンゴの番号] => [リーチを構成する数]}]
+  reach = []
+  # 横 
+  bingocheck(0, sidesize, 1, stamp_st, 1, reach)
+  # 縦
+  bingocheck(0, sidesize, sidesize, stamp_st, 1, reach)
+  # 左斜め
+  bingocheck(0, sidesize, sidesize+1, stamp_st, 1, reach)
+  # 右斜め
+  bingocheck(sidesize-1, sidesize, sidesize-1, stamp_st, 1, reach)
+  #######
+  
+  begin
+    reach = reach[0].flatten(2)[0] # ビンゴの番号のみ抽出
+  rescue
+    reach = []
+  end
+  
+    ### ビンゴしたラインを判定(decision = 0) ###
+  bingo = []
+  # 横
+  bingocheck(0, sidesize, 1, stamp_st, 0, bingo)
+  # 縦
+  bingocheck(0, sidesize, sidesize, stamp_st, 0, bingo)
+  # 左斜め
+  bingocheck(0, sidesize, sidesize+1, stamp_st, 0, bingo)
+  # 右斜め
+  bingocheck(sidesize-1, sidesize, sidesize-1, stamp_st, 0, bingo)
+  #######
+  
+  bingo = bingo.length            # ビンゴの数
+  
+  # Updating stamp_st #  
+  if stamp_img.include?(rightAC) == true          # 既に同名のスタンプが入っていたら
+    if stamp_st[stamp_img.index(rightAC)] < 9
+      stamp_st[stamp_img.index(rightAC)] += 1       # 対応するスタンプの位置に1足す
+      message = "スタンプカウントが「1」増えました!(スタンプカウントは「9」が上限です)"
+    else
+      message="スタンプカウントMAX!!(※これ以上このスタンプのカウントは増えません)"
+    end
+  else
+    if reach != [] && bingo == 0       # はじめのビンゴは必ず3回で完成
+      stamp_st[reach] += 1# ビンゴになる数字を代入
+      stamp_img[reach] = rightAC
+      message = "新しいスタンプをGETしました!" # Top message
+    else
+      randam_number = index_st[rand(index_st.length)] # スタンプの入っていない個所のなかからランダムにひとつ選ぶ
+      stamp_st[randam_number] += 1                  # 選ばれた個所に1足す
+      stamp_img[randam_number] = rightAC # stamp_stと同じ個所にstamp_imgにスタンプの名前を代入
+      message = "新しいスタンプをGETしました!" # Top message
+    end
+  end
+  ##
+
+  ### ビンゴしたラインを判定(decision = 0) ###
+  bingo = []
+  # 横
+  bingocheck(0, sidesize, 1, stamp_st, 0, bingo)
+  # 縦
+  bingocheck(0, sidesize, sidesize, stamp_st, 0, bingo)
+  # 左斜め
+  bingocheck(0, sidesize, sidesize+1, stamp_st, 0, bingo)
+  # 右斜め
+  bingocheck(sidesize-1, sidesize, sidesize-1, stamp_st, 0, bingo)
+  #######
+  
+  bingo = bingo.length            # ビンゴの数
+  
+  
+  ##
+  
+  # Convert to string # 
+  
+  stamp_st_string = stamp_st.join
+  stamp_img_string = stamp_img.join(",")
+  
+  ##
+
+  sql_update = "UPDATE main SET stamp_status=?, stamp_img=? WHERE id=?;"
+  db.execute(sql_update, stamp_st_string, stamp_img_string, id)
+end
+
+######
+
+##########
+
+##### HTML #####
+print'
+<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN"
+        "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+<head>
+<title>たいとる</title>
+<link rel="stylesheet" type="text/css" href="Bingo.css">
+</head>
+<body>
+'
+### TOP ###
+
+sql_rank = 'select rank from main where id=?;'
+rank = db.execute(sql_rank, id).flatten(2)[0].to_i
+
+print'
+<div class="outflam">
+'
+if rank > 0
+  print'<div class="top" style="background: red;">'
+else
+  print'<div class="top">'
+end
+# - ビンゴステータス処理 - #
+
+if rank > 0
+  printf("<h1>おめでとうございます!!<br>☆ %d等 ☆が当選しました!!</h1>", rank)
+  # print'<p>抽選は終了しましたが、引続きゆる☆スタをお楽しみ下さい!!</p>'
+end 
+
+# End of top 
+print'
+</div>
+'
+# Top message #
+
+bc = bingo.to_i - last_bingo.to_i
+
+if bc > 0
+  message += '<br>おめでとう!' + bc.to_s
+  message += 'ビンゴ揃いました!!<br>'
+end
+
+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
+
+##
+
+######
+
+### CENTER ###
+print'
+<div class="center">
+<table border=1>
+'
+for i in 0..2
+  print'<tr>'
+  3.times do |n|
+    if stamp_st[3*i+n].to_i > 0
+      printf("<td width=170 height=170><img src=\"png/%s.png\" alt=\"stamped\" width=\"160\" height=\"160\"><span style=\"color: green; font-weight: 900;\">%d</span></td>\n", stamp_img[3*i+n], stamp_st[3*i+n])
+    else
+      print"<td width=170 height=170></td>\n" 
+    end
+  end
+  print'<tr>'
+end
+# End of center 
+print'
+</table>
+</div>
+'
+######
+
+### BOTTOM ###
+print'
+<div class="bottom">
+'
+# - RPGの表示 - #
+
+name = user_data[0][2]
+job = user_data[0][3]
+sex = user_data[0][4]
+exp = user_data[0][5]
+
+## GETTING EXP SUM ##
+
+sum_sql = 'SELECT SUM(exp)  FROM main  WHERE rank=0;'
+sumexp = db.execute(sum_sql).flatten(2)[0]
+
+####
+
+stamp = stamp_st.inject(:+)                 # 配列内の値を全て足す
+
+charST = rpg(job, sex, stamp, bingo, sumexp)      # ユーザーのキャラクタステータス
+
+## UPDATE EXP ##
+
+update_exp = 'UPDATE main SET exp=? WHERE id=?;'
+db.execute(update_exp, charST[2], id)
+
+####
+
+## GETTING EXP SUM ##
+
+sum_sql = 'SELECT SUM(exp) FROM main WHERE rank=0;'
+sumexp = db.execute(sum_sql).flatten(2)[0]
+
+####
+
+stamp = stamp_st.inject(:+)                 # 配列内の値を全て足す
+
+charST = rpg(job, sex, stamp, bingo, sumexp)      # ユーザーのキャラクタステータス
+
+printf("
+<!-- キャラクターイメージの設定 -->
+<div class=\"charIMG\">
+<img src=\"png/%s.png\">
+</div>
+<div class=\"charSTATUS\">
+ID:%04d<br>
+NAME:%s<br>
+あなたのLv: %d / 全員のLv: %d<br>
+当選確率: %3.3f \%
+<div>
+", charST[0], id-1,  name, charST[2],sumexp , charST[1])
+
+# End of bottom
+print'</div>'
+# End of outflam
+print'</div>'
+######
+
+print'
+</body>
+</html>
+'
+##########
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/minato2014/.#Bingo.rb	Fri Jul 25 15:47:50 2014 +0900
@@ -0,0 +1,1 @@
+c112124@roy.e.koeki-u.ac.jp.15104
\ No newline at end of file
--- a/minato2014/admin/backup/.htaccess	Fri Jul 25 15:47:07 2014 +0900
+++ b/minato2014/admin/backup/.htaccess	Fri Jul 25 15:47:50 2014 +0900
@@ -2,7 +2,7 @@
 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
+AuthUserFile /home/www/skip/minato2014/admin/.htpasswd
 AuthGroupFile /dev/null
 AuthName "ǧڥ"
 AuthType Basic
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/minato2014/admin/backup/.htaccess2	Fri Jul 25 15:47:50 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
--- a/minato2014/admin/chusen.rb	Fri Jul 25 15:47:07 2014 +0900
+++ b/minato2014/admin/chusen.rb	Fri Jul 25 15:47:50 2014 +0900
@@ -8,6 +8,9 @@
 c = CGI.new(:tag_maker => "html5", :accept_charest => "UTF-8")
 db = SQLite3::Database.new("../sql/stamp.sq3")
 
+add = ENV["REMOTE_ADDR"]
+
+if /^(172\.19\.5\.|172\.17\.54\.|172\.21\.90\.)|118.21.142.107/ =~ add
 check = c['check']
 
 printf("Content-type: text/html; charset=UTF-8\n\n")
@@ -19,8 +22,8 @@
 nt = t.hour*60 + t.min
 p nt
 p rank_sum
-if nt > 1230 && rank_sum == 0
-elsif nt > 1240 && rank_sum == 7
+if nt > 840 && rank_sum == 0
+elsif nt > 880 && rank_sum == 7
 else
   check = ""
   puts check
@@ -67,3 +70,17 @@
 else
   print"<p>抽選はまだ行いませんよ</p>\n"
 end
+else
+  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>
+<p>管理者用ページのため閲覧できません。</p>'
+end
+print'</body></html>'
--- a/minato2014/admin/delete.rb	Fri Jul 25 15:47:07 2014 +0900
+++ b/minato2014/admin/delete.rb	Fri Jul 25 15:47:50 2014 +0900
@@ -5,8 +5,13 @@
 require 'cgi'
 
 db = SQLite3::Database.new("../sql/stamp.sq3")
+c = CGI.new(:accept_charaset => "UTF-8")
 
-c = CGI.new(:accept_charaset => "UTF-8")
+add = ENV["REMOTE_ADDR"]
+
+printf("Content-type: text/html; charset=UTF-8\n\n")
+
+if /^(172\.19\.5\.|172\.17\.54\.|172\.21\.90\.)|118.21.142.107/ =~ add
 check = c['check']
 if check == "OK"
   begin
@@ -20,8 +25,6 @@
   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>
@@ -34,3 +37,15 @@
 <p></p>
 </body></html>
 ',text
+
+else  
+  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>
+<p>管理者用ページのため閲覧できません。</p>'
+end
--- a/minato2014/admin/etsuran.rb	Fri Jul 25 15:47:07 2014 +0900
+++ b/minato2014/admin/etsuran.rb	Fri Jul 25 15:47:50 2014 +0900
@@ -8,6 +8,9 @@
 
 c = CGI.new(:accept_charaset => "UTF-8")
 
+add = ENV["REMOTE_ADDR"]
+
+if /^(172\.19\.5\.|172\.17\.54\.|172\.21\.90\.)|118.21.142.107/ =~ add
 rank = c["rank"]
 flag = 0
 text = "<p>登録者一覧を表示します</p>\n"
@@ -32,7 +35,7 @@
 tml4/strict.dtd">
 <html>
 <head>
-<meta http-equiv="refresh" content="5;http://roy.e.koeki-u.ac.jp/~c112124/web/minato2014/admin/etsuran.rb">
+<meta http-equiv="refresh" content="5;http://skip.koeki-prj.org/minato2014/admin/etsuran.rb">
 <title>Delete table</title>
 <link rel="stylesheet" type="text/css" href="design.css">
 </head>
@@ -64,5 +67,18 @@
   end
  print"</table></marquee>"
 end
+else
+  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>
+<p>管理者用ページのため閲覧できません。</p>'
+end
 
 print'</body></html>'
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/minato2014/env.rb	Fri Jul 25 15:47:50 2014 +0900
@@ -0,0 +1,23 @@
+#!/usr/bin/env ruby
+#coding:euc-jp
+
+
+
+print "Content-type: text/html\n\n"
+print "<html>
+    <head>
+    <title>Ķѿ</title>
+    </head>
+    <body>
+    <table align=\"center\" border=\"1\" bordercolor=\"#000099\" cellspacing=\"0\">
+    <caption>Ķѿ</caption>"
+
+ENV.each { |k,v|
+#    v = v.gsub(/\w/, "*")                    #ץΤɽʤιԤƤ
+    print "<tr><td>#{k}</td><td>#{v}</td></tr>\n"
+}
+
+print"</table>
+    </body>
+    </html>"
+

yatex.org