#!/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 \
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}"
fi
}
+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"
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 LOCK "$vid_db"; then
+ while read -r id tail; do
+ [ "$id" != "$video" ] && printf '%s %s\n' "$id" "$tail"
+ done <"$vid_db" >"${vid_db}.$$"
+ mv -- "${vid_db}.$$" "$vid_db"
+ rm -- "${_DATA}/${channel}/${video}.mp4" "${_DATA}/${channel}/${video}_thumb.jpg"
+ RELEASE "$vid_db"
+ 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