Changes in directory listing format:

- check if remote have a 'test' utility.
  If 'test' exists - use it for recognize symlinks (test -L)
  and forming "L<symlink>" string in output
- Restore part of source code for handling "L<symlink>"
- check if 'ls' command support option '-Q' and use it if supported
- FIXME: need to write fish_get_unquoted_filename
- FIXME: need to rewrite algorithm of parsing ' -> ' substring
  (relative to -Q option)

New logic will correct show symlinks on lot of OSes, but in some
pure OSes need to review...

vfs/fish.c

@@ -347,6 +347,10 @@ fish_archive_same (struct vfs_class *me, struct vfs_s_super *super,
 
     return flags;
 }
+static char *
+fish_get_unquoted_filename(char *_filename){
+    return g_strdup(_filename);
+}
 
 static int
 fish_dir_load(struct vfs_class *me, struct vfs_s_inode *dir, char *remote_path)
@@ -357,7 +361,7 @@ fish_dir_load(struct vfs_class *me, struct vfs_s_inode *dir, char *remote_path)
     FILE *logfile;
     char *quoted_path;
     int reply_code;
-
+    int ls_use_Qopt=FALSE;
     logfile = MEDATA->logfile;
 
     print_vfs_message(_("fish: Reading directory %s..."), remote_path);
@@ -366,24 +370,54 @@ fish_dir_load(struct vfs_class *me, struct vfs_s_inode *dir, char *remote_path)
     dir->timestamp.tv_sec += fish_directory_timeout;
     quoted_path = name_quote (remote_path, 0);
     fish_command (me, super, NONE,
-	    "#LIST /%s\n"
+"#LIST /%s \n\
-	    "if ls -1 /%s >/dev/null 2>&1 ;\n"
+dr=%s \n\
-	    "then\n"
+if ls -1 /$dr >/dev/null 2>&1 ; then \n\
-	    "ls -lan /%s 2>/dev/null | grep '^[^cbt]' | (\n"
+    Qopt=\"\"\n\
-	      "while read p l u g s m d y n; do\n"
+    if ls -1 -Q >/dev/null 2>&1; then\n\
-	        "echo \"P$p $u.$g\nS$s\nd$m $d $y\n:$n\n\"\n"
+	Qopt=\"Q\"\n\
-	      "done\n"
+	echo \"##! qopt\"\n\
-	    ")\n"
+    fi\n\
-	    "ls -lan /%s 2>/dev/null | grep '^[cb]' | (\n"
+    if test -z \"\"; then \n\
-	      "while read p l u g a i m d y n; do\n"
+	ls -lLan$Qopt \"/$dr\" 2>/dev/null | grep '^[^cbt]' | ( \n\
-	        "echo \"P$p $u.$g\nE$a$i\nd$m $d $y\n:$n\n\"\n"
+	    while read p l u g s m d y n; do \n\
-	      "done\n"
+		echo \"P$p $u.$g\" \n\
-	    ")\n"
+		echo \"S$s\" \n\
-	    "echo '### 200'\n"
+		echo \"d$m $d $y\" \n\
-	    "else\n"
+		if test -L \"/$dr/$n\"; then \n\
-	    "echo '### 500'\n"
+		    echo \"L\"$n \n\
-	    "fi\n",
+		fi \n\
-	    remote_path, quoted_path, quoted_path, quoted_path);
+		echo \":$n\" \n\
+		echo \"\" \n\
+	    done \n\
+	) \n\
+    else \n\
+	ls -lan$Qopt \"/$dr\" 2>/dev/null | grep '^[^cbt]' | ( \n\
+	    while read p l u g s m d y n; do \n\
+	    echo \"P$p $u.$g\" \n\
+	    echo \"S$s\" \n\
+	    echo \"d$m $d $y\" \n\
+	    echo \":$n\" \n\
+	    echo \"\" \n\
+	    done \n\
+	) \n\
+    fi \n\
+    ls -lLan$Qopt \"/$dr\" 2>/dev/null | grep '^[cb]' | ( \n\
+        while read p l u g a i m d y n; do \n\
+	    echo \"P$p $u.$g\" \n\
+	    echo \"E$a$i\" \n\
+	    echo \"d$m $d $y\" \n\
+	    echo \":$n\" \n\
+	    echo \"\" \n\
+	done \n\
+    ) \n\
+    echo '### 200' \n\
+else \n\
+    echo '### 500' \n\
+fi \n\
+",
+remote_path, quoted_path);
+
     g_free (quoted_path);
     ent = vfs_s_generate_entry(me, NULL, dir, 0);
     while (1) {
@@ -398,6 +432,10 @@ fish_dir_load(struct vfs_class *me, struct vfs_s_inode *dir, char *remote_path)
             fputs ("\n", logfile);
 	    fflush (logfile);
 	}
+	if (!strncmp(buffer, "##! qopt", 8)){
+	    ls_use_Qopt=TRUE;
+	    continue;
+	}
 	if (!strncmp(buffer, "### ", 4))
 	    break;
 	if ((!buffer[0])) {
@@ -418,20 +456,26 @@ fish_dir_load(struct vfs_class *me, struct vfs_s_inode *dir, char *remote_path)
 	    if (!strcmp(buffer+1, ".") || !strcmp(buffer+1, ".."))
 			break;  /* We'll do . and .. ourself */
 
-		if (S_ISLNK(ST.st_mode)) {
+		if (S_ISLNK(ST.st_mode) && ! ent->ino->linkname) {
+			
 			while (*copy_buffer){
 				if (strncmp(copy_buffer," -> ",4)==0)
 					filename = copy_buffer;
 				copy_buffer++;
 			}
 			int f_size = filename - linkname;
-			ent->name = malloc(f_size+1);
+			ent->name = g_malloc(f_size+1);
 			strncpy(ent->name,linkname,f_size);
 			ent->name[f_size] = '\0';
-			ent->ino->linkname = strdup(filename + 4);
+			ent->ino->linkname = g_strdup(filename + 4);
 		} else {
 			ent->name = g_strdup(buffer+1);
 		}
+		if (ls_use_Qopt){
+		    char *quoted_str = ent->name;
+		    ent->name = fish_get_unquoted_filename (quoted_str);
+		    g_free(quoted_str);
+		}
 		break;
 	}
 	case 'S':
@@ -469,6 +513,14 @@ fish_dir_load(struct vfs_class *me, struct vfs_s_inode *dir, char *remote_path)
 		      ST.st_rdev = makedev (maj, min);
 #endif
 	          }
+	case 'L':
+		ent->ino->linkname = g_strdup(buffer+1); 
+		if (ls_use_Qopt){
+		    char *quoted_str = ent->ino->linkname;
+		    ent->ino->linkname = fish_get_unquoted_filename (quoted_str);
+		    g_free(quoted_str);
+		}
+		break;
 	}
     }