-- vim:set ft=lua: dofile(mg.script_name:gsub('[^\\/]*$','')..'util.lua') ct=CreateContentBuilder(GZIP_THRESHOLD_BYTE) ct:Append(DOCTYPE_HTML4_STRICT..[=[
]=]..DefaultHeadContents()..[=[

# 設定/録画アプリ(EpgDataCap_Bon)

]=]) appIni='EpgDataCap_Bon.ini' post=AssertPost() if post and not ALLOW_SETTING then post=nil ct:Append('
変更は許可されていません
\n') end if post then edcb.WritePrivateProfile('SET','AllService',GetVarInt(post,'allService')==1,appIni) edcb.WritePrivateProfile('SET','Scramble',GetVarInt(post,'scramble')==1,appIni) edcb.WritePrivateProfile('SET','EMM',GetVarInt(post,'emm')==1,appIni) edcb.WritePrivateProfile('SET','Caption',GetVarInt(post,'enableCaption')==1,appIni) edcb.WritePrivateProfile('SET','Data',GetVarInt(post,'enableData')==1,appIni) edcb.WritePrivateProfile('SET','OverWrite',GetVarInt(post,'overWrite')==1,appIni) edcb.WritePrivateProfile('SET','DropSaveThresh',GetVarInt(post,'dropSaveThresh',-1) or 0,appIni) edcb.WritePrivateProfile('SET','ScrambleSaveThresh',GetVarInt(post,'scrambleSaveThresh',-1) or -1,appIni) edcb.WritePrivateProfile('SET','NoLogScramble',GetVarInt(post,'noLogScramble')==1,appIni) edcb.WritePrivateProfile('SET','RecFileName',(mg.get_var(post,'recFileName') or ''):gsub('%c',''),appIni) if WIN32 then edcb.WritePrivateProfile('SET','OpenLast',GetVarInt(post,'openLast')==1,appIni) edcb.WritePrivateProfile('SET','DropLogAsUtf8',GetVarInt(post,'dropLogAsUtf8')==1,appIni) end edcb.WritePrivateProfile('SET','SaveDebugLog',GetVarInt(post,'saveDebugLog')==1,appIni) --設定的には多値なので、すでに有効な場合は値を維持する traceLevel=GetVarInt(post,'traceBonDriverLevel')==1 and 2 or 0 if traceLevel==0 or edcb.GetPrivateProfile('SET','TraceBonDriverLevel',0,appIni)=='0' then edcb.WritePrivateProfile('SET','TraceBonDriverLevel',traceLevel,appIni) end edcb.WritePrivateProfile('SET','TsBuffMaxCount',GetVarInt(post,'tsBuffMaxCount',0) or 5000,appIni) edcb.WritePrivateProfile('SET','WriteBuffMaxCount',GetVarInt(post,'writeBuffMaxCount',1) or -1,appIni) edcb.WritePrivateProfile('SET','EpgCapBackBSBasicOnly',GetVarInt(post,'epgCapBackBSBasic')==1,appIni) edcb.WritePrivateProfile('SET','EpgCapBackCS1BasicOnly',GetVarInt(post,'epgCapBackCS1Basic')==1,appIni) edcb.WritePrivateProfile('SET','EpgCapBackCS2BasicOnly',GetVarInt(post,'epgCapBackCS2Basic')==1,appIni) edcb.WritePrivateProfile('SET','EpgCapBackCS3BasicOnly',GetVarInt(post,'epgCapBackCS3Basic')==1,appIni) edcb.WritePrivateProfile('SET','EpgCapLive',GetVarInt(post,'epgCapLive')==1,appIni) edcb.WritePrivateProfile('SET','EpgCapRec',GetVarInt(post,'epgCapRec')==1,appIni) edcb.WritePrivateProfile('SET','ParseEpgPostProcess',GetVarInt(post,'parseEpgPostProcess')==1,appIni) edcb.WritePrivateProfile('SET','EpgCapBackStartWaitSec',GetVarInt(post,'epgCapBackStartWaitSec',0) or 30,appIni) edcb.WritePrivateProfile('SET','SaveLogo',GetVarInt(post,'saveLogo')==1,appIni) edcb.WritePrivateProfile('SET','SaveLogoTypeFlags',GetVarInt(post,'saveLogoTypeFlags',0) or 32,appIni) ct:Append('
変更しました
\n') end edcb.htmlEscape=15 allService=edcb.GetPrivateProfile('SET','AllService',0,appIni)~='0' scramble=edcb.GetPrivateProfile('SET','Scramble',1,appIni)~='0' emm=edcb.GetPrivateProfile('SET','EMM',0,appIni)~='0' enableCaption=edcb.GetPrivateProfile('SET','Caption',1,appIni)~='0' enableData=edcb.GetPrivateProfile('SET','Data',0,appIni)~='0' overWrite=edcb.GetPrivateProfile('SET','OverWrite',0,appIni)~='0' dropSaveThresh=tonumber(edcb.GetPrivateProfile('SET','DropSaveThresh',0,appIni)) or 0 scrambleSaveThresh=tonumber(edcb.GetPrivateProfile('SET','ScrambleSaveThresh',-1,appIni)) or -1 noLogScramble=edcb.GetPrivateProfile('SET','NoLogScramble',0,appIni)~='0' recFileName=edcb.GetPrivateProfile('SET','RecFileName','$DYYYY$$DMM$$DDD$-$THH$$TMM$$TSS$-$ServiceName$.ts',appIni) openLast=WIN32 and edcb.GetPrivateProfile('SET','OpenLast',1,appIni)~='0' dropLogAsUtf8=not WIN32 or edcb.GetPrivateProfile('SET','DropLogAsUtf8',0,appIni)~='0' saveDebugLog=edcb.GetPrivateProfile('SET','SaveDebugLog',0,appIni)~='0' traceBonDriverLevel=edcb.GetPrivateProfile('SET','TraceBonDriverLevel',0,appIni)~='0' tsBuffMaxCount=tonumber(edcb.GetPrivateProfile('SET','TsBuffMaxCount',5000,appIni)) or 5000 --設定上の無制限は-1だがUIでは0を無制限とみなす writeBuffMaxCount=math.max(tonumber(edcb.GetPrivateProfile('SET','WriteBuffMaxCount',0,appIni)) or 0,0) epgCapBackBSBasic=edcb.GetPrivateProfile('SET','EpgCapBackBSBasicOnly',1,appIni)~='0' epgCapBackCS1Basic=edcb.GetPrivateProfile('SET','EpgCapBackCS1BasicOnly',1,appIni)~='0' epgCapBackCS2Basic=edcb.GetPrivateProfile('SET','EpgCapBackCS2BasicOnly',1,appIni)~='0' epgCapBackCS3Basic=edcb.GetPrivateProfile('SET','EpgCapBackCS3BasicOnly',0,appIni)~='0' epgCapLive=edcb.GetPrivateProfile('SET','EpgCapLive',1,appIni)~='0' epgCapRec=edcb.GetPrivateProfile('SET','EpgCapRec',1,appIni)~='0' parseEpgPostProcess=edcb.GetPrivateProfile('SET','ParseEpgPostProcess',0,appIni)~='0' epgCapBackStartWaitSec=tonumber(edcb.GetPrivateProfile('SET','EpgCapBackStartWaitSec',30,appIni)) or 30 saveLogo=edcb.GetPrivateProfile('SET','SaveLogo',0,appIni)~='0' saveLogoTypeFlags=tonumber(edcb.GetPrivateProfile('SET','SaveLogoTypeFlags',32,appIni)) or 32 ct:Append([=[
(*の項目はEpgTimerSrvの予約以外で起動したとき用)
全サービスを処理対象とする*
スクランブル解除処理を行う*
EMM処理を行う
字幕を含める*
データカルーセルを含める*
録画ファイル名が同一の場合に上書きをする*
次回起動時に終了前のサービスで起動する
ドロップ数が 以上または
スクランブル数が 以上でドロップログを出力する(-1で常に出力しない)
スクランブル値の変化をドロップログに記録しない
ドロップログをUTF-8で出力する
デバッグ出力をファイルに保存する
BonDriverについてのデバッグ出力を増やす
TS入力バッファ上限(47KiB単位)
ファイル出力バッファ上限(47KiB単位)(0で無制限)
録画ファイル名*
視聴中にEPGデータの取得を行う
録画中にEPGデータの取得を行う
基本情報のみ取得するネットワーク（視聴・録画中）
BS CS1 CS2 CS3
Ch切換、録画開始 秒後からEPG取得する
TS解析後にEPG取得する
ロゴデータを保存する
取得するロゴタイプ
]=]) ct:Finish() mg.write(ct:Pop(Response(200,'text/html','utf-8',ct.len,ct.gzip)..'\r\n'))