new files for windres

2 files changed, 207 insertions, 0 deletions

diff --git a/binutils/winduni.c b/binutils/winduni.c
new file mode 100644
index 0000000..d79f47a
--- /dev/null
+++ b/binutils/winduni.c
@@ -0,0 +1,147 @@
+/* winduni.c -- unicode support for the windres program.
+   Copyright 1997, 1998 Free Software Foundation, Inc.
+   Written by Ian Lance Taylor, Cygnus Support.
+
+   This file is part of GNU Binutils.
+
+   This program 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 of the License, or
+   (at your option) any later version.
+
+   This program 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; if not, write to the Free Software
+   Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
+   02111-1307, USA.  */
+
+/* This file contains unicode support routines for the windres
+   program.  Ideally, we would have generic unicode support which
+   would work on all systems.  However, we don't.  Instead, on a
+   Windows host, we are prepared to call some Windows routines.  This
+   means that we will generate different output on Windows and Unix
+   hosts, but that seems better than not really supporting unicode at
+   all.  */
+
+#include "bfd.h"
+#include "bucomm.h"
+#include "winduni.h"
+
+#include <ctype.h>
+
+#ifdef _WIN32
+#include <windows.h>
+#endif
+
+/* Convert an ASCII string to a unicode string.  We just copy it,
+   expanding chars to shorts, rather than doing something intelligent.  */
+
+void
+unicode_from_ascii (length, unicode, ascii)
+     int *length;
+     unichar **unicode;
+     const char *ascii;
+{
+  int len;
+  const char *s;
+  unsigned short *w;
+
+  len = strlen (ascii);
+
+  if (length != NULL)
+    *length = len;
+
+  *unicode = ((unichar *) res_alloc ((len + 1) * sizeof (unichar)));
+
+#ifdef _WIN32
+  /* FIXME: On Windows, we should be using MultiByteToWideChar to set
+     the length.  */
+  MultiByteToWideChar (CP_ACP, 0, ascii, len + 1, *unicode, len + 1);
+#else
+  for (s = ascii, w = *unicode; *s != '\0'; s++, w++)
+    *w = *s & 0xff;
+  *w = 0;
+#endif
+}
+
+/* Print the unicode string UNICODE to the file E.  LENGTH is the
+   number of characters to print, or -1 if we should print until the
+   end of the string.  FIXME: On a Windows host, we should be calling
+   some Windows function, probably WideCharToMultiByte.  */
+
+void
+unicode_print (e, unicode, length)
+     FILE *e;
+     const unichar *unicode;
+     int length;
+{
+  while (1)
+    {
+      unichar ch;
+
+      if (length == 0)
+	return;
+      if (length > 0)
+	--length;
+
+      ch = *unicode;
+
+      if (ch == 0 && length < 0)
+	return;
+
+      ++unicode;
+
+      if ((ch & 0x7f) == ch)
+	{
+	  if (ch == '\\')
+	    fputs ("\\", e);
+	  else if (isprint (ch))
+	    putc (ch, e);
+	  else
+	    {
+	      switch (ch)
+		{
+		case ESCAPE_A:
+		  fputs ("\\a", e);
+		  break;
+
+		case ESCAPE_B:
+		  fputs ("\\b", e);
+		  break;
+
+		case ESCAPE_F:
+		  fputs ("\\f", e);
+		  break;
+
+		case ESCAPE_N:
+		  fputs ("\\n", e);
+		  break;
+
+		case ESCAPE_R:
+		  fputs ("\\r", e);
+		  break;
+
+		case ESCAPE_T:
+		  fputs ("\\t", e);
+		  break;
+
+		case ESCAPE_V:
+		  fputs ("\\v", e);
+		  break;
+
+		default:
+		  fprintf (e, "\\%03o", (unsigned int) ch);
+		  break;
+		}
+	    }
+	}
+      else if ((ch & 0xff) == ch)
+	fprintf (e, "\\%03o", (unsigned int) ch);
+      else
+	fprintf (e, "\\x%x", (unsigned int) ch);
+    }
+}
diff --git a/binutils/winduni.h b/binutils/winduni.h
new file mode 100644
index 0000000..13a9af2
--- /dev/null
+++ b/binutils/winduni.h
@@ -0,0 +1,60 @@
+/* winduni.h -- header file for unicode support for windres program.
+   Copyright 1997, 1998 Free Software Foundation, Inc.
+   Written by Ian Lance Taylor, Cygnus Support.
+
+   This file is part of GNU Binutils.
+
+   This program 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 of the License, or
+   (at your option) any later version.
+
+   This program 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; if not, write to the Free Software
+   Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
+   02111-1307, USA.  */
+
+#include <ansidecl.h>
+
+/* This header file declares the types and functions we use for
+   unicode support in windres.  Our unicode support is very limited at
+   present.
+
+   We don't put this stuff in windres.h so that winduni.c doesn't have
+   to include windres.h.  winduni.c needs to includes windows.h, and
+   that would conflict with the definitions of Windows macros we
+   already have in windres.h.  */
+
+/* We use this type to hold a unicode character.  */
+
+typedef unsigned short unichar;
+
+/* Escape character translations.  */
+
+#define ESCAPE_A (007)
+#define ESCAPE_B (010)
+#define ESCAPE_F (014)
+#define ESCAPE_N (012)
+#define ESCAPE_R (015)
+#define ESCAPE_T (011)
+#define ESCAPE_V (013)
+
+/* Convert an ASCII string to a unicode string.  */
+
+extern void unicode_from_ascii
+  PARAMS ((int *, unichar **, const char *));
+
+/* Print a unicode string to a file.  */
+
+extern void unicode_print PARAMS ((FILE *, const unichar *, int));
+
+/* Windres support routine called by unicode_from_ascii.  This is both
+   here and in windres.h.  It should probably be in a separate header
+   file, but it hardly seems worth it for one function.  */
+
+extern PTR res_alloc PARAMS ((size_t));