diff -up a2ps-4.15.5/liba2ps/encoding.c.resource-leak a2ps-4.15.5/liba2ps/encoding.c
--- a2ps-4.15.5/liba2ps/encoding.c.resource-leak 2023-07-25 18:30:14.422699484 +0200
+++ a2ps-4.15.5/liba2ps/encoding.c 2023-07-25 18:34:22.033401969 +0200
@@ -479,7 +479,7 @@ encoding_resolve_font_substitute (struct
if (!res)
{
if (encoding->default_font)
- res = encoding->default_font;
+ res = xstrdup (encoding->default_font);
else
error (1, 0, "cannot find font %s, nor any substitute",
last_font_name);
@@ -895,6 +895,7 @@ dump_encoding_setup (FILE * stream,
font_names [i]);
if (!font_is_to_reencode (job, real_font_name))
da_remove_at (encoding->font_names_used, i);
+ free (real_font_name);
}
/* The number of fonts that, finally, have to be encoded
@@ -911,10 +912,15 @@ dump_encoding_setup (FILE * stream,
fprintf (stream, "/%sdict %zu dict begin\n", encoding->key,
(encoding->composite_flag == true)? nb+nb+ns:nb+ns);
for (i = 0 ; i < nb ; i++)
+ {
+ char *real_font = encoding_resolve_font_substitute (job, encoding,
+ font_names [i]);
fprintf (stream, " /f%s %sEncoding /%s reencode_font\n",
font_names [i],
encoding->name,
- encoding_resolve_font_substitute (job, encoding, font_names [i]));
+ real_font);
+ free (real_font);
+ }
/* Slant font setting */
for (i = 0 ; encoding->slantfont[i].name ; i++ )
@@ -1075,6 +1081,7 @@ encoding_build_faces_wx (a2ps_job * job,
encoding->vector,
encoding->faces_wx [face]);
+ free (true_font_name);
if (encoding->composite_flag)
{
encoding->composite_ratio[i] =