]> git.plutz.net Git - rawnet/blobdiff - page_video.sh
mark executable
[rawnet] / page_video.sh
old mode 100644 (file)
new mode 100755 (executable)
index eca7be7..587ee52
@@ -1,57 +1,51 @@
 #!/bin/sh
 
-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 \
-          VIDEO_DESCR_CACHE VIDEO_FUTUREUSE <<-EOF
-       $(grep "^${video}       " "${vid_db}")
-       EOF
-  if [ "$VIDEO_ID" ]; then
-           VIDEO_NAME="$(UNSTRING "$VIDEO_NAME")"
-    VIDEO_DESCRIPTION="$(UNSTRING "$VIDEO_DESCRIPTION")"
-    VIDEO_DESCR_CACHE="$(UNSTRING "$VIDEO_DESCR_CACHE")"
-  else
-    video=''
-  fi
-fi
+. "$_EXEC/db_video.sh"
 
-# 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
-
-  if LOCK "$vid_db"; then
-    while read -r ID INFO; 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:-\\}"
-      else
-        printf '%s      %s\n' "$ID" "$INFO"
-      fi
-    done <"$vid_db" >"${vid_db}.$$"
-    mv -- "${vid_db}.$$" "${vid_db}"
-    RELEASE "$vid_db"
-  else
-    return 1
-  fi
-}
+read_video "$video"
+
+UPLOAD(){
+  local file="$1"
+  local boundary line length=0
+
+  [ ! "${CONTENT_TYPE}" -o "${CONTENT_TYPE##multipart/form-data;*}" ] && return 1
+
+  boundary="${CONTENT_TYPE#*; boundary=}"
+  boundary="${boundary%%;*}"
 
+  while read -r line; do
+    length="$(( length + ${#line} + 1))"
+    [ "${line%${CR}}" = "--$boundary" ] && break
+  done
+  while read -r line; do
+    length="$(( length + ${#line} + 1))"
+    [ ! "${line%${CR}}" ] && break \
+    || debug "$line"
+  done
+
+  printf "%i\n" "$(( CONTENT_LENGTH - length ))" >"${file}.upload"
+  head -c "$(( CONTENT_LENGTH - length ))" \
+  | sed -nE '
+    # 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"
+  rm -- "${file}.upload"
+}
 
 [ "$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"
@@ -60,35 +54,154 @@ update_video(){
   update_video_cancel)
     REDIRECT "${_BASE}/channel/${channel}/${video}/#CANCELED"
     ;;
+  delete)
+    if [ ! "$USER_ID" ]; then
+      REDIRECT "${_BASE}/channel/${channel}/${video}/#ERROR_NOTLOGGEDIN"
+    elif ! AUTHOR; then
+      REDIRECT "${_BASE}/channel/${channel}/${video}/#ERROR_UPDATE_NOTALLOWED"
+    elif [ "$(POST delconfirm)" != confirm ]; then
+      REDIRECT "${_BASE}/channel/${channel}/${video}/#ERROR_NOT_CONFIRMED"
+    elif delete_video "$video"; then
+      REDIRECT "${_BASE}/channel/${channel}/#DELETE_CONFIRM"
+    else
+      REDIRECT "${_BASE}/channel/${channel}/${video}/#ERROR_UPDATE_NOLOCK"
+    fi
+    ;;
 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")]
          [submit "action" "update_video" . Update]
          [submit "action" "update_video_cancel" . Cancel]
+         [fieldset .delete
+           [checkbox "delconfirm" "confirm" id="delconfirm"]
+           [label for=delconfirm Delete Video]
+           [submit "action" "delete" Delete Video]
+         ]
        ]
        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: block;
+      position: absolute;
+      width: 20em;
+      background-color: #FFF;
+      border: 1pt solid;
+      border-radius: 4pt;
+      height: 1.25em;
+    }
+    .progress .bar {
+      display: block;
+      position: absolute;
+      left: 0; top: 0; bottom: 0;
+      background-color: #666;
+    }
+    .progress .count {
+      display: block;
+      position: absolute;
+      left: 0; top: 0; right: 0; bottom: 0;
+      line-height: 1.375em;
+    }
+    --></style>
+  </head><body>
+  '
+  printf '<div class=progress><div class=bar style="width: 0%%;"></div><div class=count>%i / %i</div></div>\n' 0 0
+  while [ ! -f "$_DATA/$channel/$video.mp4" -a \
+          ! -f "$_DATA/$channel/$video.mp4.upload" ]; do sleep 1; done
+  read size <"$_DATA/$channel/$video.mp4.upload"
+  while [ -f "$_DATA/$channel/$video.mp4.upload" ]; do
+    stat="$(stat -c %s "$_DATA/$channel/$video.mp4" 2>&-)"
+    printf '<div class=progress><div class=bar style="width:%i%%;"></div><div class=count>%iMB / %iMB</div></div>\n' \
+      "$(( stat * 100 / size ))" "$((stat / 1048576))" "$((size / 1048576))"
+    sleep 1
+  done
+  printf '<span class=progress><div class=bar style="width:100%%;"></div><div class=count>Ready!</div></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
-       [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]'
-         )
+  [ $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)}")]]
+       $( 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 preload=none controls=controls width=%i height=%i
+         [source src="%s/video/%s/%s.mp4" type="video/mp4"]
+       ]' "$VIDEO_RESX" "$VIDEO_RESY" "$_BASE" "$channel" "$video"
+        )
+       $(AUTHOR && printf '[a .button href="edit" edit]')
        [h1 .name $(HTML "$VIDEO_NAME")]
        [div .description . ${VIDEO_DESCR_CACHE}]
        EOF
+
 else
   . "$_EXEC/page_404.sh"
 fi