This Perl script reads the PSIP data out of an ATSC (North American Digital TV) stream via a SiliconDust HDHomeRun networked receiver. It then sends the PSIP timestamp to ntpd via a shared memory segment. It's a little rough still, but it does work and and can sync within a second of other NTP clocks.
References: