]> git.plutz.net Git - rawnet/blobdiff - page_video.sh
generalized styling rules
[rawnet] / page_video.sh
index eca7be70b1873930d6ff3c8d754ebab7093f5772..296148472cb430d26ad363ceb307824791f0eb79 100644 (file)
@@ -1,5 +1,7 @@
 #!/bin/sh
 
+# ID   NAME    DESCRIPTION     RESX    RESY    LENGTH  COVER   STATUS (void|private|hidden|public)     UPLOADER        HITS    DESCR_CACHE     FUTUREUSE
+
 if [ "$video" -a -f "$vid_db" -a -r "$vid_db" ]; then
   read -r VIDEO_ID VIDEO_NAME VIDEO_DESCRIPTION VIDEO_RESX VIDEO_RESY \
           VIDEO_LENGTH VIDEO_COVER VIDEO_STATUS VIDEO_UPLOADER VIDEO_HITS \
@@ -9,31 +11,70 @@ if [ "$video" -a -f "$vid_db" -a -r "$vid_db" ]; then
   if [ "$VIDEO_ID" ]; then
            VIDEO_NAME="$(UNSTRING "$VIDEO_NAME")"
     VIDEO_DESCRIPTION="$(UNSTRING "$VIDEO_DESCRIPTION")"
+          VIDEO_COVER="$(UNSTRING "$VIDEO_COVER")"
     VIDEO_DESCR_CACHE="$(UNSTRING "$VIDEO_DESCR_CACHE")"
   else
     video=''
   fi
 fi
 
-# Video
-# ID   NAME    DESCRIPTION     RESX    RESY    LENGTH  COVER   STATUS (void|private|hidden|public)     UPLOADER        HITS    DESCR_CACHE     FUTUREUSE
-
 update_video(){
-  local id="${1}" name="${2}" description="${3}" resx="${4}" resy="${5}" \
-        length="${6}" cover="${7}" status="${8}" uploader="${9}" \
-        hits="${10}" descr_cache="${11}" futureuse="${12}"
-  local ID INFO
+  local id="${1}" name description resx resy length cover status uploader \
+        hits descr_cache futureuse
+  local ID NAME DESCRIPTION RESX RESY LENGTH COVER STATUS UPLOADER HITS \
+        DESCR_CACHE FUTUREUSE
+  local arg video thumb cnt
+  video="${_DATA}/${CHANNEL_ID}/${VIDEO_ID}.mp4"
+  thumb="${_DATA}/${CHANNEL_ID}/${VIDEO_ID}_thumb.jpg"
+
+  for arg in "$@"; do case $arg in
+    name=*) name="${arg#*=}";;
+    description=*) description="${arg#*=}";;
+    cover=*) cover="${arg#*=}";;
+    status=*) status="${arg#*=}";;
+    uploader=*) uploader="${arg#*=}";;
+    hits=*) hits="${arg#*=}";;
+  esac; done
+
+  if [ -f "$video" -a -r "$video" ]; then
+    arg="$(echo; ffprobe -show_entries format=duration:stream=width,height "$video" 2>&-)"
+    resx="${arg#*width=}"; resx="${resx%%${BR}*}"
+    resy="${arg#*height=}"; resy="${resy%%${BR}*}"
+    length="${arg#*duration=}"; length="${length%%${BR}*}"
+  fi
+  if [ "${length%.*}" -a ! "${thumb}" -nt "${video}" ]; then
+    for cnt in 1 2 3 4 5 6 7 8 9 10; do
+      ffmpeg -nostdin -y -ss "$((cnt * ${length%.*} / 11))" -i "$video" \
+             -frames 1 "${thumb%.jpg}_$((cnt - 1)).jpg"
+    done 2>&-
+    montage "${thumb%.jpg}"_[0-9].jpg \
+            -background "#000000" \
+            -tile 10x1 -geometry 320x180+0+0 \
+            -interlace line -quality 85 "${thumb}"
+    rm -- "${thumb%.jpg}"_[0-9].jpg
+  fi
 
   if LOCK "$vid_db"; then
-    while read -r ID INFO; do
+    while read -r ID NAME DESCRIPTION RESX RESY LENGTH COVER STATUS UPLOADER HITS \
+                  DESCR_CACHE FUTUREUSE; do
       if [ "$id" = "$ID" ]; then
