3 [ "$includepage_video" ] && return 0
6 . "$_EXEC/db_channel.sh"
9 . "$_EXEC/transcoding.sh"
11 read_channel "$channel"
14 [ "$REQUEST_METHOD" = POST ] && case "$(POST action)" in
16 if [ ! "$USER_ID" ]; then
17 REDIRECT "${_BASE}/channel/$CHANNEL_ID/$VIDEO_ID/#ERROR_NOTLOGGEDIN"
19 REDIRECT "${_BASE}/channel/$CHANNEL_ID/$VIDEO_ID/#ERROR_UPDATE_NOTALLOWED"
20 elif update_video "$VIDEO_ID" "name=$(POST name)" \
21 "description=$(POST description)" \
22 "status=$(POST status |grep -m1 -xE 'private|hidden|public')" \
23 "uploader=$USER_ID"; then
24 REDIRECT "${_BASE}/channel/$CHANNEL_ID/$VIDEO_ID/#UPDATE_SUCCESS"
26 REDIRECT "${_BASE}/channel/$CHANNEL_ID/$VIDEO_ID/#ERROR_UPDATE_NOLOCK"
30 REDIRECT "${_BASE}/channel/$CHANNEL_ID/$VIDEO_ID/#CANCELED"
33 if [ ! "$USER_ID" ]; then
34 REDIRECT "${_BASE}/channel/$CHANNEL_ID/$VIDEO_ID/#ERROR_NOTLOGGEDIN"
36 REDIRECT "${_BASE}/channel/$CHANNEL_ID/$VIDEO_ID/#ERROR_UPDATE_NOTALLOWED"
37 elif [ "$(POST delconfirm)" != confirm ]; then
38 REDIRECT "${_BASE}/channel/$CHANNEL_ID/$VIDEO_ID/#ERROR_NOT_CONFIRMED"
39 elif delete_video "$VIDEO_ID"; then
40 rm -f -- "$VIDEO_FILE" "$VIDEO_THUMB" "$VIDEO_MP4" "$VIDEO_WEBM" \
41 "${VIDEO_MP4%.mp4}".*.mp4 "${VIDEO_WEBM%.webm}".*.webm
42 REDIRECT "${_BASE}/channel/$CHANNEL_ID/#DELETE_CONFIRM"
44 REDIRECT "${_BASE}/channel/$CHANNEL_ID/$VIDEO_ID/#ERROR_UPDATE_NOLOCK"
49 if [ "$REQUEST_METHOD" = POST -a "$CHANNEL_ID" -a "$VIDEO_ID" ]; then
51 head -c "$CONTENT_LENGTH" >/dev/null
52 REDIRECT "${_BASE}/channel/$CHANNEL_ID/$VIDEO_ID/#ERROR_UPLOAD_NOTALLOWED"
53 elif [ -f "$VIDEO_FILE" ]; then
54 head -c "$CONTENT_LENGTH" >/dev/null
55 REDIRECT "${_BASE}/channel/$CHANNEL_ID/$VIDEO_ID/#ERROR_UPLOAD_NOCLOBBER"
56 elif UPLOAD "$VIDEO_FILE"; then
57 transcode "$VIDEO_FILE"
58 REDIRECT "${_BASE}/channel/$CHANNEL_ID/$VIDEO_ID/edit"
62 if [ "$CHANNEL_ID" -a "$VIDEO_ID" -a "$action" = edit ]; then
63 AUTHOR || REDIRECT "$_BASE/$CHANNEL_ID/$VIDEO_ID/#ERROR_EDIT_NOTALLOWED"
65 yield_page "$VIDEO_NAME - Edit" "video edit" <<-EOF
66 [form .video .edit method=POST
67 [input name="name" value="$(HTML "$VIDEO_NAME")" placeholder="Video Name" autocomplete=off]
68 [fieldset .status $([ ! -f "$VIDEO_FILE" ] && printf "disabled=disabled")
69 [radio "status" "private" #status_private $(checked $VIDEO_STATUS private)]
70 [label for=status_private tooltip="Video is only visible to channel authors" Private]
71 [radio "status" "hidden" #status_hidden $(checked $VIDEO_STATUS hidden)]
72 [label for=status_hidden tooltip="Video will not be listed but can be viewed by anyone knowing the URL" Hidden]
73 [radio "status" "public" #status_public $(checked $VIDEO_STATUS public)]
74 [label for=status_public tooltip="Video will be listed publicly" Public]
76 [textarea name="description" placeholder="Description" . $(HTML "$VIDEO_DESCRIPTION")]
77 [submit "action" "update_video" . Update]
78 [submit "action" "update_video_cancel" . Cancel]
80 [checkbox "delconfirm" "confirm" id="delconfirm"]
81 [label for=delconfirm Delete Video]
82 [submit "action" "delete" Delete Video]
87 elif [ "$CHANNEL_ID" -a "$VIDEO_ID" -a "$action" = frameuploadprogress ]; then
88 AUTHOR || REDIRECT "$_BASE/$CHANNEL_ID/$VIDEO_ID/#ERROR_EDIT_NOTALLOWED"
91 elif [ "$CHANNEL_ID" -a "$VIDEO_ID" -a ! -f "$VIDEO_FILE" ] && AUTHOR; then
92 yield_page "$VIDEO_NAME" "video" <<-EOF
93 [nav [a href="../../" Channels] - [a href="../" $(HTML "${CHANNEL_NAME:-(Unnamed Channel)}")] - [span $(HTML "${VIDEO_NAME:-(Unnamed Video)}")]]
94 [iframe src="frameuploadprogress" width="100%%" height="50"
95 [a href="freameuploadprogress" Iframe: Upload progress]
97 [form .upload method=POST enctype="multipart/form-data"
98 [input type=file name=upload]
99 [submit "action" "video_upload" Upload]
101 [a .button href="edit" edit]
102 [h1 .name $(HTML "$VIDEO_NAME")]
103 [div .description . ${VIDEO_DESCR_CACHE}]
106 elif [ "$CHANNEL_ID" -a "$VIDEO_ID" -a -f "$VIDEO_FILE" ]; then
107 [ "$VIDEO_STATUS" = public -o "$VIDEO_STATUS" = hidden ] || AUTHOR || { . ${_EXEC}/page_404.sh; exit 0; }
109 yield_page "$VIDEO_NAME" "video" <<-EOF
110 [nav [a href="../../" Channels] - [a href="../" $(HTML "${CHANNEL_NAME:-(Unnamed Channel)}")] - [span $(HTML "${VIDEO_NAME:-(Unnamed Video)}")]]
111 [video preload=none controls=controls width="$VIDEO_RESX" height="$VIDEO_RESY"
112 $([ -f "$VIDEO_MP4" ] \
113 && printf '[source src="%s/video/%s/%s.mp4" type="video/mp4"]' \
114 "$_BASE" "$CHANNEL_ID" "$VIDEO_ID"
115 [ -f "$VIDEO_WEBM" ] \
116 && printf '[source src="%s/video/%s/%s.webm" type="video/webm"]' \
117 "$_BASE" "$CHANNEL_ID" "$VIDEO_ID"
118 [ ! -f "$VIDEO_MP4" -a ! -f "$VIDEO_WEBM" ] \
119 && printf '[source src="%s/video/%s/%s.upload.mp4" type="video/mp4"] %s' \
120 "$_BASE" "$CHANNEL_ID" "$VIDEO_ID" \
121 "The video has not yet been transcoded and may not be displayed correctly."
123 $([ ! -f "$VIDEO_MP4" -a ! -f "$VIDEO_WEBM" ] && {
124 read file <"$_DATA/transcoding.queue"
125 if [ "$file" = "$VIDEO_FILE" ]; then
126 printf '[div .transcoding . This video is currently being
127 converted to various publishing formats. It may not be
128 rendered correctly until the conversion is finished.]'
129 elif grep -qFx "$VIDEO_FILE" "${_DATA}/transcoding.queue"; then
130 printf '[div .transcoding . This video is not yet converted to a
131 suitable publishing format. It may not be rendered
132 correctly until the conversion is finished. The conversion
133 will start automatically once previous jobs have been
136 printf '[div .transcoding Publishing formats do not seem to be
137 available for this video. It may be possible that the
138 uploaded file is broken and cannot be transcoded.]'
141 $(AUTHOR && printf '[a .button href="edit" edit]')
142 [h1 .name $(HTML "$VIDEO_NAME")]
143 [div .description . ${VIDEO_DESCR_CACHE}]
147 . "$_EXEC/page_404.sh"