git.plutz.net Git - rawnet/blob - page_video.sh

   1 #!/bin/sh
   2
   3 # ID    NAME    DESCRIPTION     RESX    RESY    LENGTH  COVER   STATUS (void|private|hidden|public)     UPLOADER        HITS    DESCR_CACHE     FUTUREUSE
   4
   5 if [ "$video" -a -f "$vid_db" -a -r "$vid_db" ]; then
   6   read -r VIDEO_ID VIDEO_NAME VIDEO_DESCRIPTION VIDEO_RESX VIDEO_RESY \
   7           VIDEO_LENGTH VIDEO_COVER VIDEO_STATUS VIDEO_UPLOADER VIDEO_HITS \
   8           VIDEO_DESCR_CACHE VIDEO_FUTUREUSE <<-EOF
   9         $(grep "^${video}       " "${vid_db}")
  10         EOF
  11   if [ "$VIDEO_ID" ]; then
  12            VIDEO_NAME="$(UNSTRING "$VIDEO_NAME")"
  13     VIDEO_DESCRIPTION="$(UNSTRING "$VIDEO_DESCRIPTION")"
  14           VIDEO_COVER="$(UNSTRING "$VIDEO_COVER")"
  15     VIDEO_DESCR_CACHE="$(UNSTRING "$VIDEO_DESCR_CACHE")"
  16   else
  17     video=''
  18   fi
  19 fi
  20
  21 update_video(){
  22   local id="${1}" name description resx resy length cover status uploader \
  23         hits descr_cache futureuse
  24   local ID NAME DESCRIPTION RESX RESY LENGTH COVER STATUS UPLOADER HITS \
  25         DESCR_CACHE FUTUREUSE
  26   local arg video thumb cnt
  27   video="${_DATA}/${CHANNEL_ID}/${VIDEO_ID}.mp4"
  28   thumb="${_DATA}/${CHANNEL_ID}/${VIDEO_ID}_thumb.jpg"
  29
  30   for arg in "$@"; do case $arg in
  31     name=*) name="${arg#*=}";;
  32     description=*) description="${arg#*=}";;
  33     cover=*) cover="${arg#*=}";;
  34     status=*) status="${arg#*=}";;
  35     uploader=*) uploader="${arg#*=}";;
  36     hits=*) hits="${arg#*=}";;
  37   esac; done
  38
  39   if [ -f "$video" -a -r "$video" ]; then
  40     arg="$(echo; ffprobe -show_entries format=duration:stream=width,height "$video" 2>&-)"
  41     resx="${arg#*width=}"; resx="${resx%%${BR}*}"
  42     resy="${arg#*height=}"; resy="${resy%%${BR}*}"
  43     length="${arg#*duration=}"; length="${length%%${BR}*}"
  44   fi
  45   if [ "${length%.*}" -a ! "${thumb}" -nt "${video}" ]; then
  46     for cnt in 1 2 3 4 5 6 7 8 9 10; do
  47       ffmpeg -nostdin -y -ss "$((cnt * ${length%.*} / 11))" -i "$video" \
  48              -frames 1 "${thumb%.jpg}_$((cnt - 1)).jpg"
  49     done 2>&-
  50     montage "${thumb%.jpg}"_[0-9].jpg \
  51             -background "#000000" \
  52             -tile 10x1 -geometry 320x180+0+0 \
  53             -interlace line -quality 85 "${thumb}"
  54     rm -- "${thumb%.jpg}"_[0-9].jpg
  55   fi
  56
  57   if LOCK "$vid_db"; then
  58     while read -r ID NAME DESCRIPTION RESX RESY LENGTH COVER STATUS UPLOADER HITS \
  59                   DESCR_CACHE FUTUREUSE; do
  60       if [ "$id" = "$ID" ]; then
  61         printf '%s      %s      %s      %i      %i      %f      %s      %s      %s      %i      %s      %s\n' \
  62                "$id" "$(STRING "${name-$(UNSTRING "$NAME")}")" \
  63                "$(STRING "${description-$(UNSTRING "$DESCRIPTION")}")" \
  64                "${resx:-${resx-${RESX}}${resx+0}}" \
  65                "${resy:-${resy-${RESY}}${resy+0}}" \
  66                "${length:-${length-${LENGTH}}${length+0}}" \
  67                "$(STRING "${cover-$(UNSTRING "$COVER")}")" \
  68                "${status:-${status-${STATUS}}${status+void}}" \
  69                "${uploader:-${uploader-${UPLOADER}}${uploader+\\}}" \
  70                "${hits:-${hits-${HITS}}${hits+0}}" \
  71                "$(printf %s "${description-$(UNSTRING "$DESCRIPTION")}" |markdown |STRING)" \
  72                "${FUTUREUSE:-\\}"
  73       else
  74         printf '%s      %s      %s      %i      %i      %f      %s      %s      %s      %i      %s      %s\n' \
  75                 "$ID" "$NAME" "$DESCRIPTION" "$RESX" "$RESY" "$LENGTH" \
  76                 "$COVER" "$STATUS" "$UPLOADER" "$HITS" "$DESCR_CACHE" \
  77                 "$FUTUREUSE"
  78       fi
  79     done <"$vid_db" >"${vid_db}.$$"
  80     mv -- "${vid_db}.$$" "${vid_db}"
  81     RELEASE "$vid_db"
  82   else
  83     return 1
  84   fi
  85 }
  86
  87 UPLOAD(){
  88   local file="$1"
  89   local boundary line last
  90
  91   [ ! "${CONTENT_TYPE}" -o "${CONTENT_TYPE##multipart/form-data;*}" ] && return 1
  92
  93   boundary="${CONTENT_TYPE#*; boundary=}"
  94   boundary="${boundary%%;*}"
  95
  96   head -c "$CONTENT_LENGTH" \
  97   | sed -nE '
  98     # discard lines prior to boundary
  99     /^--'"${boundary}"'\r?$/!b;
 100     # discard lines until first blank
 101     :A; n; /^\r?$/!bA; n;
 102     # print lines until boundary ( = actual file upload)
 103     :FILE; p; n;
 104     /^--'"${boundary}"'(--)?\r?$/!bFILE;
 105     # discard remaining lines
 106     :END; $q; n; bEND;
 107   ' >"$file"
 108   truncate -s $(( $(stat -c %s -- "$file") -2 )) -- "$file"
 109 }
 110
 111 [ "$REQUEST_METHOD" = POST ] && case "$(POST action)" in
 112   update_video)
 113     if [ ! "$USER_ID" ]; then
 114       REDIRECT "${_BASE}/channel/${channel}/${video}/#ERROR_NOTLOGGEDIN"
 115     elif ! AUTHOR; then
 116       REDIRECT "${_BASE}/channel/${channel}/${video}/#ERROR_UPDATE_NOTALLOWED"
 117     elif update_video "$video" "name=$(POST name)" \
 118                       "description=$(POST description)" \
 119                       "status=$(POST status |grep -m1 -xE 'void|private|hidden|public')" \
 120                       "uploader=$USER_ID"; then
 121       REDIRECT "${_BASE}/channel/${channel}/${video}/#UPDATE_SUCCESS"
 122     else
 123       REDIRECT "${_BASE}/channel/${channel}/${video}/#ERROR_UPDATE_NOLOCK"
 124     fi
 125     ;;
 126   update_video_cancel)
 127     REDIRECT "${_BASE}/channel/${channel}/${video}/#CANCELED"
 128     ;;
 129 esac
 130
 131 if [ "$REQUEST_METHOD" = POST -a "$channel" -a "$video" ]; then
 132   if ! AUTHOR; then
 133     head -c "$CONTENT_LENGTH" >/dev/null
 134     REDIRECT "${_BASE}/channel/${channel}/${video}/#ERROR_UPLOAD_NOTALLOWED"
 135   elif [ "$VIDEO_STATUS" != void ]; then
 136     head -c "$CONTENT_LENGTH" >/dev/null
 137     REDIRECT "${_BASE}/channel/${channel}/${video}/#ERROR_UPLOAD_NOCLOBBER"
 138   elif UPLOAD "$_DATA/$channel/$video.mp4"; then
 139     update_video "$video" status=private
 140     VIDEO_STATUS=private
 141   fi
 142 fi
 143
 144 if [ "$channel" -a "$video" -a "$action" = edit ]; then
 145   AUTHOR || REDIRECT "$_BASE/$channel/$video/#ERROR_EDIT_NOTALLOWED"
 146
 147   yield_page "$VIDEO_NAME - Edit" "video edit" <<-EOF
 148         [form .video .edit method=POST
 149           [input name="name" value="$(HTML "$VIDEO_NAME")" placeholder="Video Name"]
 150           [fieldset .status $([ $VIDEO_STATUS = void ] && printf "disabled=disabled")
 151             [radio "status" "private" #status_private $(checked $VIDEO_STATUS private void)]
 152               [label for=status_private tooltip="Video is only visible to channel authors" Private]
 153             [radio "status" "hidden" #status_hidden  $(checked $VIDEO_STATUS hidden)]
 154               [label for=status_hidden tooltip="Video will not be listed but can be viewed by anyone knowing the URL" Hidden]
 155             [radio "status" "public" #status_public $(checked $VIDEO_STATUS public)]
 156               [label for=status_public tooltip="Video will be listed publicly" Public]
 157           ]
 158           [textarea name="description" placeholder="Description" . $(HTML "$VIDEO_DESCRIPTION")]
 159           [submit "action" "update_video" . Update]
 160           [submit "action" "update_video_cancel" . Cancel]
 161         ]
 162         EOF
 163
 164 elif [ "$channel" -a "$video" -a "$action" = frameuploadprogress ]; then
 165   AUTHOR || REDIRECT "$_BASE/$channel/$video/#ERROR_EDIT_NOTALLOWED"
 166   printf '%s\r\n' 'Content-Type: text/html' 'Connection: close' ''
 167   printf '<!DOCTYPE HTML>
 168   <html><head>
 169     <title>Upload Progress</title>
 170     <style type="text/css"><!--
 171     body {
 172       text-align: center;
 173     }
 174     .progress {
 175       display: inline-block;
 176       width: 20em;
 177       position: absolute;
 178       background-color: #FFF;
 179     }
 180     --></style>
 181   </head><body>
 182   '
 183   while [ "$VIDEO_STATUS" = void ]; do
 184     printf '<span class=progress>%i</span>\n' "$(stat -c %s "$_DATA/$channel/$video.mp4" 2>&-)"
 185     sleep 1
 186     read -r VIDEO_ID VIDEO_NAME VIDEO_DESCRIPTION VIDEO_RESX VIDEO_RESY \
 187             VIDEO_LENGTH VIDEO_COVER VIDEO_STATUS VIDEO_UPLOADER VIDEO_HITS \
 188             VIDEO_DESCR_CACHE VIDEO_FUTUREUSE <<-EOF
 189         $(grep "^${video}       " "${vid_db}")
 190         EOF
 191   done
 192   printf '<span class=progress>Ready!</span>\n'
 193   printf '</body></html>'
 194
 195 elif [ "$channel" -a "$video" -a "$action" = frameupload ]; then
 196   AUTHOR || REDIRECT "$_BASE/$channel/$video/#ERROR_EDIT_NOTALLOWED"
 197   printf '%s\r\n' 'Content-Type: text/html' ''
 198   [ "$VIDEO_STATUS" = void ] && "$_EXEC"/cgilite/html-sh.sed <<-EOF
 199         [!DOCTYPE HTML]
 200         [html [head
 201           [title Upload Form]
 202         ][body
 203         [form .upload method=POST enctype="multipart/form-data"
 204           [input type=file name=upload]
 205           [submit "action" "video_upload" Upload]
 206         ]
 207         ]]
 208         EOF
 209   [ "$VIDEO_STATUS" != void ] && "$_EXEC"/cgilite/html-sh.sed <<-EOF
 210         [!DOCTYPE HTML]
 211         [html [head
 212           [title Upload Form]
 213         ][body
 214           [a href="./" target="_parent" . Reload Page!]
 215         ]]
 216         EOF
 217
 218 elif [ "$channel" -a "$video" ]; then
 219   [ $VIDEO_STATUS = public -o $VIDEO_STATUS = hidden ] || AUTHOR || { . ${_EXEC}/page_404.sh; exit 0; }
 220
 221   yield_page "$VIDEO_NAME" "video" <<-EOF
 222         [nav [a href="../../" Channels] - [a href="../" $(HTML "${CHANNEL_NAME:-(Unnamed Channel)}")] - [span $(HTML "${VIDEO_NAME:-(Unnamed Video)}")]
 223           $(AUTHOR && printf ' - [a href="edit" edit]')
 224         ]
 225         $( AUTHOR && [ $VIDEO_STATUS = void ] && printf '
 226         [iframe src="frameuploadprogress" width="100%%" height="50"
 227           [a href="freameuploadprogress" Iframe: Upload progress]
 228         ]
 229         [iframe src="frameupload" width="100%%" height="50"
 230           [form .upload method=POST enctype="multipart/form-data"
 231             [input type=file name=upload]
 232             [submit "action" "video_upload" Upload]
 233           ]
 234         ]')
 235         $( [ $VIDEO_STATUS != void ] && printf '
 236         [video
 237           [source src="%s/video/%s/%s.mp4"]
 238         ]' "$_BASE" "$channel" "$video"
 239         )
 240         [h1 .name $(HTML "$VIDEO_NAME")]
 241         [div .description . ${VIDEO_DESCR_CACHE}]
 242         EOF
 243
 244 else
 245   . "$_EXEC/page_404.sh"
 246 fi