*/
/*
- * This file is part of GNU enscript.
+ * This file is part of GNU Enscript.
*
- * This program is free software; you can redistribute it and/or modify
+ * Enscript is free software: you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
- * the Free Software Foundation; either version 2, or (at your option)
- * any later version.
+ * the Free Software Foundation, either version 3 of the License, or
+ * (at your option) any later version.
*
- * This program is distributed in the hope that it will be useful,
+ * Enscript is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
- * along with this program; see the file COPYING. If not, write to
- * the Free Software Foundation, 51 Franklin Street, Fifth Floor,
- * Boston, MA 02110-1301, USA.
+ * along with Enscript. If not, see <http://www.gnu.org/licenses/>.
*/
+#include <limits.h>
#include "gsint.h"
+#include <libgen.h>
/*
* Types and definitions.
double xscale;
double yscale;
int llx, lly, urx, ury; /* Bounding box. */
- char filename[512];
+ char filename[PATH_MAX];
char *skipbuf;
unsigned int skipbuf_len;
unsigned int skipbuf_pos;
Color bgcolor;
struct
{
- char name[512];
+ char name[PATH_MAX];
FontPoint size;
InputEncoding encoding;
} font;
- char filename[512];
+ char filename[PATH_MAX];
} u;
};
static int user_fontp = 0;
/* The user ^@font{}-defined font. */
-static char user_font_name[256];
+static char user_font_name[PATH_MAX];
static FontPoint user_font_pt;
static InputEncoding user_font_encoding;
{
char *cp, *cp2;
int i, j, got;
+ char *ps_version_string; /* Version string for PS procsets. */
+
/* Dump PS header only once. */
if (ps_header_dumped)
return;
ps_header_dumped = 1;
+ /* Create version string. */
+ ps_version_string = xstrdup (VERSION);
+ cp = strrchr (ps_version_string, '.');
+ *cp = ' ';
+
/*
* Header.
*/
media->urx, media->ury));
OUTPUT ((cofp, "%%%%Title: %s\n", title));
OUTPUT ((cofp, "%%%%For: %s\n", passwd->pw_gecos));
- OUTPUT ((cofp, "%%%%Creator: %s\n", version_string));
+ OUTPUT ((cofp, "%%%%Creator: %s\n", PACKAGE_STRING));
OUTPUT ((cofp, "%%%%CreationDate: %s\n", date_string));
OUTPUT ((cofp, "%%%%Orientation: %s\n",
((nup > 1) && nup_landscape)
FATAL ((stderr,
_("user font encoding can be only the system's default or `ps'")));
- strcpy (user_font_name, token.u.font.name);
+ memset (user_font_name, 0, sizeof(user_font_name));
+ strncpy (user_font_name, token.u.font.name, sizeof(user_font_name) - 1);
user_font_pt.w = token.u.font.size.w;
user_font_pt.h = token.u.font.size.h;
user_font_encoding = token.u.font.encoding;
buf[i] = ch;
if (i + 1 >= sizeof (buf))
FATAL ((stderr, _("too long argument for %s escape:\n%.*s"),
- escapes[i].name, i, buf));
+ escapes[e].name, i, buf));
}
buf[i] = '\0';
switch (escapes[e].escape)
{
case ESC_FONT:
- strcpy (token->u.font.name, buf);
+ memset (token->u.font.name, 0, sizeof(token->u.font.name));
+ strncpy (token->u.font.name, buf, sizeof(token->u.font.name) - 1);
/* Check for the default font. */
if (strcmp (token->u.font.name, "default") == 0)
FATAL ((stderr, _("malformed font spec for ^@font escape: %s"),
token->u.font.name));
- strcpy (token->u.font.name, cp);
+ memset (token->u.font.name, 0, sizeof(token->u.font.name));
+ strncpy (token->u.font.name, cp, sizeof(token->u.font.name) - 1);
xfree (cp);
}
token->type = tFONT;
break;
case ESC_SETFILENAME:
- strcpy (token->u.filename, buf);
+ memset (token->u.filename, 0, sizeof(token->u.filename));
+ strncpy (token->u.filename, buf, sizeof(token->u.filename) - 1);
token->type = tSETFILENAME;
break;
static void
dump_ps_page_header (char *fname, int empty)
{
- char buf[512];
- char *ftail;
+ char *dirc, *basec, *fdir, *ftail;
int got, i;
char *cp, *cp2;
char *cstr = "%%";
/* The N-up printing sub-page. */
nup_subpage = (total_pages - 1) % nup;
- /* Create fdir and ftail. */
- ftail = strrchr (fname, '/');
-
-#if defined(WIN32)
- if (ftail == NULL)
- ftail = strrchr (fname, '\\');
-#endif /* WIN32 */
-
- if (ftail == NULL)
- {
- buf[0] = '\0';
- ftail = fname;
- }
- else
- {
- ftail++;
- strncpy (buf, fname, ftail - fname);
- buf[ftail - fname] = '\0';
- }
+ /* Split fname into fdir and ftail. */
+ dirc = strdup(fname);
+ basec = strdup(fname);
+ fdir = dirname(dirc);
+ ftail = basename(basec);
if (nup > 1)
{
OUTPUT ((cofp, "/fname (%s) def\n", cp));
xfree (cp);
- cp = escape_string (buf);
+ cp = escape_string (fdir);
OUTPUT ((cofp, "/fdir (%s) def\n", cp));
xfree (cp);
+ xfree (dirc);
cp = escape_string (ftail);
OUTPUT ((cofp, "/ftail (%s) def\n", cp));
xfree (cp);
+ xfree (basec);
/* Do we have a pending ^@font{} font? */
if (user_fontp)
{
int i;
char buf[4096];
+ char *filename;
int line;
int valid_epsf;
float llx, lly, urx, ury;
MESSAGE (2, (stderr, "^@epsf=\"%s\"\n", token->u.epsf.filename));
i = strlen (token->u.epsf.filename);
- if (i > 0 && token->u.epsf.filename[i - 1] == '|')
- {
- /* Read EPS data from pipe. */
- token->u.epsf.pipe = 1;
- token->u.epsf.filename[i - 1] = '\0';
- token->u.epsf.fp = popen (token->u.epsf.filename, "r");
- if (token->u.epsf.fp == NULL)
- {
- MESSAGE (0, (stderr,
- _("epsf: couldn't open pipe to command \"%s\": %s\n"),
- token->u.epsf.filename, strerror (errno)));
- return 0;
- }
- }
- else
- {
- char *filename;
- /* Read EPS data from file. */
- filename = tilde_subst (token->u.epsf.filename);
+ /* Read EPS data from file. */
+ filename = tilde_subst (token->u.epsf.filename);
- token->u.epsf.fp = fopen (filename, "rb");
- xfree (filename);
+ token->u.epsf.fp = fopen (filename, "rb");
+ xfree (filename);
- if (token->u.epsf.fp == NULL)
+ if (token->u.epsf.fp == NULL)
+ {
+ if (token->u.epsf.filename[0] != '/')
{
- if (token->u.epsf.filename[0] != '/')
- {
- /* Name is not absolute, let's lookup path. */
- FileLookupCtx ctx;
+ /* Name is not absolute, let's lookup path. */
+ FileLookupCtx ctx;
- ctx.name = token->u.epsf.filename;
- ctx.suffix = "";
- ctx.fullname = buffer_alloc ();
+ ctx.name = token->u.epsf.filename;
+ ctx.suffix = "";
+ ctx.fullname = buffer_alloc ();
- if (pathwalk (libpath, file_lookup, &ctx))
- token->u.epsf.fp = fopen (buffer_ptr (ctx.fullname), "rb");
+ if (pathwalk (libpath, file_lookup, &ctx))
+ token->u.epsf.fp = fopen (buffer_ptr (ctx.fullname), "rb");
- buffer_free (ctx.fullname);
- }
- if (token->u.epsf.fp == NULL)
- {
- MESSAGE (0, (stderr, _("couldn't open EPS file \"%s\": %s\n"),
- token->u.epsf.filename, strerror (errno)));
- return 0;
- }
+ buffer_free (ctx.fullname);
+ }
+ if (token->u.epsf.fp == NULL)
+ {
+ MESSAGE (0, (stderr, _("couldn't open EPS file \"%s\": %s\n"),
+ token->u.epsf.filename, strerror (errno)));
+ return 0;
}
}