-                # ID   NAME    DESCRIPTION RESX RESY   LENGTH  COVER   STATUS  UPLOADER HITS   DESCR_CACHE     FUTUREUSE
-        printf '%s     %s      %s      %i      %i      %i      %s      %s      %s      %i      %s      %s\n' \
-               "$id" "$(STRING "$name")" "$(STRING "$description")" "$resx" "$resy" "$length" \
-               "$(STRING "$cover")" "${status:-void}" "${uploader:-\\}" "$hits" \
-               "$(printf %s "$description" |markdown |STRING)" "${futureuse:-\\}"
+        printf '%s     %s      %s      %i      %i      %f      %s      %s      %s      %i      %s      %s\n' \
+               "$id" "$(STRING "${name-$(UNSTRING "$NAME")}")" \
+               "$(STRING "${description-$(UNSTRING "$DESCRIPTION")}")" \
+               "${resx:-${resx-${RESX}}${resx+0}}" \
+               "${resy:-${resy-${RESY}}${resy+0}}" \
+               "${length:-${length-${LENGTH}}${length+0}}" \
+               "$(STRING "${cover-$(UNSTRING "$COVER")}")" \
+               "${status:-${status-${STATUS}}${status+void}}" \
+               "${uploader:-${uploader-${UPLOADER}}${uploader+\\}}" \
+               "${hits:-${hits-${HITS}}${hits+0}}" \
+               "$(printf %s "${description-$(UNSTRING "$DESCRIPTION")}" |markdown |STRING)" \
+               "${FUTUREUSE:-\\}"
       else
-        printf '%s      %s\n' "$ID" "$INFO"
+        printf '%s     %s      %s      %i      %i      %f      %s      %s      %s      %i      %s      %s\n' \
+                "$ID" "$NAME" "$DESCRIPTION" "$RESX" "$RESY" "$LENGTH" \
+                "$COVER" "$STATUS" "$UPLOADER" "$HITS" "$DESCR_CACHE" \
+                "$FUTUREUSE"
       fi
     done <"$vid_db" >"${vid_db}.$$"
     mv -- "${vid_db}.$$" "${vid_db}"
@@ -43,15 +84,40 @@ update_video(){
   fi
 }
 
+UPLOAD(){
+  local file="$1"
+  local boundary line last
+
+  [ ! "${CONTENT_TYPE}" -o "${CONTENT_TYPE##multipart/form-data;*}" ] && return 1
+
+  boundary="${CONTENT_TYPE#*; boundary=}"
+  boundary="${boundary%%;*}"
+
+  head -c "$CONTENT_LENGTH" \
+  | sed -nE '
+    # discard lines prior to boundary
+    /^--'"${boundary}"'\r?$/!b;
+    # discard lines until first blank
+    :A; n; /^\r?$/!bA; n;
+    # print lines until boundary ( = actual file upload)
+    :FILE; p; n;
+    /^--'"${boundary}"'(--)?\r?$/!bFILE;
+    # discard remaining lines
+    :END; $q; n; bEND;
+  ' >"$file"
+  truncate -s $(( $(stat -c %s -- "$file") -2 )) -- "$file"
+}
 
 [ "$REQUEST_METHOD" = POST ] && case "$(POST action)" in
   update_video)
     if [ ! "$USER_ID" ]; then
       REDIRECT "${_BASE}/channel/${channel}/${video}/#ERROR_NOTLOGGEDIN"
-    elif [ "${CHANNEL_AUTHORS##*${USER_ID}*}" ]; then
+    elif ! AUTHOR; then
       REDIRECT "${_BASE}/channel/${channel}/${video}/#ERROR_UPDATE_NOTALLOWED"
-    elif update_video "$video" "$(POST name)" "$(POST description)" 0 0 0 \
-                      "" "void" "$USER_ID" 0 ""; then
+    elif update_video "$video" "name=$(POST name)" \
+                      "description=$(POST description)" \
+                      "status=$(POST status |grep -m1 -xE 'void|private|hidden|public')" \
+                      "uploader=$USER_ID"; then
       REDIRECT "${_BASE}/channel/${channel}/${video}/#UPDATE_SUCCESS"
     else
       REDIRECT "${_BASE}/channel/${channel}/${video}/#ERROR_UPDATE_NOLOCK"
