perlmodules.t: Remove Module::Starter and Module::Starter::Plugin::CGIApp
[sunny256-utils.git] / fix-agdate
blobc847cd32d89147fc8803a25f0f225c82900dbc49
1 #!/usr/bin/env bash
3 #=======================================================================
4 # fix-agdate
5 # File ID: 3a208946-50bb-11e6-8515-02010e0a6634
7 # Fix timestamp difference between .mp4 and .srt in AutoGuard
9 # Author: Øyvind A. Holm <sunny@sunbase.org>
10 # License: GNU General Public License version 2 or later.
11 #=======================================================================
13 progname=fix-agdate
14 VERSION=0.1.0
16 ARGS="$(getopt -o "\
20 " -l "\
21 help,\
22 quiet,\
23 verbose,\
24 version,\
25 " -n "$progname" -- "$@")"
26 test "$?" = "0" || exit 1
27 eval set -- "$ARGS"
29 opt_help=0
30 opt_quiet=0
31 opt_verbose=0
32 while :; do
33 case "$1" in
34 -h|--help) opt_help=1; shift ;;
35 -q|--quiet) opt_quiet=$(($opt_quiet + 1)); shift ;;
36 -v|--verbose) opt_verbose=$(($opt_verbose + 1)); shift ;;
37 --version) echo $progname $VERSION; exit 0 ;;
38 --) shift; break ;;
39 *) echo $progname: Internal error >&2; exit 1 ;;
40 esac
41 done
42 opt_verbose=$(($opt_verbose - $opt_quiet))
44 if test "$opt_help" = "1"; then
45 test $opt_verbose -gt 0 && { echo; echo $progname $VERSION; }
46 cat <<END
48 Fix timestamp difference between .mp4 and .srt in AutoGuard (dash camera
49 app for Android). Sometimes there is a difference of 1 second between
50 the .mp4 and .srt file, and when they've been processed with datefn(1),
51 the subtitles (GPS coordinates and timestamp) disappear.
53 Usage: $progname [options] AG_FILES [...]
55 Options:
57 -h, --help
58 Show this help.
59 -q, --quiet
60 Be more quiet. Can be repeated to increase silence.
61 -v, --verbose
62 Increase level of verbosity. Can be repeated.
63 --version
64 Print version information.
66 END
67 exit 0
70 for f in "$@"; do
71 echo "$f" | grep -q 20.._.._.._.._.._..\\.mp4\$ || continue
72 base="$(basename "$f" .mp4)"
73 if test -e "$base.srt"; then
74 echo touch -r "$base.mp4" "$base.srt"
75 touch -r "$base.mp4" "$base.srt"
77 done