PAEz · June 25, 2023 15:13 · PAEz · Jan 8, 2019 · PAEz · Jan 9, 2019
diff --git a/vlc-delete.lua b/vlc-delete.lua
 --[[
 	Copyright 2015-2016 surrim
 	This program is free software: you can redistribute it and/or modify
 	it under the terms of the GNU General Public License as published by
 	the Free Software Foundation, either version 3 of the License, or
 	(at your option) any later version.
 	This program is distributed in the hope that it will be useful,
 	but WITHOUT ANY WARRANTY; without even the implied warranty of
 	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 	GNU General Public License for more details.
 	You should have received a copy of the GNU General Public License
 	along with this program.  If not, see <http://www.gnu.org/licenses/>.
 ]]--

 function descriptor()
 	return {
 		title = "VLC Delete";
 		version = "0.1";
 		author = "surrim";
 		url = "https://github.com/surrim/vlc-delete/";
 		shortdesc = "Remove current file from playlist and disk";
 		description = [[
 <h1>vlc-delete</h1>"
 When you're playing a file, use VLC Delete to
 delete the current file from your playlist and <b>disk</b> with one click.<br>
 This extension has been tested on GNU Linux with VLC 2.1.5.<br>
 The author is not responsible for damage caused by this extension.
 		]];
   }
 end


 -- Windows - Check if file exists
 function fileExists(file)
 	return io.popen("if exist "..file.." (echo 1)"):read'*l'=='1'
 end


 function sleep(n)  -- seconds
  local t0 = os.clock()
  local tOriginal=t0
  while os.clock() - t0 <= n and os.clock()>=tOriginal do end
 end


 -- Windows - try and delete a file with multiple attempts and a pause between each try - waiting for the file to unlock
 function windowsDelete(file,trys,pause)
 	if not fileExists('"'..file..'"') then return nil,'File does not exist' end
 	for i = trys,1,-1
 	do
 		retval, err = os.remove(file)
 		--retval, err = os.execute('del ' .. file )
 		if retval==true then
 			return true
 		end
 		sleep(pause) -- wish i had a better timer than one second, want misc.mdate..could just bash it but you shouldnt ever wait more than one second so meh
 	end
 	return {nil,'Unable to delete file'}
 end

 function removeItem()
 	local id = vlc.playlist.current()
 	vlc.playlist.delete(id)
 	vlc.playlist.gotoitem(id + 1)
 	vlc.deactivate()
 end

 function activate()
 	local item = vlc.input.item()
 	local uri = item:uri()
 	uri = string.gsub(uri, '^file:///', '')
 	uri = vlc.strings.decode_uri(uri)
 	vlc.msg.info("[vlc-delete] removing: " .. uri)
 	-- check for non windows
 	if (package.config:sub(1,1) == "/") then
 		retval, err = os.execute("trash-put --help > /dev/null")
 		if (retval ~= nil) then
 			uri = "/" .. uri
 			retval, err = os.execute("trash-put \"" .. uri .. "\"")
 		else
 			retval, err = os.execute("rm --help > /dev/null")
 			if (retval ~= nil) then
 				uri = "/" .. uri
 				retval, err = os.execute("rm \"" .. uri .. "\"")
 			end
 		end
 		if (retval ~= nil) then removeItem() end
 	else
 		--windows, remove from playlist first so the file isnt locked by vlc
 		removeItem()
 		uri = string.gsub(uri, "/", "\\")
 		retval, err = windowsDelete(uri,3,1)
 	end

 	if (retval == nil) then
 		vlc.msg.info("[vlc-delete] error: " .. err)
 		d = vlc.dialog("VLC Delete")
 		d:add_label("Could not remove \"" .. uri .. "\"", 1, 1, 1, 1)
 		d:add_label(err, 1, 2, 1, 1)
 		d:add_button("OK", click_ok, 1, 3, 1, 1)
 		d:show()
 	end
 end

 function click_ok()
 	d:delete()
 	vlc.deactivate()
 end

 function deactivate()
 	vlc.deactivate()
 end

 function close()
 	deactivate()
 end

 function meta_changed()
 end