local Luan = require "luan:Luan.luan"
local error = Luan.error
local Io = require "luan:Io.luan"
local Http = require "luan:http/Http.luan"
local Db = require "site:/lib/Db.luan"
local run_in_transaction = Db.run_in_transaction or error()
local Pic = require "site:/lib/Pic.luan"
local get_user_pics = Pic.get_user_pics or error()
local User = require "site:/lib/User.luan"


return function()
	local user = User.current() or error()
	local title = Http.request.parameters.title or error()
	local is_hidden = Http.request.parameters.visible == nil
	local uuid = Http.request.parameters.uuid or error()
	local filename = Http.request.parameters.filename or error()
	local pic
	run_in_transaction( function()
		local pics = get_user_pics(user.id)
		pic = Pic.new{
			uuid = uuid
			filename = filename
			user_id = user.id
			title = title
			is_hidden = is_hidden
			order = #pics > 0 and pics[1].order - 1 or 0
		}
		pic.save()
	end )
	Io.stdout = Http.response.text_writer()
%>
	mixpanel.ours.track( 'Add Pic', null, {send_immediately:true} );
	location = '/links.html?saved&pic=<%=pic.id%>';
<%
end