iceshrimp/src/web/app/desktop/tags/drive/browser.tag

<mk-drive-browser>
	<nav>
		<div class="path" oncontextmenu={ pathOncontextmenu }>
			<mk-drive-browser-nav-folder class={ current: folder == null } folder={ null }></mk-drive-browser-nav-folder>
			<virtual each={ folder in hierarchyFolders }><span class="separator"><i class="fa fa-angle-right"></i></span>
				<mk-drive-browser-nav-folder folder={ folder }></mk-drive-browser-nav-folder>
			</virtual><span class="separator" if={ folder != null }><i class="fa fa-angle-right"></i></span><span class="folder current" if={ folder != null }>{ folder.name }</span>
		</div>
		<input class="search" type="search" placeholder="&#xf002; 検索"/>
	</nav>
	<div class="main { uploading: uploads.length > 0, loading: loading }" ref="main" onmousedown={ onmousedown } ondragover={ ondragover } ondragenter={ ondragenter } ondragleave={ ondragleave } ondrop={ ondrop } oncontextmenu={ oncontextmenu }>
		<div class="selection" ref="selection"></div>
		<div class="contents" ref="contents">
			<div class="folders" ref="foldersContainer" if={ folders.length > 0 }>
				<virtual each={ folder in folders }>
					<mk-drive-browser-folder class="folder" folder={ folder }></mk-drive-browser-folder>
				</virtual>
				<button if={ moreFolders }>もっと読み込む</button>
			</div>
			<div class="files" ref="filesContainer" if={ files.length > 0 }>
				<virtual each={ file in files }>
					<mk-drive-browser-file class="file" file={ file }></mk-drive-browser-file>
				</virtual>
				<button if={ moreFiles }>もっと読み込む</button>
			</div>
			<div class="empty" if={ files.length == 0 && folders.length == 0 && !loading }>
				<p if={ draghover }>ドロップですか？いいですよ、ボクはカワイイですからね</p>
				<p if={ !draghover && folder == null }><strong>ドライブには何もありません。</strong><br/>右クリックして「ファイルをアップロード」を選んだり、ファイルをドラッグ&ドロップすることでもアップロードできます。</p>
				<p if={ !draghover && folder != null }>このフォルダーは空です</p>
			</div>
		</div>
		<div class="loading" if={ loading }>
			<div class="spinner">
				<div class="dot1"></div>
				<div class="dot2"></div>
			</div>
		</div>
	</div>
	<div class="dropzone" if={ draghover }></div>
	<mk-uploader ref="uploader"></mk-uploader>
	<input ref="fileInput" type="file" accept="*/*" multiple="multiple" tabindex="-1" onchange={ changeFileInput }/>
	<style type="stylus">
		:scope
			display block

			> nav
				display block
				z-index 2
				width 100%
				overflow auto
				font-size 0.9em
				color #555
				background #fff
				//border-bottom 1px solid #dfdfdf
				box-shadow 0 1px 0 rgba(0, 0, 0, 0.05)

				&, *
					user-select none

				> .path
					display inline-block
					vertical-align bottom
					margin 0
					padding 0 8px
					width calc(100% - 200px)
					line-height 38px
					white-space nowrap

					> *
						display inline-block
						margin 0
						padding 0 8px
						line-height 38px
						cursor pointer

						i
							margin-right 4px

						*
							pointer-events none

						&:hover
							text-decoration underline

						&.current
							font-weight bold
							cursor default

							&:hover
								text-decoration none

						&.separator
							margin 0
							padding 0
							opacity 0.5
							cursor default

							> i
								margin 0

				> .search
					display inline-block
					vertical-align bottom
					user-select text
					cursor auto
					margin 0
					padding 0 18px
					width 200px
					font-size 1em
					line-height 38px
					background transparent
					outline none
					//border solid 1px #ddd
					border none
					border-radius 0
					box-shadow none
					transition color 0.5s ease, border 0.5s ease
					font-family FontAwesome, sans-serif

					&[data-active='true']
						background #fff

					&::-webkit-input-placeholder,
					&:-ms-input-placeholder,
					&:-moz-placeholder
						color $ui-controll-foreground-color

			> .main
				padding 8px
				height calc(100% - 38px)
				overflow auto

				&, *
					user-select none

				&.loading
					cursor wait !important

					*
						pointer-events none

					> .contents
						opacity 0.5

				&.uploading
					height calc(100% - 38px - 100px)

				> .selection
					display none
					position absolute
					z-index 128
					top 0
					left 0
					border solid 1px $theme-color
					background rgba($theme-color, 0.5)
					pointer-events none

				> .contents

					> .folders
						&:after
							content ""
							display block
							clear both

						> .folder
							float left

					> .files
						&:after
							content ""
							display block
							clear both

						> .file
							float left

					> .empty
						padding 16px
						text-align center
						color #999
						pointer-events none

						> p
							margin 0

				> .loading
					.spinner
						margin 100px auto
						width 40px
						height 40px
						text-align center

						animation sk-rotate 2.0s infinite linear

					.dot1, .dot2
						width 60%
						height 60%
						display inline-block
						position absolute
						top 0
						background-color rgba(0, 0, 0, 0.3)
						border-radius 100%

						animation sk-bounce 2.0s infinite ease-in-out

					.dot2
						top auto
						bottom 0
						animation-delay -1.0s

					@keyframes sk-rotate { 100% { transform: rotate(360deg); }}

					@keyframes sk-bounce {
						0%, 100% {
							transform: scale(0.0);
						} 50% {
							transform: scale(1.0);
						}
					}

			> .dropzone
				position absolute
				left 0
				top 38px
				width 100%
				height calc(100% - 38px)
				border dashed 2px rgba($theme-color, 0.5)
				pointer-events none

			> mk-uploader
				height 100px
				padding 16px
				background #fff

			> input
				display none

	</style>
	<script>
		@mixin \api
		@mixin \dialog
		@mixin \input-dialog
		@mixin \stream

		@files = []
		@folders = []
		@hierarchy-folders = []

		@uploads = []

		# 現在の階層(フォルダ)
		# * null でルートを表す
		@folder = null

		@multiple = if @opts.multiple? then @opts.multiple else false

		# ドロップされようとしているか
		@draghover = false

		# 自信の所有するアイテムがドラッグをスタートさせたか
		# (自分自身の階層にドロップできないようにするためのフラグ)
		@is-drag-source = false

		@on \mount ~>
			@refs.uploader.on \uploaded (file) ~>
				@add-file file, true

			@refs.uploader.on \change-uploads (uploads) ~>
				@uploads = uploads
				@update!

			@stream.on \drive_file_created @on-stream-drive-file-created
			@stream.on \drive_file_updated @on-stream-drive-file-updated
			@stream.on \drive_folder_created @on-stream-drive-folder-created
			@stream.on \drive_folder_updated @on-stream-drive-folder-updated

			# Riotのバグでnullを渡しても""になる
			# https://github.com/riot/riot/issues/2080
			#if @opts.folder?
			if @opts.folder? and @opts.folder != ''
				@move @opts.folder
			else
				@load!

		@on \unmount ~>
			@stream.off \drive_file_created @on-stream-drive-file-created
			@stream.off \drive_file_updated @on-stream-drive-file-updated
			@stream.off \drive_folder_created @on-stream-drive-folder-created
			@stream.off \drive_folder_updated @on-stream-drive-folder-updated

		@on-stream-drive-file-created = (file) ~>
			@add-file file, true

		@on-stream-drive-file-updated = (file) ~>
			current = if @folder? then @folder.id else null
			if current != file.folder_id
				@remove-file file
			else
				@add-file file, true

		@on-stream-drive-folder-created = (folder) ~>
			@add-folder folder, true

		@on-stream-drive-folder-updated = (folder) ~>
			current = if @folder? then @folder.id else null
			if current != folder.parent_id
				@remove-folder folder
			else
				@add-folder folder, true

		@onmousedown = (e) ~>
			if (contains @refs.folders-container, e.target) or (contains @refs.files-container, e.target)
				return true

			rect = @refs.main.get-bounding-client-rect!

			left = e.page-x + @refs.main.scroll-left - rect.left - window.page-x-offset
			top = e.page-y + @refs.main.scroll-top - rect.top - window.page-y-offset

			move = (e) ~>
				@refs.selection.style.display = \block

				cursor-x = e.page-x + @refs.main.scroll-left - rect.left - window.page-x-offset
				cursor-y = e.page-y + @refs.main.scroll-top - rect.top - window.page-y-offset
				w = cursor-x - left
				h = cursor-y - top

				if w > 0
					@refs.selection.style.width = w + \px
					@refs.selection.style.left = left + \px
				else
					@refs.selection.style.width = -w + \px
					@refs.selection.style.left = cursor-x + \px

				if h > 0
					@refs.selection.style.height = h + \px
					@refs.selection.style.top = top + \px
				else
					@refs.selection.style.height = -h + \px
					@refs.selection.style.top = cursor-y + \px

			up = (e) ~>
				document.document-element.remove-event-listener \mousemove move
				document.document-element.remove-event-listener \mouseup up

				@refs.selection.style.display = \none

			document.document-element.add-event-listener \mousemove move
			document.document-element.add-event-listener \mouseup up

		@path-oncontextmenu = (e) ~>
			e.prevent-default!
			e.stop-immediate-propagation!
			return false

		@ondragover = (e) ~>
			e.prevent-default!
			e.stop-propagation!

			# ドラッグ元が自分自身の所有するアイテムかどうか
			if !@is-drag-source
				# ドラッグされてきたものがファイルだったら
				if e.data-transfer.effect-allowed == \all
					e.data-transfer.drop-effect = \copy
				else
					e.data-transfer.drop-effect = \move
				@draghover = true
			else
				# 自分自身にはドロップさせない
				e.data-transfer.drop-effect = \none
			return false

		@ondragenter = (e) ~>
			e.prevent-default!
			if !@is-drag-source
				@draghover = true

		@ondragleave = (e) ~>
			@draghover = false

		@ondrop = (e) ~>
			e.prevent-default!
			e.stop-propagation!

			@draghover = false

			# ドロップされてきたものがファイルだったら
			if e.data-transfer.files.length > 0
				Array.prototype.for-each.call e.data-transfer.files, (file) ~>
					@upload file, @folder
				return false

			# データ取得
			data = e.data-transfer.get-data 'text'
			if !data?
				return false

			# パース
			obj = JSON.parse data

			# (ドライブの)ファイルだったら
			if obj.type == \file
				file = obj.id
				if (@files.some (f) ~> f.id == file)
					return false
				@remove-file file
				@api \drive/files/update do
					file_id: file
					folder_id: if @folder? then @folder.id else null
				.then ~>
					# something
				.catch (err, text-status) ~>
					console.error err

			# (ドライブの)フォルダーだったら
			else if obj.type == \folder
				folder = obj.id
				# 移動先が自分自身ならreject
				if @folder? and folder == @folder.id
					return false
				if (@folders.some (f) ~> f.id == folder)
					return false
				@remove-folder folder
				@api \drive/folders/update do
					folder_id: folder
					parent_id: if @folder? then @folder.id else null
				.then ~>
					# something
				.catch (err) ~>
					if err == 'detected-circular-definition'
						@dialog do
							'<i class="fa fa-exclamation-triangle"></i>操作を完了できません'
							'移動先のフォルダーは、移動するフォルダーのサブフォルダーです。'
							[
								text: \OK
							]

			return false

		@oncontextmenu = (e) ~>
			e.prevent-default!
			e.stop-immediate-propagation!

			ctx = document.body.append-child document.create-element \mk-drive-browser-base-contextmenu
			ctx = riot.mount ctx, do
				browser: @
			ctx = ctx.0
			ctx.open do
				x: e.page-x - window.page-x-offset
				y: e.page-y - window.page-y-offset

			return false

		@select-local-file = ~>
			@refs.file-input.click!

		@create-folder = ~>
			name <~ @input-dialog do
				'フォルダー作成'
				'フォルダー名'
				null

			@api \drive/folders/create do
				name: name
				folder_id: if @folder? then @folder.id else undefined
			.then (folder) ~>
				@add-folder folder, true
				@update!
			.catch (err) ~>
				console.error err

		@change-file-input = ~>
			files = @refs.file-input.files
			for i from 0 to files.length - 1
				file = files.item i
				@upload file, @folder

		@upload = (file, folder) ~>
			if folder? and typeof folder == \object
				folder = folder.id
			@refs.uploader.upload file, folder

		@get-selection = ~>
			@files.filter (file) -> file._selected

		@new-window = (folder-id) ~>
			browser = document.body.append-child document.create-element \mk-drive-browser-window
			riot.mount browser, do
				folder: folder-id

		@move = (target-folder) ~>
			if target-folder? and typeof target-folder == \object
				target-folder = target-folder.id

			if target-folder == null
				@go-root!
				return

			@loading = true
			@update!

			@api \drive/folders/show do
				folder_id: target-folder
			.then (folder) ~>
				@folder = folder
				@hierarchy-folders = []

				x = (f) ~>
					@hierarchy-folders.unshift f
					if f.parent?
						x f.parent

				if folder.parent?
					x folder.parent

				@update!
				@load!
			.catch (err, text-status) ->
				console.error err

		@add-folder = (folder, unshift = false) ~>
			current = if @folder? then @folder.id else null
			if current != folder.parent_id
				return

			if (@folders.some (f) ~> f.id == folder.id)
				exist = (@folders.map (f) -> f.id).index-of folder.id
				@folders[exist] = folder
				@update!
				return

			if unshift
				@folders.unshift folder
			else
				@folders.push folder

			@update!

		@add-file = (file, unshift = false) ~>
			current = if @folder? then @folder.id else null
			if current != file.folder_id
				return

			if (@files.some (f) ~> f.id == file.id)
				exist = (@files.map (f) -> f.id).index-of file.id
				@files[exist] = file
				@update!
				return

			if unshift
				@files.unshift file
			else
				@files.push file

			@update!

		@remove-folder = (folder) ~>
			if typeof folder == \object
				folder = folder.id
			@folders = @folders.filter (f) -> f.id != folder
			@update!

		@remove-file = (file) ~>
			if typeof file == \object
				file = file.id
			@files = @files.filter (f) -> f.id != file
			@update!

		@go-root = ~>
			if @folder != null
				@folder = null
				@hierarchy-folders = []
				@update!
				@load!

		@load = ~>
			@folders = []
			@files = []
			@more-folders = false
			@more-files = false
			@loading = true
			@update!

			load-folders = null
			load-files = null

			folders-max = 30
			files-max = 30

			# フォルダ一覧取得
			@api \drive/folders do
				folder_id: if @folder? then @folder.id else null
				limit: folders-max + 1
			.then (folders) ~>
				if folders.length == folders-max + 1
					@more-folders = true
					folders.pop!
				load-folders := folders
				complete!
			.catch (err, text-status) ~>
				console.error err

			# ファイル一覧取得
			@api \drive/files do
				folder_id: if @folder? then @folder.id else null
				limit: files-max + 1
			.then (files) ~>
				if files.length == files-max + 1
					@more-files = true
					files.pop!
				load-files := files
				complete!
			.catch (err, text-status) ~>
				console.error err

			flag = false
			complete = ~>
				if flag
					load-folders.for-each (folder) ~>
						@add-folder folder
					load-files.for-each (file) ~>
						@add-file file
					@loading = false
					@update!
				else
					flag := true

		function contains(parent, child)
			node = child.parent-node
			while node?
				if node == parent
					return true
				node = node.parent-node
			return false
	</script>
</mk-drive-browser>