@@ -62,16 +128,31 @@ update_video(){
     ;;
 esac
 
+if [ "$REQUEST_METHOD" = POST -a "$channel" -a "$video" ]; then
+  if ! AUTHOR; then
+    head -c "$CONTENT_LENGTH" >/dev/null
+    REDIRECT "${_BASE}/channel/${channel}/${video}/#ERROR_UPLOAD_NOTALLOWED"
+  elif [ "$VIDEO_STATUS" != void ]; then
+    head -c "$CONTENT_LENGTH" >/dev/null
+    REDIRECT "${_BASE}/channel/${channel}/${video}/#ERROR_UPLOAD_NOCLOBBER"
+  elif UPLOAD "$_DATA/$channel/$video.mp4"; then
+    update_video "$video" status=private
+    VIDEO_STATUS=private
+  fi
+fi
+
 if [ "$channel" -a "$video" -a "$action" = edit ]; then
+  AUTHOR || REDIRECT "$_BASE/$channel/$video/#ERROR_EDIT_NOTALLOWED"
+
   yield_page "$VIDEO_NAME - Edit" "video edit" <<-EOF
        [form .video .edit method=POST
          [input name="name" value="$(HTML "$VIDEO_NAME")" placeholder="Video Name"]
          [fieldset .status $([ $VIDEO_STATUS = void ] && printf "disabled=disabled")
-           [radio "status" "void" #status_private $(checked $VIDEO_STATUS private void)]
+           [radio "status" "private" #status_private $(checked $VIDEO_STATUS private void)]
              [label for=status_private tooltip="Video is only visible to channel authors" Private]
-           [radio "status" "void" #status_hidden  $(checked $VIDEO_STATUS hidden)]
+           [radio "status" "hidden" #status_hidden  $(checked $VIDEO_STATUS hidden)]
              [label for=status_hidden tooltip="Video will not be listed but can be viewed by anyone knowing the URL" Hidden]
-           [radio "status" "void" #status_public $(checked $VIDEO_STATUS public)]
+           [radio "status" "public" #status_public $(checked $VIDEO_STATUS public)]
              [label for=status_public tooltip="Video will be listed publicly" Public]
          ]
          [textarea name="description" placeholder="Description" . $(HTML "$VIDEO_DESCRIPTION")]
@@ -79,16 +160,87 @@ if [ "$channel" -a "$video" -a "$action" = edit ]; then
          [submit "action" "update_video_cancel" . Cancel]
        ]
        EOF
+
+elif [ "$channel" -a "$video" -a "$action" = frameuploadprogress ]; then
+  AUTHOR || REDIRECT "$_BASE/$channel/$video/#ERROR_EDIT_NOTALLOWED"
+  printf '%s\r\n' 'Content-Type: text/html' 'Connection: close' ''
+  printf '<!DOCTYPE HTML>
+  <html><head>
+    <title>Upload Progress</title>
+    <style type="text/css"><!--
+    body {
+      text-align: center;
+    }
+    .progress {
+      display: inline-block;
+      width: 20em;
+      position: absolute;
+      background-color: #FFF;
+    }
+    --></style>
+  </head><body>
+  '
+  while [ "$VIDEO_STATUS" = void ]; do
+    printf '<span class=progress>%i</span>\n' "$(stat -c %s "$_DATA/$channel/$video.mp4" 2>&-)"
+    sleep 1
+    read -r VIDEO_ID VIDEO_NAME VIDEO_DESCRIPTION VIDEO_RESX VIDEO_RESY \
+            VIDEO_LENGTH VIDEO_COVER VIDEO_STATUS VIDEO_UPLOADER VIDEO_HITS \
+            VIDEO_DESCR_CACHE VIDEO_FUTUREUSE <<-EOF
+       $(grep "^${video}       " "${vid_db}")
+       EOF
+  done
+  printf '<span class=progress>Ready!</span>\n'
+  printf '</body></html>'
+
+elif [ "$channel" -a "$video" -a "$action" = frameupload ]; then
+  AUTHOR || REDIRECT "$_BASE/$channel/$video/#ERROR_EDIT_NOTALLOWED"
+  printf '%s\r\n' 'Content-Type: text/html' ''
+  [ "$VIDEO_STATUS" = void ] && "$_EXEC"/cgilite/html-sh.sed <<-EOF
+       [!DOCTYPE HTML]
+       [html [head
+         [title Upload Form]
+       ][body
+       [form .upload method=POST enctype="multipart/form-data"
+         [input type=file name=upload]
+         [submit "action" "video_upload" Upload]
+       ]
+       ]]
+       EOF
+  [ "$VIDEO_STATUS" != void ] && "$_EXEC"/cgilite/html-sh.sed <<-EOF
+       [!DOCTYPE HTML]
+       [html [head
+         [title Upload Form]
+       ][body
+         [a href="./" target="_parent" . Reload Page!]
+       ]]
+       EOF
+
 elif [ "$channel" -a "$video" ]; then
-  yield_page "$VIDEO_NAME" "video edit" <<-EOF
+  [ $VIDEO_STATUS = public -o $VIDEO_STATUS = hidden ] || AUTHOR || { . ${_EXEC}/page_404.sh; exit 0; }
+
+  yield_page "$VIDEO_NAME" "video" <<-EOF
        [nav [a href="../../" Channels] - [a href="../" $(HTML "${CHANNEL_NAME:-(Unnamed Channel)}")] - [span $(HTML "${VIDEO_NAME:-(Unnamed Video)}")]
-         $( [ "$USER_ID" -a ! "${CHANNEL_AUTHORS##*${USER_ID}*}" ] \
-            && printf ' - [a href="edit" edit]'
-         )
+         $(AUTHOR && printf ' - [a href="edit" edit]')
        ]
+       $( AUTHOR && [ $VIDEO_STATUS = void ] && printf '
+        [iframe src="frameuploadprogress" width="100%%" height="50"
+         [a href="freameuploadprogress" Iframe: Upload progress]
+       ]
+       [iframe src="frameupload" width="100%%" height="50"
+         [form .upload method=POST enctype="multipart/form-data"
+           [input type=file name=upload]
+           [submit "action" "video_upload" Upload]
+         ]
+       ]')
+       $( [ $VIDEO_STATUS != void ] && printf '
+       [video
+         [source src="%s/video/%s/%s.mp4"]
+       ]' "$_BASE" "$channel" "$video"
+        )
        [h1 .name $(HTML "$VIDEO_NAME")]
        [div .description . ${VIDEO_DESCR_CACHE}]
        EOF
+
 else
   . "$_EXEC/page_404.sh"
 fi