root/trunk/install/php/m.php

リビジョン 97, 8.6 kB (コミッタ: sorshi, コミット時期: 16 年 前)

radiko録音対応

Line 
1 <?php
2 /*
3  Anime recording system foltia
4  http://www.dcc-jpl.com/soft/foltia/
5
6 m.php
7
8 目的
9 番組表を用いない完全手動録画予約を実現します。
10 ケータイなどで予約する場合もここを開くとよさそうです。
11
12 引数
13 startdate:録画開始日 (ex.20051207)
14 starttime:録画開始時刻 (ex.2304)
15 lengthmin:録画尺分
16 recstid:録画局ID
17 pname:番組名
18
19  DCC-JPL Japan/foltia project
20
21 */
22
23 include("./foltialib.php");
24 $con = m_connect();
25 if ($useenvironmentpolicy == 1){
26     if (!isset($_SERVER['PHP_AUTH_USER'])) {
27         header("WWW-Authenticate: Basic realm=\"foltia\"");
28         header("HTTP/1.0 401 Unauthorized");
29         redirectlogin();
30         exit;
31     } else {
32     login($con,$_SERVER['PHP_AUTH_USER'],$_SERVER['PHP_AUTH_PW']);
33     }
34 }//end if login
35
36 $now = date("YmdHi");   
37 $today = date("Ymd");
38 $nowdate = date("Hi",(mktime(date("G"),date("i")+8,date("s"),date("m"),date("d"),date("Y"))));
39 $errflag = 0;
40 $pname = "手動録画";
41
42 function printtitle(){
43 print "<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.01//EN\" \"http://www.w3.org/TR/html4/strict.dtd\">
44 <html lang=\"ja\">
45 <head>
46 <meta http-equiv=\"Content-Type\" content=\"text/html; charset=EUC-JP\">
47 <meta http-equiv=\"Content-Style-Type\" content=\"text/css\">
48 <link rel=\"stylesheet\" type=\"text/css\" href=\"graytable.css\"> ";
49
50 print "<title>foltia:番組手動予約</title>
51 </head>";
52 }//end function printtitle()
53
54 printtitle();
55 ?>
56 <body BGCOLOR="#ffffff" TEXT="#494949" LINK="#0047ff" VLINK="#000000" ALINK="#c6edff" >
57 <div align="center">
58 <?php
59 printhtmlpageheader();
60 ?>
61 </div>
62 <p align="left"><font color="#494949" size="6">
63 番組手動予約
64 </font></p>
65 <hr size="4">
66 <?php
67 //値取得
68 $startdate = getgetnumform(startdate);
69 $starttime = getgetnumform(starttime);
70
71 if (($startdate == "") || ($starttime == "")){
72     print "<p align=\"left\">全項目手動指定で予約します。</p>\n";
73 }else{
74
75 $lengthmin = getgetnumform(lengthmin);
76 $recstid = getgetnumform(recstid);
77 $pname = getgetform(pname);
78 //$usedigital = getgetnumform(usedigital);
79
80 //確認
81 $startdatetime = "$startdate"."$starttime";
82 if (foldatevalidation($startdatetime)){
83 //print "valid";
84 }else{
85     $errflag = 1;
86     $errmsg = "日付が不正です。";
87 }
88 if ($lengthmin < 361){
89 //valid
90 }else{
91     $errflag = 2;
92     $errmsg = "録画時間は360分で区切ってください。";
93 }
94 //局確認
95 if ($recstid != ""){
96 $query = "
97 SELECT stationname 
98 FROM foltia_station
99 WHERE stationid = ? ";
100 //    $stationvalid = m_query($con, $query, "DBクエリに失敗しました");
101     $stationvalid = sql_query($con, $query, "DBクエリに失敗しました",array($recstid));
102         $recstationname = $stationvalid->fetch();
103         if (! $recstationname) {
104         $errflag = 3;
105         $errmsg = "放送局設定が異常です。";
106     }
107 }
108 //デジタル優先
109 /*if ($usedigital == 1){
110 }else{
111     $usedigital = 0;
112 }
113 */
114 //正しければ
115 if ($errflag == 0){
116 //重複があるか?
117 //未チェック
118
119 //デモモードじゃなかったら書き込み
120 $enddatetime = calcendtime($startdatetime,$lengthmin);
121
122 //時刻検査
123 if (($startdatetime > $now ) && ($enddatetime > $now ) && ($enddatetime  > $startdatetime ) ){
124
125 //min pidを探す
126 $query = "SELECT min(pid) FROM  foltia_subtitle ";
127 //    $rs = m_query($con, $query, "DBクエリに失敗しました");
128     $rs = sql_query($con, $query, "DBクエリに失敗しました");
129     $rowdata = $rs->fetch();
130     if (! $rowdata) {
131         $insertpid = -1 ;
132     }else{
133         if ($rowdata[0] > 0) {
134             $insertpid = -1 ;
135         }else{
136             $insertpid = $rowdata[0];
137             $insertpid-- ;
138         }
139     }
140 // next 話数を探す
141 $query = "SELECT max(countno) FROM  foltia_subtitle WHERE tid = 0";
142 //    $rs = m_query($con, $query, "DBクエリに失敗しました");
143     $rs = sql_query($con, $query, "DBクエリに失敗しました");
144             $rowdata = $rs->fetch();
145             if (! $rowdata) {
146     $nextcno = 1 ;
147     }else{
148     $nextcno = $rowdata[0];
149     $nextcno++ ;
150     }
151
152 //INSERT
153 if ($demomode){
154 }else{
155     $userclass = getuserclass($con);
156     if ( $userclass <= 2){
157     $memberid = getmymemberid($con);
158     
159     $query = "
160     insert into foltia_subtitle  (pid ,tid ,stationid , countno ,subtitle ,
161 startdatetime ,enddatetime ,startoffset , lengthmin , epgaddedby ) 
162     values ( ?,'0',?,?,?,?,?,'0',?,?)";
163     
164 //        $rs = m_query($con, $query, "DBクエリに失敗しました");
165 //print "【DEBUG】$insertpid,$recstid,$nextcno,$pname,$startdatetime,$enddatetime ,$lengthmin,$memberid <br>\n";
166         $rs = sql_query($con, $query, "DBクエリに失敗しました",array($insertpid,$recstid,$nextcno,$pname,$startdatetime,$enddatetime ,$lengthmin,$memberid));
167     
168     //addatq.pl
169     //キュー入れプログラムをキック
170     //引数　TID チャンネルID
171     //echo("$toolpath/perl/addatq.pl $tid $station");
172     exec("$toolpath/perl/addatq.pl 0 0");
173     $oserr = system("$toolpath/perl/addatq.pl 0 0");
174     //---------------------------------------------------
175             if ($oserr){
176             print "[DEBUG]$oserr 「$toolpath/perl/addatq.pl 0 0」<br>\n";
177         }else{
178             print "[DEBUG]exec addatq.pl false 「$toolpath/perl/addatq.pl 0 0」<br>\n";
179             
180             $oserr = system("$toolpath/perl/perltestscript.pl");
181             if ($oserr){
182                 print "[DEBUG]exec perltestscript.pl $oserr<br>\n";
183             }else{
184                 print "[DEBUG]exec perltestscript.pl false <br>\n";
185             }
186             
187         }
188     //-----------------------------------------------------
189     }else{
190         print "EPG予約を行う権限がありません。";
191     }// end if $userclass <= 2
192 }//end if demomode
193
194 print "下記予約を完了いたしました。<br>";
195 //結果表示
196 print "録画開始:";
197 echo foldate2print($startdatetime);
198 print "<br />
199 録画終了:";
200 echo foldate2print($enddatetime);
201 print "<br />
202 録画尺: $lengthmin 分<br />
203 録画局:$recstationname[0]<br />
204 番組名:$pname<br />
205 ";
206 exit();
207 }else{
208 print "時刻が不正なために予約できませんでした。 <br>";
209
210 }
211
212
213 }else{
214     print "入力項目が正しくなさそうです。$errmsg<br />\n";
215 }
216
217 }//　初回表示かデータ処理か
218 ?>
219 <form id="record" name="record" method="get" action="./m.php" autocomplete="off">
220   <p>放送日:
221     <input name="startdate" type="text" id="startdate" size="9" value="<?=$startdate?>" />
222   年月日 Ex.<?=$today?></p>
223   <p>録画開始時刻:
224     <input name="starttime" type="text" id="starttime" size="5" value="<?=$starttime?>" />
225   時分 Ex.<?=$nowdate?>  </p>
226   <p>
227     録画尺:
228       <input name="lengthmin" type="text" id="lengthmin" size="4" value="<?=$lengthmin?>"/>
229     分 (最長360分) </p>
230
231   <p>録画局:
232 <?php
233 $query = "
234 SELECT stationid as x, stationname, stationrecch, digitalch
235 FROM foltia_station
236 WHERE stationrecch > 0
237 UNION
238 SELECT DISTINCT  stationid,stationname,stationrecch ,digitalch
239 FROM  foltia_station
240 WHERE digitalch > 0
241 UNION
242 SELECT DISTINCT  stationid,stationname,stationrecch ,digitalch
243 FROM  foltia_station
244 WHERE stationrecch = -2
245 ORDER BY x ASC";
246
247 $stations = sql_query($con, $query, "DBクエリに失敗しました");
248 $rowdata = $stations->fetch();
249
250 if ($rowdata) {
251                do {
252             if ($recstid == $rowdata[0]){
253             print " <input name=\"recstid\" type=\"radio\" value=\"$rowdata[0]\" checked />  $rowdata[1] ($rowdata[2]ch / $rowdata[3]ch)　\n";
254             }elseif( $rowdata[2] == -2){
255             print " <input name=\"recstid\" type=\"radio\" value=\"$rowdata[0]\" checked />  $rowdata[1] (<!-- $rowdata[2]ch / $rowdata[3]ch -->RADIKO)　\n";
256             }else{
257                 print " <input name=\"recstid\" type=\"radio\" value=\"$rowdata[0]\" />  $rowdata[1] ($rowdata[2]ch / $rowdata[3]ch)　\n";
258             }
259                } while ($rowdata = $stations->fetch());
260 }else{
261 print "放送局データベースが正しくセットアップされていません。録画可能局がありません";
262 }
263 //外部入力チャンネル
264 $query = "
265 SELECT stationid as x ,stationname,stationrecch
266 FROM foltia_station
267 WHERE stationrecch > -2 AND stationrecch < 1
268 ORDER BY x ASC";
269
270 //    $stations = m_query($con, $query, "DBクエリに失敗しました");
271     $stations = sql_query($con, $query, "DBクエリに失敗しました");
272 $rowdata = $stations->fetch();   
273 if ($rowdata) {
274     do {
275         if ($rowdata[0] != 0){
276             if ($recstid == $rowdata[0]){
277             print " <input name=\"recstid\" type=\"radio\" value=\"$rowdata[0]\" checked />  $rowdata[1]　\n";
278             }else{
279                 print " <input name=\"recstid\" type=\"radio\" value=\"$rowdata[0]\" />  $rowdata[1]　\n";
280             }
281
282         }
283     } while ($rowdata = $stations->fetch());
284 }
285 /*
286 print "<p>デジタル録画を優先:";
287
288 if ($usedigital == 1){
289 print "<input name="useditial" type="radio" value="1" selected />  する　
290 <input name="useditial" type="radio" value="0" />  しない　
291 ";
292 }else{
293 print "<input name="useditial" type="radio" value="1" />  する　
294 <input name="useditial" type="radio" value="0" selected />  しない　
295 ";
296 }
297 */
298 ?>
299   <p>番組名:
300     <input name="pname" type="text" id="pname" value="<?=$pname ?>" />
301   </p>
302 <!-- <p  style='background-color: #DDDDFF'>
303 繰り返し指定-毎週以下の曜日に録画:
304 <input name="weeklyloop" type="radio" value="128" />  日曜　
305 <input name="weeklyloop" type="radio" value="64" />  月曜　
306 <input name="weeklyloop" type="radio" value="32" />  火曜　
307 <input name="weeklyloop" type="radio" value="16" />  水曜　
308 <input name="weeklyloop" type="radio" value="8" />  木曜　
309 <input name="weeklyloop" type="radio" value="4" />  金曜　
310 <input name="weeklyloop" type="radio" value="2" />  土曜　
311  </p>
312  -->
313 <input type="submit" value="予約">　
314 </form>
315
316 </body>
317 </html>
318
Note: リポジトリブラウザについてのヘルプは TracBrowser を参照してください。
track feed