#!/tvbin/tivosh
#episode_sort.tcl
set db [dbopen]
ForeachMfsFile fsid name type "/Recording/NowShowingByBucketTitle/" "" {
RetryTransaction {
set oad ""
set recording [db $db openid $fsid]
set showing [dbobj $recording get Showing]
set program [dbobj $showing get Program]
catch {set oad [dbobj $program get OriginalAirDate]}
if {$oad!=""} {
dbobj $showing set Date $oad
}
}
}
Cet appareil a donné lieu en 2006 à une controverse entre deux des grands mentors du logiciel libre, Richard Stallman et Linus Torvalds, débouchant sur la création du néologisme tivoïsation et d'une nouvelle version de la licence GPL, la version 3, destinée à éviter aux logiciels sous licence GPL de subir les mêmes écueils que les logiciels sous GPLv2. En effet, le TiVo utilise de tels logiciels, que l'utilisateur est donc censé pouvoir modifier à loisir. Cependant, l'utilisation par l'appareil d'une signature numérique interdit toute modification, ce qui selon Stallman est contraire aux principes de la GPL[2].