# HG changeset patch
# User Pascal Bellard <pascal.bellard@slitaz.org>
# Date 1448214059 -3600
# Node ID 14374547435a784301358b5c7e2c9bbac6240fc1
# Parent  04c74e2d1c206cfaef0094471093881d6020981e
Add file chooser

diff -r 04c74e2d1c20 -r 14374547435a boot.cgi
--- a/boot.cgi	Sat Nov 21 17:04:33 2015 +0100
+++ b/boot.cgi	Sun Nov 22 18:40:59 2015 +0100
@@ -403,9 +403,13 @@
 	<tr><td>$(_ 'ISO image file full path')
 			<span data-img="info" title="$(_ 'set /dev/cdrom for a physical CD-ROM')"></span>
 		</td>
-		<td><input type="text" name="iso" value="$iso" size="50"/></td></tr>
+		<td><span id="iso"><input type="text" name="iso" value="$iso" /></span>
+		<button data-icon="cd" onclick="ajax('index.cgi?do=file-selection&name=iso', '1', 'iso'); return false"/>
+		</td></tr>
 	<tr><td>$(_ 'Working directory')</td>
-		<td><input type="text" name="workdir" value="$workdir" size="50"/></td></tr>
+		<td><spam id="workdir"><input type="text" id="workdir" name="workdir" value="$workdir" /></spam>
+		<button data-icon="slitaz" onclick="ajax('index.cgi?do=dir-selection&name=workdir', '1', 'workdir'); return false"/>
+		</td></tr>
 	<tr><td>$(_ 'Target partition')
 			<span data-img="info" title="$(_ 'For hard disk installation only. Will create /slitaz tree and keep other files. No partitioning and no formatting.')"></span>
 		</td>
diff -r 04c74e2d1c20 -r 14374547435a index.cgi
--- a/index.cgi	Sat Nov 21 17:04:33 2015 +0100
+++ b/index.cgi	Sun Nov 22 18:40:59 2015 +0100
@@ -69,6 +69,35 @@
 
 case " $(GET) " in
 
+	*\ do\ *)
+		case "$(GET do)" in
+
+		*-selection)		# display Yad file/dir picker (AJAX)
+			title="$(_ 'Choose file')"
+			extra=""
+			[ "$(GET do)" == "dir-selection" ] &&
+				title="$(_ 'Choose directory')" &&
+				extra="--directory"
+			while read name arg ; do
+				case "$(GET do)" in
+					*$name*)
+						extra="$extra $arg" ;;
+				esac
+			done <<EOT
+multiple	--multiple
+preview		--add-preview
+EOT
+			header
+			cat <<EOT
+<input type="text" name="$(GET name)" value="$(DISPLAY=':0.0' \
+XAUTHORITY='/var/run/slim.auth' yad --file-selection --on-top --mouse $extra \
+--width=500 --height=350 --title="$title")" />
+EOT
+			exit 0 ;;
+
+		esac
+		;;
+
 
 	*\ exec\ *)
 		# Execute command and display its result in a terminal-like window