hakon at alstadheim
Jul 4, 2012, 5:53 PM
Post #10 of 10
(521 views)
Permalink
|
On 04. juli 2012 12:32, James Booth wrote:
> On Wed, 04 Jul 2012 22:06:46 David Moore wrote:
>> On 04/07/12 21:35, James Booth wrote:
>>> Thanks for the suggestion. It doesn't appear that anything has changed in
>>> the channel setup. I just did a restart of mythbackend, then ran
>>> mythfilldatabase, and now everything looks clean, but my recording rules
>>> still will not work.
>>>
>>> I have been playing with mhegepgsnoop for the last few weeks (to fill in
>>> data for channels not coming through with tv_grab_nz.py) and it seemed to
>>> be working fine, but wondering if maybe that could be causing an issue?
>> It would seem unlikely since all it does it generate an xmltv file which
>> mythfilldatabase processes into the EPG. I assume your EPG looks ok now?
>>
> Something is still not right - EPG data looks good and recording rules now
> working, but mythweb EPG is still showing periods and "No Data" for some
> channels.
>
I have experienced gremlins in the programme database screwing up new
recordings. Long time with no problems now, but I still have the three
files that are pasted below running. If you run the last one it should
give you a nice log in /var/log/mythconveg-gremlins.log of what was
wrong, if it finds anything. If it does find something, you could
install the three files and see if the problem reoccurs. I was running a
card that apparently had a dodgy driver wich had some error correction
disabled. This has apparently been fixt in later kernels and myth is no
longger giving me corrupt EIT data.
/etc/cron.hourly/fix-gremlins: -------------------------
#!/bin/sh
/usr/local/bin/mythconverg-baddies
if ! cmp /var/log/mythconveg-gremlins.log /root/mythconveg-gremlins.log;
then
cat /var/log/mythconveg-gremlins.log
exit 1
else
exit 0
#
-------------
/etc/cron.daily/fix-gremlins:------------------------------
#!/bin/sh
/usr/local/bin/mythconverg-baddies
if ! cmp /var/log/mythconveg-gremlins.log /root/mythconveg-gremlins.log;
then
cat /var/log/mythconveg-gremlins.log
cp /var/log/mythconveg-gremlins.log /root/mythconveg-gremlins.log
exit 1
else
exit 0
-----------
/usr/local/bin/mythconverg-baddies:-------------------
#!/bin/bash
exec > /var/log/mythconveg-gremlins.log
## program.programid
echo before, program.programid:
echo 'select chanid,starttime,programid from program;' \
|mysql -h garbo -umythtv -pmythtv mythconverg \
| perl -lne 'chomp;print $_ if m([\x00-\x08\x0a-\x1f])'
echo 'select chanid,starttime,programid from program;' \
|mysql -h garbo -umythtv -pmythtv mythconverg \
| perl -lne 'chomp;print $_ if m([\x00-\x08\x0a-\x1f])' \
| perl -ane '{print "update program set programid = " . chr(39) .
chr(39). " where chanid = " . chr(39). "$F[0]" . chr(39). " and
starttime = " . chr(39). "$F[1] $F[2]" . chr(39). "; \n"}'
echo 'select chanid,starttime,programid from program;' \
|mysql -h garbo -umythtv -pmythtv mythconverg \
| perl -lne 'chomp;print $_ if m([\x00-\x08\x0a-\x1f])' \
| perl -ane '{print "update program set programid = " . chr(39) .
chr(39). " where chanid = " . chr(39). "$F[0]" . chr(39). " and
starttime = " . chr(39). "$F[1] $F[2]" . chr(39). "; \n"}' |mysql -h
garbo -umythtv -pmythtv mythconverg
echo after:
echo 'select chanid,starttime,programid from program;' \
|mysql -h garbo -umythtv -pmythtv mythconverg \
| perl -lne 'chomp;print $_ if m([\x00-\x08\x0a-\x1f])'
## recorded.programid
echo before, recorded.programid:
echo 'select chanid,starttime,programid from recorded;' \
|mysql -h garbo -umythtv -pmythtv mythconverg \
| perl -lne 'chomp;print $_ if m([\x00-\x08\x0a-\x1f])'
echo 'select chanid,starttime,programid from recorded;' \
|mysql -h garbo -umythtv -pmythtv mythconverg \
| perl -lne 'chomp;print $_ if m([\x00-\x08\x0a-\x1f])' \
| perl -ane '{print "update recorded set programid = " . chr(39) .
chr(39). " where chanid = " . chr(39). "$F[0]" . chr(39). " and
starttime = " . chr(39). "$F[1] $F[2]" . chr(39). "; \n"}'
echo 'select chanid,starttime,programid from recorded;' \
|mysql -h garbo -umythtv -pmythtv mythconverg \
| perl -lne 'chomp;print $_ if m([\x00-\x08\x0a-\x1f])' \
| perl -ane '{print "update recorded set programid = " . chr(39) .
chr(39). " where chanid = " . chr(39). "$F[0]" . chr(39). " and
starttime = " . chr(39). "$F[1] $F[2]" . chr(39). "; \n"}' |mysql -h
garbo -umythtv -pmythtv mythconverg
echo after:
echo 'select chanid,starttime,programid from recorded;' \
|mysql -h garbo -umythtv -pmythtv mythconverg \
| perl -lne 'chomp;print $_ if m([\x00-\x08\x0a-\x1f])' \
| perl -ane '{print "update recorded set programid = " . chr(39) .
chr(39). " where chanid = " . chr(39). "$F[0]" . chr(39). " and
starttime = " . chr(39). "$F[1] $F[2]" . chr(39). "; \n"}'
## program.seriesid
echo before, program.seriesid:
echo 'select chanid,starttime,seriesid from program;' \
|mysql -h garbo -umythtv -pmythtv mythconverg \
| perl -lne 'chomp;print $_ if m([\x00-\x08\x0a-\x1f])'
echo 'select chanid,starttime,seriesid from program;' \
|mysql -h garbo -umythtv -pmythtv mythconverg \
| perl -lne 'chomp;print $_ if m([\x00-\x08\x0a-\x1f])' \
| perl -ane '{print "update program set seriesid = " . chr(39) .
chr(39). " where chanid = " . chr(39). "$F[0]" . chr(39). " and
starttime = " . chr(39). "$F[1] $F[2]" . chr(39). "; \n"}'
echo 'select chanid,starttime,seriesid from program;' \
|mysql -h garbo -umythtv -pmythtv mythconverg \
| perl -lne 'chomp;print $_ if m([\x00-\x08\x0a-\x1f])' \
| perl -ane '{print "update program set seriesid = " . chr(39) .
chr(39). " where chanid = " . chr(39). "$F[0]" . chr(39). " and
starttime = " . chr(39). "$F[1] $F[2]" . chr(39). "; \n"}' |mysql -h
garbo -umythtv -pmythtv mythconverg
echo after:
echo 'select chanid,starttime,seriesid from program;' \
|mysql -h garbo -umythtv -pmythtv mythconverg \
| perl -lne 'chomp;print $_ if m([\x00-\x08\x0a-\x1f])' \
| perl -ane '{print "update program set seriesid = " . chr(39) .
chr(39). " where chanid = " . chr(39). "$F[0]" . chr(39). " and
starttime = " . chr(39). "$F[1] $F[2]" . chr(39). "; \n"}'
## recorded.seriesid
echo before, recorded.seriesid:
echo 'select chanid,starttime,seriesid from recorded;' \
|mysql -h garbo -umythtv -pmythtv mythconverg \
| perl -lne 'chomp;print $_ if m([\x00-\x08\x0a-\x1f])'
echo 'select chanid,starttime,seriesid from recorded;' \
|mysql -h garbo -umythtv -pmythtv mythconverg \
| perl -lne 'chomp;print $_ if m([\x00-\x08\x0a-\x1f])' \
| perl -ane '{print "update recorded set seriesid = " . chr(39) .
chr(39). " where chanid = " . chr(39). "$F[0]" . chr(39). " and
starttime = " . chr(39). "$F[1] $F[2]" . chr(39). "; \n"}'
echo 'select chanid,starttime,seriesid from recorded;' \
|mysql -h garbo -umythtv -pmythtv mythconverg \
| perl -lne 'chomp;print $_ if m([\x00-\x08\x0a-\x1f])' \
| perl -ane '{print "update recorded set seriesid = " . chr(39) .
chr(39). " where chanid = " . chr(39). "$F[0]" . chr(39). " and
starttime = " . chr(39). "$F[1] $F[2]" . chr(39). "; \n"}' |mysql -h
garbo -umythtv -pmythtv mythconverg
echo after:
echo 'select chanid,starttime,seriesid from recorded;' \
|mysql -h garbo -umythtv -pmythtv mythconverg \
| perl -lne 'chomp;print $_ if m([\x00-\x08\x0a-\x1f])' \
| perl -ane '{print "update recorded set seriesid = " . chr(39) .
chr(39). " where chanid = " . chr(39). "$F[0]" . chr(39). " and
starttime = " . chr(39). "$F[1] $F[2]" . chr(39). "; \n"}'
# program.ALL
echo program.all
echo 'select * from program;' \
|mysql -h garbo -umythtv -pmythtv mythconverg \
| perl -lne 'chomp;print $_ if m([\x00-\x08\x0a-\x1f])'
# recorded.ALL
echo recorded.ALL
echo 'select * from recorded;' \
|mysql -h garbo -umythtv -pmythtv mythconverg \
| perl -lne 'chomp;print $_ if m([\x00-\x08\x0a-\x1f])'
_______________________________________________
mythtvnz mailing list
mythtvnz [at] lists
http://lists.ourshack.com/mailman/listinfo/mythtvnz
Archives http://www.gossamer-threads.com/lists/mythtv/mythtvnz/
|
