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
  27   video="$_DATA/$CHANNEL_ID/$VIDEO_ID.mp4"
  28
  29   for arg in "$@"; do case $arg in
  30     name=*) name="${arg#*=}";;
  31     description=*) description="${arg#*=}";;
  32     cover=*) cover="${arg#*=}";;
  33     status=*) status="${arg#*=}";;
  34     uploader=*) uploader="${arg#*=}";;
  35     hits=*) hits="${arg#*=}";;
  36   esac; done
  37
  38   if [ -f "$video" -a -r "$video" ]; then
  39     arg="$(echo; ffprobe -show_entries stream=width,height,duration "$video" 2>&-)"
  40     resx="${arg#*width=}"; resx="${resx%%${BR}*}"
  41     resy="${arg#*height=}"; resy="${resy%%${BR}*}"
  42     length="${arg#*duration=}"; length="${length%%${BR}*}"
  43   fi
  44
  45   if LOCK "$vid_db"; then
  46     while read -r ID NAME DESCRIPTION RESX RESY LENGTH COVER STATUS UPLOADER HITS \
  47                   DESCR_CACHE FUTUREUSE; do
  48       if [ "$id" = "$ID" ]; then
  49         printf '%s      %s      %s      %i      %i      %f      %s      %s      %s      %i      %s      %s\n' \
  50                "$id" "$(STRING "${name-$(UNSTRING "$NAME")}")" \
  51                "$(STRING "${description-$(UNSTRING "$DESCRIPTION")}")" \
  52                "${resx:-${resx-${RESX}}${resx+0}}" \
  53                "${resy:-${resy-${RESY}}${resy+0}}" \
  54                "${length:-${length-${LENGTH}}${length+0}}" \
  55                "$(STRING "${cover-$(UNSTRING "$COVER")}")" \
  56                "${status:-${status-${STATUS}}${status+void}}" \
  57                "${uploader:-${uploader-${UPLOADER}}${uploader+\\}}" \
  58                "${hits:-${hits-${HITS}}${hits+0}}" \
  59                "$(printf %s "${description-$(UNSTRING "$DESCRIPTION")}" |markdown |STRING)" \
  60                "${FUTUREUSE:-\\}"
  61       else
  62         printf '%s      %s      %s      %i      %i      %i      %s      %s      %s      %i      %s      %s\n' \
  63                 "$ID" "$NAME" "$DESCRIPTION" "$RESX" "$RESY" "$LENGTH" \
  64                 "$COVER" "$STATUS" "$UPLOADER" "$HITS" "$DESCR_CACHE" \
  65                 "$FUTUREUSE"
  66       fi
  67     done <"$vid_db" >"${vid_db}.$$"
  68     mv -- "${vid_db}.$$" "${vid_db}"
  69     RELEASE "$vid_db"
  70   else
  71     return 1
  72   fi
  73 }
  74
  75 UPLOAD(){
  76   local file="$1"
  77   local boundary line last
  78   local CONTENT_TYPE="$(HEADER Content-Type)"
  79
  80   [ ! "${CONTENT_TYPE}" -o "${CONTENT_TYPE##multipart/form-data;*}" ] && return 1
  81
  82   boundary="${CONTENT_TYPE#*; boundary=}"
  83   boundary="${boundary%%;*}"
  84
  85   head -c "$CONTENT_LENGTH" \
  86   | sed -nE '
  87     /^--'"${boundary}"'\r?$/!b;
  88     :A; n;
  89     /^\r?$/!bA;
  90      n;
  91     :FILE
  92     p; n;
  93     /^--'"${boundary}"'(--)?\r?$/!bFILE;
  94     :END
  95     $q; n; bEND;
  96   ' >"$file"
  97   truncate -s $(( $(stat -c %s -- "$file") -2 )) -- "$file"
  98 }
  99
 100 [ "$REQUEST_METHOD" = POST ] && case "$(POST action)" in
 101   update_video)
 102     if [ ! "$USER_ID" ]; then
 103       REDIRECT "${_BASE}/channel/${channel}/${video}/#ERROR_NOTLOGGEDIN"
 104     elif ! AUTHOR; then
 105       REDIRECT "${_BASE}/channel/${channel}/${video}/#ERROR_UPDATE_NOTALLOWED"
 106     elif update_video "$video" "name=$(POST name)" \
 107                       "description=$(POST description)" \
 108                       "status=$(POST status |grep -m1 -xE 'void|private|hidden|public')" \
 109                       "uploader=$USER_ID"; then
 110       REDIRECT "${_BASE}/channel/${channel}/${video}/#UPDATE_SUCCESS"
 111     else
 112       REDIRECT "${_BASE}/channel/${channel}/${video}/#ERROR_UPDATE_NOLOCK"
 113     fi
 114     ;;
 115   update_video_cancel)
 116     REDIRECT "${_BASE}/channel/${channel}/${video}/#CANCELED"
 117     ;;
 118 esac
 119
 120 if [ "$REQUEST_METHOD" = POST -a "$channel" -a "$video" ]; then
 121   if ! AUTHOR; then
 122     head -c "$CONTENT_LENGTH" >/dev/null
 123     REDIRECT "${_BASE}/channel/${channel}/${video}/#ERROR_UPLOAD_NOTALLOWED"
 124   elif [ "$VIDEO_STATUS" != void ]; then
 125     head -c "$CONTENT_LENGTH" >/dev/null
 126     REDIRECT "${_BASE}/channel/${channel}/${video}/#ERROR_UPLOAD_NOCLOBBER"
 127   elif UPLOAD "$_DATA/$channel/$video.mp4"; then
 128     update_video "$video" "$VIDEO_NAME" "$VIDEO_DESCRIPTION" 0 0 0 \
 129                  "$VIDEO_COVER" private "$VIDEO_UPOADER" "$VIDEO_HITS" \
 130                  "" ""
 131   fi
 132 fi
 133
 134 if [ "$channel" -a "$video" -a "$action" = edit ]; then
 135   AUTHOR || REDIRECT "$_BASE/$channel/$video/#ERROR_EDIT_NOTALLOWED"
 136
 137   yield_page "$VIDEO_NAME - Edit" "video edit" <<-EOF
 138         [form .video .edit method=POST
 139           [input name="name" value="$(HTML "$VIDEO_NAME")" placeholder="Video Name"]
 140           [fieldset .status $([ $VIDEO_STATUS = void ] && printf "disabled=disabled")
 141             [radio "status" "private" #status_private $(checked $VIDEO_STATUS private void)]
 142               [label for=status_private tooltip="Video is only visible to channel authors" Private]
 143             [radio "status" "hidden" #status_hidden  $(checked $VIDEO_STATUS hidden)]
 144               [label for=status_hidden tooltip="Video will not be listed but can be viewed by anyone knowing the URL" Hidden]
 145             [radio "status" "public" #status_public $(checked $VIDEO_STATUS public)]
 146               [label for=status_public tooltip="Video will be listed publicly" Public]
 147           ]
 148           [textarea name="description" placeholder="Description" . $(HTML "$VIDEO_DESCRIPTION")]
 149           [submit "action" "update_video" . Update]
 150           [submit "action" "update_video_cancel" . Cancel]
 151         ]
 152         EOF
 153 elif [ "$channel" -a "$video" ]; then
 154   [ $VIDEO_STATUS = public -o $VIDEO_STATUS = hidden ] || AUTHOR || { . ${_EXEC}/page_404.sh; exit 0; }
 155
 156   yield_page "$VIDEO_NAME" "video" <<-EOF
 157         [nav [a href="../../" Channels] - [a href="../" $(HTML "${CHANNEL_NAME:-(Unnamed Channel)}")] - [span $(HTML "${VIDEO_NAME:-(Unnamed Video)}")]
 158           $(AUTHOR && printf ' - [a href="edit" edit]')
 159         ]
 160         $( AUTHOR && [ $VIDEO_STATUS = void ] && printf '
 161         [form .upload method=POST enctype="multipart/form-data"
 162           [input type=file name=upload]
 163           [submit "action" "video_upload" Upload]
 164         ]')
 165         $( [ $VIDEO_STATUS != void ] && printf '
 166         [video
 167           [source src="%s/video/%s/%s.mp4"]
 168         ]' "$_BASE" "$channel" "$video"
 169         )
 170         [h1 .name $(HTML "$VIDEO_NAME")]
 171         [div .description . ${VIDEO_DESCR_CACHE}]
 172         EOF
 173 else
 174   . "$_EXEC/page_404.sh"
 175 fi