[luatex] [tex-live] Location of recorder file

[Akira Kakuto]

Hi Karl,

> I have no idea any more about what code has been applied where,
> but some fix is presumably needed.

In the case of luatex --ini, kpse_program_name is
a garbage. Fortunately, I've found that kpse_invocation_name
is set even in the case of luatex --ini.
After applying the following patch, I think all engines
become ok.

Thanks,
Akira


--- openclose.c.orig	Wed May 04 08:23:00 2011
+++ openclose.c	Sat May 07 12:23:23 2011
@@ -45,11 +45,13 @@
     string cwd;
     pid_t pid = getpid();
     char pid_str[MAX_INT_LENGTH];
+    string prgname;
     sprintf (pid_str, "%ld", (long) pid);
-    
-    recorder_name = xmalloc(strlen(kpse_program_name)
+
+    prgname = remove_suffix (kpse_invocation_name);
+    recorder_name = xmalloc(strlen(prgname)
                                     + strlen (pid_str) + 5);
-    strcpy(recorder_name, kpse_program_name);
+    strcpy(recorder_name, prgname);
     strcat(recorder_name, pid_str);
     strcat(recorder_name, ".fls");
     
--- texfileio.w.orig	Thu May 05 23:59:18 2011
+++ texfileio.w	Sat May 07 12:25:27 2011
@@ -785,13 +785,7 @@
 unsigned char *texmf_log_name;  /* full name of the log file */
 
 static void set_recorder_filename(char *filename) {
-    if (output_directory) {
-        filename = concat3(output_directory, DIR_SEP_STRING, filename);
-        recorder_change_filename(filename);
-        free(filename);
-    } else {
-        recorder_change_filename(filename);
-    }
+    recorder_change_filename(filename);
 }