Mercurial > epgrec.yaz
annotate Reservation.class.php @ 83:f873e3251487
new: EPG取得の並列化テストを追加
author | yoneda <yoneda@recorder.localnet.mda.or.jp> |
---|---|
date | Sun, 28 Feb 2010 23:58:36 +0900 |
parents | 6eabffb0ccac |
children | 36ac7c416bd7 f6b909678e51 |
rev | line source |
---|---|
1 | 1 <?php |
2 include_once('config.php'); | |
3 include_once( INSTALL_PATH . "/DBRecord.class.php" ); | |
4 include_once( INSTALL_PATH . "/reclib.php" ); | |
39
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
5 include_once( INSTALL_PATH . "/Settings.class.php" ); |
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
6 |
1 | 7 |
8 // 篋膣 | |
9 | |
10 class Reservation { | |
11 | |
12 public static function simple( $program_id , $autorec = 0, $mode = 0) { | |
39
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
13 $settings = Settings::factory(); |
1 | 14 $rval = 0; |
15 try { | |
39
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
16 $prec = new DBRecord( PROGRAM_TBL, "id", $program_id ); |
1 | 17 |
18 $rval = self::custom( | |
19 $prec->starttime, | |
20 $prec->endtime, | |
21 $prec->channel_id, | |
22 $prec->title, | |
23 $prec->description, | |
24 $prec->category_id, | |
25 $program_id, | |
26 $autorec, | |
27 $mode ); | |
28 | |
29 } | |
30 catch( Exception $e ) { | |
31 throw $e; | |
32 } | |
33 return $rval; | |
34 } | |
35 | |
36 public static function custom( | |
37 $starttime, // 紮Datetime | |
38 $endtime, // 腟篋Datetime | |
39 $channel_id, // c潟ID | |
40 $title = "none", // 帥ゃ | |
41 $description = "none", // 网荀 | |
42 $category_id = 0, // 眼ID | |
43 $program_id = 0, // 腟ID | |
44 $autorec = 0, // 牙 | |
45 $mode = 0 // 牙祉≪若 | |
46 ) { | |
47 global $RECORD_MODE; | |
39
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
48 $settings = Settings::factory(); |
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
49 |
1 | 50 // 荐膊 |
51 $start_time = toTimestamp( $starttime ); | |
39
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
52 $end_time = toTimestamp( $endtime ) + $settings->extra_time; |
1 | 53 |
54 if( $start_time < (time() + PADDING_TIME + 10) ) { // 憜祉3絨鐚с紮腟 | |
55 $start_time = time() + PADDING_TIME + 10; // 牙脂紮310腱荐絎 | |
56 } | |
57 $at_start = $start_time - PADDING_TIME; | |
39
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
58 $sleep_time = PADDING_TIME - $settings->former_time; |
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
59 $rec_start = $start_time - $settings->former_time; |
1 | 60 |
61 // duration荐膊 | |
62 $duration = $end_time - $rec_start; | |
39
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
63 if( $duration < ($settings->former_time + 60) ) { // 60腱篁ヤ腟綣障 |
1 | 64 throw new Exception( "腟ゃゃ/腟c腟с" ); |
65 } | |
66 | |
67 $rrec = null; | |
68 try { | |
69 // 筝腟篋膣с | |
70 if( $program_id ) { | |
39
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
71 $num = DBRecord::countRecords( RESERVE_TBL, "WHERE program_id = '".$program_id."'" ); |
1 | 72 if( $num ) { |
73 throw new Exception("筝腟牙私膣障"); | |
74 } | |
75 } | |
76 | |
39
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
77 $crec = new DBRecord( CHANNEL_TBL, "id", $channel_id ); |
1 | 78 |
79 // √篋膣 = TUNER | |
39
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
80 $tuners = ($crec->type == "GR") ? $settings->gr_tuners : $settings->bs_tuners; |
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
81 $battings = DBRecord::countRecords( RESERVE_TBL, "WHERE complete = '0' ". |
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
82 "AND type = '".$crec->type."' ". |
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
83 "AND starttime < '".toDatetime($end_time) ."' ". |
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
84 "AND endtime > '".toDatetime($rec_start)."'" |
1 | 85 ); |
86 | |
87 if( $battings >= $tuners ) { | |
88 // 茲肴 | |
40 | 89 if( $settings->force_cont_rec == 1 ) { |
1 | 90 // 茹f純茲茯帥鴻 |
91 // 緇篋膣 | |
39
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
92 $nexts = DBRecord::countRecords( RESERVE_TBL, "WHERE complete = '0' ". |
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
93 "AND type = '".$crec->type."' ". |
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
94 "AND starttime = '".toDatetime($end_time - $settings->former_time)."'"); |
1 | 95 |
39
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
96 $prevs = DBRecord::countRecords( RESERVE_TBL, "WHERE complete = '0' ". |
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
97 "AND type = '".$crec->type."' ". |
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
98 "AND endtime = '".$starttime."'" ); |
1 | 99 |
100 // 緇綣ャ若惹違遺札筝茲茹f∞ | |
101 if( ($battings - $nexts - $prevs) >= $tuners ) | |
102 throw new Exception( "茲篋膣茹fс障" ); | |
103 | |
104 // 翫腟? | |
105 if( $nexts ) { | |
106 // 腟腟<c | |
39
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
107 $end_time = $end_time - $settings->former_time - $settings->rec_switch_time; |
1 | 108 $duration = $end_time - $rec_start; // duration荐膊 |
109 } | |
110 $battings -= $nexts; | |
111 | |
112 // 翫牙私膣荀篁 | |
39
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
113 $trecs = DBRecord::createRecords(RESERVE_TBL, "WHERE complete = '0' ". |
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
114 "AND type = '".$crec->type."' ". |
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
115 "AND endtime = '".$starttime."'" ); |
1 | 116 // 翫腟 |
117 for( $i = 0; $i < count($trecs) ; $i++ ) { | |
118 if( $battings < $tuners ) break; // 茹f腟篋? | |
119 // 篋膣篆罩c綽荀宴冴 | |
120 $prev_id = $trecs[$i]->id; | |
121 $prev_program_id = $trecs[$i]->program_id; | |
122 $prev_channel_id = $trecs[$i]->channel_id; | |
123 $prev_title = $trecs[$i]->title; | |
124 $prev_description = $trecs[$i]->description; | |
125 $prev_category_id = $trecs[$i]->category_id; | |
126 $prev_starttime = $trecs[$i]->starttime; | |
127 $prev_endtime = $trecs[$i]->endtime; | |
128 $prev_autorec = $trecs[$i]->autorec; | |
129 $prev_mode = $trecs[$i]->mode; | |
130 | |
131 $prev_start_time = toTimestamp($prev_starttime); | |
132 // 紮障c篋膣鐚 | |
39
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
133 if( $prev_start_time > (time() + PADDING_TIME + $settings->former_time) ) { |
1 | 134 // 紮祉祉 |
39
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
135 $prev_starttime = toDatetime( $prev_start_time + $settings->former_time ); |
1 | 136 // 腟<c |
39
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
137 $prev_endtime = toDatetime( toTimestamp($prev_endtime) - $settings->former_time - $settings->rec_switch_time ); |
1 | 138 |
139 // try鴻 | |
140 try { | |
141 // c篋膣羔 | |
142 self::cancel( $prev_id ); | |
143 // 篋膣 | |
144 self::custom( | |
145 $prev_starttime, // 紮Datetime | |
146 $prev_endtime, // 腟篋Datetime | |
147 $prev_channel_id, // c潟ID | |
148 $prev_title, // 帥ゃ | |
149 $prev_description, // 网荀 | |
150 $prev_category_id, // 眼ID | |
151 $prev_program_id, // 腟ID | |
152 $prev_autorec, // 牙 | |
153 $prev_mode ); | |
154 } | |
155 catch( Exception $e ) { | |
156 throw new Exception( "茲篋膣茹fс障" ); | |
157 } | |
158 } | |
159 else { | |
160 throw new Exception( "茲篋膣茹fс障" ); | |
161 } | |
162 $battings--; | |
163 } | |
164 if( $battings < 0 ) $battings = 0; | |
165 // ч茲茹f | |
166 } | |
167 else { | |
168 throw new Exception( "茲篋膣障" ); | |
169 } | |
170 } | |
171 // ャ若主 | |
172 $tuner = $battings; | |
173 | |
174 // 鴻durationс | |
39
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
175 if( $duration < ($settings->former_time + 60) ) { // 60腱篁ヤ腟綣障 |
1 | 176 throw new Exception( "腟ゃゃ/腟c腟с" ); |
177 } | |
178 | |
15
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
179 |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
180 // <ゃ |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
181 /* |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
182 %TITLE% 腟帥ゃ |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
183 %ST% 紮ユ鐚ex.200907201830) |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
184 %ET% 腟篋ユ |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
185 %TYPE% GR/BS |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
186 %CH% c潟 |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
187 %DOW% ワSun-Mon鐚 |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
188 %DOWJ% ワ-鐚 |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
189 %YEAR% 紮綛 |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
190 %MONTH% 紮 |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
191 %DAY% 紮 |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
192 %HOUR% 紮 |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
193 %MIN% 紮 |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
194 %SEC% 紮腱 |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
195 %DURATION% 牙紙鐚腱鐚 |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
196 */ |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
197 |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
198 $day_of_week = array( "","","","羂","","","" ); |
39
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
199 $filename = $settings->filename_format; |
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
200 |
15
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
201 // √絖_ |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
202 $fn_title = mb_ereg_replace("[ \./\*:<>\?\\|()\'\"&]","_", trim($title) ); |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
203 |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
204 // %TITLE% |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
205 $filename = str_replace("%TITLE%", $fn_title, $filename); |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
206 // %ST% 紮ユ |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
207 $filename = str_replace("%ST%",date("YmdHis", $start_time), $filename ); |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
208 // %ET% 腟篋ユ |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
209 $filename = str_replace("%ET%",date("YmdHis", $end_time), $filename ); |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
210 // %TYPE% GR/BS |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
211 $filename = str_replace("%TYPE%",$crec->type, $filename ); |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
212 // %CH% c潟 |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
213 $filename = str_replace("%CH%","".$crec->channel, $filename ); |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
214 // %DOW% ワSun-Mon鐚 |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
215 $filename = str_replace("%DOW%",date("D", $start_time), $filename ); |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
216 // %DOWJ% ワ-鐚 |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
217 $filename = str_replace("%DOWJ%",$day_of_week[(int)date("w", $start_time)], $filename ); |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
218 // %YEAR% 紮綛 |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
219 $filename = str_replace("%YEAR%",date("Y", $start_time), $filename ); |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
220 // %MONTH% 紮 |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
221 $filename = str_replace("%MONTH%",date("m", $start_time), $filename ); |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
222 // %DAY% 紮 |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
223 $filename = str_replace("%DAY%",date("d", $start_time), $filename ); |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
224 // %HOUR% 紮 |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
225 $filename = str_replace("%HOUR%",date("H", $start_time), $filename ); |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
226 // %MIN% 紮 |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
227 $filename = str_replace("%MIN%",date("i", $start_time), $filename ); |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
228 // %SEC% 紮腱 |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
229 $filename = str_replace("%SEC%",date("s", $start_time), $filename ); |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
230 // %DURATION% 牙紙鐚腱鐚 |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
231 $filename = str_replace("%DURATION%","".$duration, $filename ); |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
232 |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
233 // 絖潟若紊 |
76
69e0dabc765a
fixed: Reservation.class.php
Sushi-k <epgrec@park.mda.or.jp>
parents:
56
diff
changeset
|
234 if( defined("FILESYSTEM_ENCODING") ) { |
15
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
235 $filename = mb_convert_encoding( $filename, FILESYSTEM_ENCODING, "UTF-8" ); |
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
236 } |
76
69e0dabc765a
fixed: Reservation.class.php
Sushi-k <epgrec@park.mda.or.jp>
parents:
56
diff
changeset
|
237 $filename .= $RECORD_MODE["$mode"]['suffix']; |
47 | 238 $thumbname = $filename.".jpg"; |
15
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
239 |
56
be9e4520cfec
change: GEN_THUMBNAIL
yoneda <yoneda@recorder.localnet.mda.or.jp>
parents:
48
diff
changeset
|
240 // 泣若 |
be9e4520cfec
change: GEN_THUMBNAIL
yoneda <yoneda@recorder.localnet.mda.or.jp>
parents:
48
diff
changeset
|
241 $gen_thumbnail = INSTALL_PATH."/gen-thumbnail.sh"; |
be9e4520cfec
change: GEN_THUMBNAIL
yoneda <yoneda@recorder.localnet.mda.or.jp>
parents:
48
diff
changeset
|
242 if( defined("GEN_THUMBNAIL") ) |
be9e4520cfec
change: GEN_THUMBNAIL
yoneda <yoneda@recorder.localnet.mda.or.jp>
parents:
48
diff
changeset
|
243 $gen_thumbnail = GEN_THUMBNAIL; |
be9e4520cfec
change: GEN_THUMBNAIL
yoneda <yoneda@recorder.localnet.mda.or.jp>
parents:
48
diff
changeset
|
244 |
15
cbbddf99d1cd
added: filename customize function
Sushi-k <epgrec@park.mda.or.jp>
parents:
8
diff
changeset
|
245 // <ゃ腟篋 |
1 | 246 |
247 // 篋膣潟若 | |
39
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
248 $rrec = new DBRecord( RESERVE_TBL ); |
1 | 249 $rrec->channel_disc = $crec->channel_disc; |
250 $rrec->channel_id = $crec->id; | |
251 $rrec->program_id = $program_id; | |
252 $rrec->type = $crec->type; | |
253 $rrec->channel = $crec->channel; | |
254 $rrec->title = $title; | |
255 $rrec->description = $description; | |
256 $rrec->category_id = $category_id; | |
257 $rrec->starttime = toDatetime( $rec_start ); | |
258 $rrec->endtime = toDatetime( $end_time ); | |
259 $rrec->path = $filename; | |
260 $rrec->autorec = $autorec; | |
261 $rrec->mode = $mode; | |
262 $rrec->reserve_disc = md5( $crec->channel_disc . toDatetime( $start_time ). toDatetime( $end_time ) ); | |
263 | |
264 // 篋膣絎茵 | |
39
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
265 $cmdline = $settings->at." ".date("H:i m/d/Y", $at_start); |
1 | 266 $descriptor = array( 0 => array( "pipe", "r" ), |
267 1 => array( "pipe", "w" ), | |
268 2 => array( "pipe", "w" ), | |
269 ); | |
270 $env = array( "CHANNEL" => $crec->channel, | |
271 "DURATION" => $duration, | |
39
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
272 "OUTPUT" => INSTALL_PATH.$settings->spool."/".$filename, |
1 | 273 "TYPE" => $crec->type, |
274 "TUNER" => $tuner, | |
275 "MODE" => $mode, | |
47 | 276 "THUMB" => INSTALL_PATH.$settings->thumbs."/".$thumbname, |
277 "FORMER" => "".$settings->former_time, | |
278 "FFMPEG" => "".$settings->ffmpeg, | |
79
6eabffb0ccac
add SID: Reservation.class.php
Sushi-k <epgrec@park.mda.or.jp>
parents:
76
diff
changeset
|
279 "SID" => $crec->sid, |
1 | 280 ); |
281 | |
282 // ATт膣 | |
39
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
283 $process = proc_open( $cmdline , $descriptor, $pipes, INSTALL_PATH.$settings->spool, $env ); |
1 | 284 if( is_resource( $process ) ) { |
39
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
285 fwrite($pipes[0], $settings->sleep." ".$sleep_time."\n" ); |
1 | 286 fwrite($pipes[0], DO_RECORD . "\n" ); |
287 fwrite($pipes[0], COMPLETE_CMD." ".$rrec->id."\n" ); | |
48 | 288 if( $settings->use_thumbs == 1 ) { |
56
be9e4520cfec
change: GEN_THUMBNAIL
yoneda <yoneda@recorder.localnet.mda.or.jp>
parents:
48
diff
changeset
|
289 fwrite($pipes[0], $gen_thumbnail."\n" ); |
1 | 290 } |
291 fclose($pipes[0]); | |
292 // 罔羣若 | |
293 $rstring = stream_get_contents( $pipes[2]); | |
294 | |
295 fclose( $pipes[2] ); | |
296 proc_close( $process ); | |
297 } | |
298 else { | |
299 $rrec->delete(); | |
300 throw new Exception("AT絎茵"); | |
301 } | |
302 // job垩冴 | |
303 $rarr = array(); | |
304 $tok = strtok( $rstring, " \n" ); | |
305 while( $tok !== false ) { | |
306 array_push( $rarr, $tok ); | |
307 $tok = strtok( " \n" ); | |
308 } | |
309 $key = array_search("job", $rarr); | |
310 if( $key !== false ) { | |
311 if( is_numeric( $rarr[$key+1]) ) { | |
312 $rrec->job = $rarr[$key+1]; | |
313 return $rrec->job; // | |
314 } | |
315 } | |
316 // | |
317 $rrec->delete(); | |
318 throw new Exception( "job垩緇紊掩" ); | |
319 } | |
320 catch( Exception $e ) { | |
321 if( $rrec != null ) { | |
322 if( $rrec->id ) { | |
323 // 篋膣羔 | |
324 $rrec->delete(); | |
325 } | |
326 } | |
327 throw $e; | |
328 } | |
329 } | |
330 // custom 腟篋 | |
331 | |
332 // 羔 | |
333 public static function cancel( $reserve_id = 0, $program_id = 0 ) { | |
39
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
334 $settings = Settings::factory(); |
1 | 335 $rec = null; |
336 | |
337 try { | |
338 if( $reserve_id ) { | |
39
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
339 $rec = new DBRecord( RESERVE_TBL, "id" , $reserve_id ); |
1 | 340 } |
341 else if( $program_id ) { | |
39
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
342 $rec = new DBRecord( RESERVE_TBL, "program_id" , $program_id ); |
1 | 343 } |
344 if( $rec == null ) { | |
345 throw new Exception("ID絎≦鴻с"); | |
346 } | |
347 if( ! $rec->complete ) { | |
348 // 絎茵篋膣с | |
39
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
349 if( toTimestamp($rec->starttime) < (time() + PADDING_TIME + $settings->former_time) ) |
1 | 350 throw new Exception("サ牙私膣с"); |
39
8965ef108821
change: modify all scripts for web base setting.
Sushi-k <epgrec@park.mda.or.jp>
parents:
15
diff
changeset
|
351 exec( $settings->atrm . " " . $rec->job ); |
1 | 352 } |
353 $rec->delete(); | |
354 } | |
355 catch( Exception $e ) { | |
356 throw $e; | |
357 } | |
358 } | |
359 } | |
48 | 360 ?> |