home/bin/video-find

   1 #! /bin/sh
   2
   3 find $@ \
   4     -type f \
   5     -print0 \
   6 | xargs \
   7     -0 \
   8     -P "$(nproc)" \
   9     -I {} \
  10     sh -c 'printf "%s\0%s\0\0" $(mimetype -b "{}") "{}"' \
  11 | gawk -v RS='\0\0' -v ORS='\0' '/^video/ {sub("^[^\0]+\0", ""); print}'