]> git.ipfire.org Git - thirdparty/binutils-gdb.git/blobdiff - binutils/windres.c
* ChangeLog: Fix typos.
[thirdparty/binutils-gdb.git] / binutils / windres.c
index d08fb97a82d4eea030f9d045616f4242126effc8..1d23f10975e377051d10aed7ff656ebbb9de64fa 100644 (file)
@@ -1,5 +1,6 @@
 /* windres.c -- a program to manipulate Windows resources
-   Copyright 1997 Free Software Foundation, Inc.
+   Copyright 1997, 1998, 1999, 2000, 2001, 2002, 2003
+   Free Software Foundation, Inc.
    Written by Ian Lance Taylor, Cygnus Support.
 
    This file is part of GNU Binutils.
    * The rcl program, written by Gunther Ebert
      <gunther.ebert@ixos-leipzig.de>.
 
-   * The res2coff program, written by Pedro A. Aranda <paag@tid.es>.
-
-   */
+   * The res2coff program, written by Pedro A. Aranda <paag@tid.es>.  */
 
 #include "bfd.h"
 #include "getopt.h"
 #include "bucomm.h"
 #include "libiberty.h"
+#include "safe-ctype.h"
+#include "obstack.h"
 #include "windres.h"
-
 #include <assert.h>
-#include <ctype.h>
+#include <time.h>
+
+/* Used by resrc.c at least.  */
+
+int verbose = 0;
 
 /* An enumeration of format types.  */
 
@@ -98,47 +102,70 @@ struct include_dir
 
 static struct include_dir *include_dirs;
 
-/* Long options.  */
+/* Static functions.  */
 
-/* 150 isn't special; it's just an arbitrary non-ASCII char value.  */
+static void res_init (void);
+static int extended_menuitems (const struct menuitem *);
+static enum res_format format_from_name (const char *, int);
+static enum res_format format_from_filename (const char *, int);
+static void usage (FILE *, int);
+static int cmp_res_entry (const void *, const void *);
+static struct res_directory *sort_resources (struct res_directory *);
+static void reswr_init (void);
+static const char * quot (const char *);
+\f
+/* When we are building a resource tree, we allocate everything onto
+   an obstack, so that we can free it all at once if we want.  */
 
-#define OPTION_DEFINE 150
-#define OPTION_HELP (OPTION_DEFINE + 1)
-#define OPTION_INCLUDE_DIR (OPTION_HELP + 1)
-#define OPTION_LANGUAGE (OPTION_INCLUDE_DIR + 1)
-#define OPTION_PREPROCESSOR (OPTION_LANGUAGE + 1)
-#define OPTION_VERSION (OPTION_PREPROCESSOR + 1)
-#define OPTION_YYDEBUG (OPTION_VERSION + 1)
+#define obstack_chunk_alloc xmalloc
+#define obstack_chunk_free free
 
-static const struct option long_options[] =
+/* The resource building obstack.  */
+
+static struct obstack res_obstack;
+
+/* Initialize the resource building obstack.  */
+
+static void
+res_init (void)
 {
-  {"define", required_argument, 0, OPTION_DEFINE},
-  {"help", no_argument, 0, OPTION_HELP},
-  {"include-dir", required_argument, 0, OPTION_INCLUDE_DIR},
-  {"input-format", required_argument, 0, 'I'},
-  {"language", required_argument, 0, OPTION_LANGUAGE},
-  {"output-format", required_argument, 0, 'O'},
-  {"preprocessor", required_argument, 0, OPTION_PREPROCESSOR},
-  {"target", required_argument, 0, 'F'},
-  {"version", no_argument, 0, OPTION_VERSION},
-  {"yydebug", no_argument, 0, OPTION_YYDEBUG},
-  {0, no_argument, 0, 0}
-};
+  obstack_init (&res_obstack);
+}
 
-/* Static functions.  */
+/* Allocate space on the resource building obstack.  */
+
+void *
+res_alloc (size_t bytes)
+{
+  return (void *) obstack_alloc (&res_obstack, bytes);
+}
+
+/* We also use an obstack to save memory used while writing out a set
+   of resources.  */
+
+static struct obstack reswr_obstack;
+
+/* Initialize the resource writing obstack.  */
+
+static void
+reswr_init (void)
+{
+  obstack_init (&reswr_obstack);
+}
+
+/* Allocate space on the resource writing obstack.  */
 
-static enum res_format format_from_name PARAMS ((const char *));
-static enum res_format format_from_filename PARAMS ((const char *, int));
-static void usage PARAMS ((FILE *, int));
+void *
+reswr_alloc (size_t bytes)
+{
+  return (void *) obstack_alloc (&reswr_obstack, bytes);
+}
 \f
 /* Open a file using the include directory search list.  */
 
 FILE *
-open_file_search (filename, mode, errmsg, real_filename)
-     const char *filename;
-     const char *mode;
-     const char *errmsg;
-     char **real_filename;
+open_file_search (const char *filename, const char *mode, const char *errmsg,
+                 char **real_filename)
 {
   FILE *e;
   struct include_dir *d;
@@ -170,86 +197,18 @@ open_file_search (filename, mode, errmsg, real_filename)
        }
     }
 
-  fatal ("can't open %s `%s': %s", errmsg, filename, strerror (errno));
+  fatal (_("can't open %s `%s': %s"), errmsg, filename, strerror (errno));
 
   /* Return a value to avoid a compiler warning.  */
   return NULL;
 }
 \f
-/* Unicode support.  */
-
-/* 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)
-     unsigned short *length;
-     unsigned short **unicode;
-     const char *ascii;
-{
-  int len;
-  const char *s;
-  unsigned short *w;
-
-  len = strlen (ascii);
-
-  if (length != NULL)
-    {
-      if (len > 0xffff)
-       fatal ("string too long (%d chars > 0xffff)", len);
-      *length = len;
-    }
-
-  *unicode = (unsigned short *) xmalloc ((len + 1) * sizeof (unsigned short));
-
-  for (s = ascii, w = *unicode; *s != '\0'; s++, w++)
-    *w = *s & 0xff;
-  *w = 0;
-}
-
-/* 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.  */
-
-void
-unicode_print (e, unicode, length)
-     FILE *e;
-     const unsigned short *unicode;
-     int length;
-{
-  while (1)
-    {
-      unsigned short ch;
-
-      if (length == 0)
-       return;
-      if (length > 0)
-       --length;
-
-      ch = *unicode;
-
-      if (ch == 0)
-       return;
-
-      ++unicode;
-
-      if ((ch & 0x7f) == ch && isprint (ch))
-       putc (ch, e);
-      else if ((ch & 0xff) == ch)
-       fprintf (e, "\\%03o", (unsigned int) ch);
-      else
-       fprintf (e, "\\x%x", (unsigned int) ch);
-    }
-}
-\f
 /* Compare two resource ID's.  We consider name entries to come before
    numeric entries, because that is how they appear in the COFF .rsrc
    section.  */
 
 int
-res_id_cmp (a, b)
-     struct res_id a;
-     struct res_id b;
+res_id_cmp (struct res_id a, struct res_id b)
 {
   if (! a.named)
     {
@@ -264,7 +223,7 @@ res_id_cmp (a, b)
     }
   else
     {
-      unsigned short *as, *ase, *bs, *bse;
+      unichar *as, *ase, *bs, *bse;
 
       if (! b.named)
        return -1;
@@ -297,31 +256,15 @@ res_id_cmp (a, b)
 /* Print a resource ID.  */
 
 void
-res_id_print (stream, id, quote)
-     FILE *stream;
-     struct res_id id;
-     int quote;
+res_id_print (FILE *stream, struct res_id id, int quote)
 {
   if (! id.named)
     fprintf (stream, "%lu", id.u.id);
   else
     {
-      unsigned short *s, *se;
-
       if (quote)
        putc ('"', stream);
-      s = id.u.n.name;
-      se = s + id.u.n.length;
-      while (s < se)
-       {
-         if (*s == '"')
-           fprintf (stream, "\\\"");
-         else if ((*s & 0xff) == *s && isprint (*s))
-           putc (*s, stream);
-         else
-           fprintf (stream, "\\%03o", *s);
-         ++s;
-       }
+      unicode_print (stream, id.u.n.name, id.u.n.length);
       if (quote)
        putc ('"', stream);
     }
@@ -330,10 +273,7 @@ res_id_print (stream, id, quote)
 /* Print a list of resource ID's.  */
 
 void
-res_ids_print (stream, cids, ids)
-     FILE *stream;
-     int cids;
-     const struct res_id *ids;
+res_ids_print (FILE *stream, int cids, const struct res_id *ids)
 {
   int i;
 
@@ -348,9 +288,7 @@ res_ids_print (stream, cids, ids)
 /* Convert an ASCII string to a resource ID.  */
 
 void
-res_string_to_id (res_id, string)
-     struct res_id *res_id;
-     const char *string;
+res_string_to_id (struct res_id *res_id, const char *string)
 {
   res_id->named = 1;
   unicode_from_ascii (&res_id->u.n.length, &res_id->u.n.name, string);
@@ -365,11 +303,8 @@ res_string_to_id (res_id, string)
    one.  */
 
 struct res_resource *
-define_resource (resources, cids, ids, dupok)
-     struct res_directory **resources;
-     int cids;
-     const struct res_id *ids;
-     int dupok;
+define_resource (struct res_directory **resources, int cids,
+                const struct res_id *ids, int dupok)
 {
   struct res_entry *re = NULL;
   int i;
@@ -381,9 +316,17 @@ define_resource (resources, cids, ids, dupok)
 
       if (*resources == NULL)
        {
-         *resources = (struct res_directory *) xmalloc (sizeof **resources);
+         static unsigned long timeval;
+
+         /* Use the same timestamp for every resource created in a
+             single run.  */
+         if (timeval == 0)
+           timeval = time (NULL);
+
+         *resources = ((struct res_directory *)
+                       res_alloc (sizeof **resources));
          (*resources)->characteristics = 0;
-         (*resources)->time = 0;
+         (*resources)->time = timeval;
          (*resources)->major = 0;
          (*resources)->minor = 0;
          (*resources)->entries = NULL;
@@ -397,7 +340,7 @@ define_resource (resources, cids, ids, dupok)
        re = *pp;
       else
        {
-         re = (struct res_entry *) xmalloc (sizeof *re);
+         re = (struct res_entry *) res_alloc (sizeof *re);
          re->next = NULL;
          re->id = ids[i];
          if ((i + 1) < cids)
@@ -420,7 +363,7 @@ define_resource (resources, cids, ids, dupok)
            {
              fprintf (stderr, "%s: ", program_name);
              res_ids_print (stderr, i, ids);
-             fprintf (stderr, ": expected to be a directory\n");
+             fprintf (stderr, _(": expected to be a directory\n"));
              xexit (1);
            }
 
@@ -432,7 +375,7 @@ define_resource (resources, cids, ids, dupok)
     {
       fprintf (stderr, "%s: ", program_name);
       res_ids_print (stderr, cids, ids);
-      fprintf (stderr, ": expected to be a leaf\n");
+      fprintf (stderr, _(": expected to be a leaf\n"));
       xexit (1);
     }
 
@@ -441,17 +384,16 @@ define_resource (resources, cids, ids, dupok)
       if (dupok)
        return re->u.res;
 
-      fprintf (stderr, "%s: warning: ", program_name);
+      fprintf (stderr, _("%s: warning: "), program_name);
       res_ids_print (stderr, cids, ids);
-      fprintf (stderr, ": duplicate value\n");
+      fprintf (stderr, _(": duplicate value\n"));
     }
 
-  re->u.res = (struct res_resource *) xmalloc (sizeof (struct res_resource));
+  re->u.res = ((struct res_resource *)
+              res_alloc (sizeof (struct res_resource)));
+  memset (re->u.res, 0, sizeof (struct res_resource));
 
   re->u.res->type = RES_TYPE_UNINITIALIZED;
-  memset (&re->u.res->res_info, 0, sizeof (struct res_res_info));
-  memset (&re->u.res->coff_info, 0, sizeof (struct res_coff_info));
-
   return re->u.res;
 }
 
@@ -459,12 +401,8 @@ define_resource (resources, cids, ids, dupok)
    that just takes type, name, and language arguments.  */
 
 struct res_resource *
-define_standard_resource (resources, type, name, language, dupok)
-     struct res_directory **resources;
-     int type;
-     struct res_id name;
-     int language;
-     int dupok;
+define_standard_resource (struct res_directory **resources, int type,
+                         struct res_id name, int language, int dupok)
 {
   struct res_id a[3];
 
@@ -475,13 +413,65 @@ define_standard_resource (resources, type, name, language, dupok)
   a[2].u.id = language;
   return define_resource (resources, 3, a, dupok);
 }
+
+/* Comparison routine for resource sorting.  */
+
+static int
+cmp_res_entry (const void *p1, const void *p2)
+{
+  const struct res_entry **re1, **re2;
+
+  re1 = (const struct res_entry **) p1;
+  re2 = (const struct res_entry **) p2;
+  return res_id_cmp ((*re1)->id, (*re2)->id);
+}
+
+/* Sort the resources.  */
+
+static struct res_directory *
+sort_resources (struct res_directory *resdir)
+{
+  int c, i;
+  struct res_entry *re;
+  struct res_entry **a;
+
+  if (resdir->entries == NULL)
+    return resdir;
+
+  c = 0;
+  for (re = resdir->entries; re != NULL; re = re->next)
+    ++c;
+
+  /* This is a recursive routine, so using xmalloc is probably better
+     than alloca.  */
+  a = (struct res_entry **) xmalloc (c * sizeof (struct res_entry *));
+
+  for (i = 0, re = resdir->entries; re != NULL; re = re->next, i++)
+    a[i] = re;
+
+  qsort (a, c, sizeof (struct res_entry *), cmp_res_entry);
+
+  resdir->entries = a[0];
+  for (i = 0; i < c - 1; i++)
+    a[i]->next = a[i + 1];
+  a[i]->next = NULL;
+
+  free (a);
+
+  /* Now sort the subdirectories.  */
+
+  for (re = resdir->entries; re != NULL; re = re->next)
+    if (re->subdir)
+      re->u.dir = sort_resources (re->u.dir);
+
+  return resdir;
+}
 \f
 /* Return whether the dialog resource DIALOG is a DIALOG or a
    DIALOGEX.  */
 
 int
-extended_dialog (dialog)
-     const struct dialog *dialog;
+extended_dialog (const struct dialog *dialog)
 {
   const struct dialog_control *c;
 
@@ -498,8 +488,13 @@ extended_dialog (dialog)
 /* Return whether MENUITEMS are a MENU or a MENUEX.  */
 
 int
-extended_menu (menuitems)
-     const struct menuitem *menuitems;
+extended_menu (const struct menu *menu)
+{
+  return extended_menuitems (menu->items);
+}
+
+static int
+extended_menuitems (const struct menuitem *menuitems)
 {
   const struct menuitem *mi;
 
@@ -520,7 +515,7 @@ extended_menu (menuitems)
        return 1;
       if (mi->popup != NULL)
        {
-         if (extended_menu (mi->popup))
+         if (extended_menuitems (mi->popup))
            return 1;
        }
     }
@@ -531,8 +526,7 @@ extended_menu (menuitems)
 /* Convert a string to a format type, or exit if it can't be done.  */
 
 static enum res_format
-format_from_name (name)
-     const char *name;
+format_from_name (const char *name, int exit_on_error)
 {
   const struct format_map *m;
 
@@ -540,10 +534,10 @@ format_from_name (name)
     if (strcasecmp (m->name, name) == 0)
       break;
 
-  if (m->name == NULL)
+  if (m->name == NULL && exit_on_error)
     {
-      fprintf (stderr, "%s: unknown format type `%s'\n", program_name, name);
-      fprintf (stderr, "%s: supported formats:", program_name);
+      non_fatal (_("unknown format type `%s'"), name);
+      fprintf (stderr, _("%s: supported formats:"), program_name);
       for (m = format_names; m->name != NULL; m++)
        fprintf (stderr, " %s", m->name);
       fprintf (stderr, "\n");
@@ -557,9 +551,7 @@ format_from_name (name)
    it's OK to look at the file itself.  */
 
 static enum res_format
-format_from_filename (filename, input)
-     const char *filename;
-     int input;
+format_from_filename (const char *filename, int input)
 {
   const char *ext;
   FILE *e;
@@ -581,13 +573,11 @@ format_from_filename (filename, input)
 
   /* If we don't recognize the name of an output file, assume it's a
      COFF file.  */
-
   if (! input)
     return RES_FORMAT_COFF;
 
   /* Read the first few bytes of the file to see if we can guess what
      it is.  */
-
   e = fopen (filename, FOPEN_RB);
   if (e == NULL)
     fatal ("%s: %s", filename, strerror (errno));
@@ -600,8 +590,8 @@ format_from_filename (filename, input)
 
   fclose (e);
 
-  /* A PE executable starts with 0x4d 0x5a 0x90 0x00.  */
-  if (b1 == 0x4d && b2 == 0x5a && b3 == 0x90 && b4 == 0)
+  /* A PE executable starts with 0x4d 0x5a.  */
+  if (b1 == 0x4d && b2 == 0x5a)
     return RES_FORMAT_COFF;
 
   /* A COFF .o file starts with a COFF magic number.  */
@@ -622,15 +612,15 @@ format_from_filename (filename, input)
     return RES_FORMAT_RES;
 
   /* If every character is printable or space, assume it's an RC file.  */
-  if ((isprint (b1) || isspace (b1))
-      && (isprint (b2) || isspace (b2))
-      && (isprint (b3) || isspace (b3))
-      && (isprint (b4) || isspace (b4))
-      && (isprint (b5) || isspace (b5)))
+  if ((ISPRINT (b1) || ISSPACE (b1))
+      && (ISPRINT (b2) || ISSPACE (b2))
+      && (ISPRINT (b3) || ISSPACE (b3))
+      && (ISPRINT (b4) || ISSPACE (b4))
+      && (ISPRINT (b5) || ISSPACE (b5)))
     return RES_FORMAT_RC;
 
   /* Otherwise, we give up.  */
-  fatal ("can not determine type of file `%s'; use the -I option",
+  fatal (_("can not determine type of file `%s'; use the -I option"),
         filename);
 
   /* Return something to silence the compiler warning.  */
@@ -640,57 +630,135 @@ format_from_filename (filename, input)
 /* Print a usage message and exit.  */
 
 static void
-usage (stream, status)
-     FILE *stream;
-     int status;
+usage (FILE *stream, int status)
 {
-  fprintf (stream, "Usage: %s [options] [input-file] [output-file]\n",
+  fprintf (stream, _("Usage: %s [option(s)] [input-file] [output-file]\n"),
           program_name);
-  fprintf (stream, "\
-Options:\n\
-  -i FILE, --input FILE       Name input file\n\
-  -o FILE, --output FILE      Name output file\n\
-  -I FORMAT, --input-format FORMAT\n\
-                              Specify input format\n\
-  -O FORMAT, --output-format FORMAT\n\
-                              Specify output format\n\
-  -F TARGET, --target TARGET  Specify COFF target\n\
-  --preprocessor PROGRAM      Program to use to preprocess rc file\n\
-  --include-dir DIR           Include directory when preprocessing rc file\n\
-  --define SYM[=VAL]          Define SYM when preprocessing rc file\n\
-  --language VAL              Set language when reading rc file\n\
+  fprintf (stream, _(" The options are:\n\
+  -i --input=<file>            Name input file\n\
+  -o --output=<file>           Name output file\n\
+  -J --input-format=<format>   Specify input format\n\
+  -O --output-format=<format>  Specify output format\n\
+  -F --target=<target>         Specify COFF target\n\
+     --preprocessor=<program>  Program to use to preprocess rc file\n\
+  -I --include-dir=<dir>       Include directory when preprocessing rc file\n\
+  -D --define <sym>[=<val>]    Define SYM when preprocessing rc file\n\
+  -U --undefine <sym>          Undefine SYM when preprocessing rc file\n\
+  -v --verbose                 Verbose - tells you what it's doing\n\
+  -l --language=<val>          Set language when reading rc file\n\
+     --use-temp-file           Use a temporary file instead of popen to read\n\
+                               the preprocessor output\n\
+     --no-use-temp-file        Use popen (default)\n"));
 #ifdef YYDEBUG
-  --yydebug                   Turn on parser debugging\n\
+  fprintf (stream, _("\
+     --yydebug                 Turn on parser debugging\n"));
 #endif
-  --help                      Print this help message\n\
-  --version                   Print version information\n");
-  fprintf (stream, "\
+  fprintf (stream, _("\
+  -r                           Ignored for compatibility with rc\n\
+  -h --help                    Print this help message\n\
+  -V --version                 Print version information\n"));
+  fprintf (stream, _("\
 FORMAT is one of rc, res, or coff, and is deduced from the file name\n\
 extension if not specified.  A single file name is an input file.\n\
-No input-file is stdin, default rc.  No output-file is stdout, default rc.\n");
+No input-file is stdin, default rc.  No output-file is stdout, default rc.\n"));
+
   list_supported_targets (program_name, stream);
+
   if (status == 0)
-    fprintf (stream, "Report bugs to bug-gnu-utils@prep.ai.mit.edu\n");
+    fprintf (stream, _("Report bugs to %s\n"), REPORT_BUGS_TO);
+
   exit (status);
 }
 
+/* Quote characters that will confuse the shell when we run the preprocessor.  */
+
+static const char *
+quot (const char *string)
+{
+  static char *buf = 0;
+  static int buflen = 0;
+  int slen = strlen (string);
+  const char *src;
+  char *dest;
+
+  if ((buflen < slen * 2 + 2) || !buf)
+    {
+      buflen = slen * 2 + 2;
+      if (buf)
+       free (buf);
+      buf = (char *) xmalloc (buflen);
+    }
+
+  for (src=string, dest=buf; *src; src++, dest++)
+    {
+      if (*src == '(' || *src == ')' || *src == ' ')
+       *dest++ = '\\';
+      *dest = *src;
+    }
+  *dest = 0;
+  return buf;
+}
+
+/* Long options.  */
+
+/* 150 isn't special; it's just an arbitrary non-ASCII char value.  */
+
+#define OPTION_PREPROCESSOR    150
+#define OPTION_USE_TEMP_FILE   (OPTION_PREPROCESSOR + 1)
+#define OPTION_NO_USE_TEMP_FILE        (OPTION_USE_TEMP_FILE + 1)
+#define OPTION_YYDEBUG         (OPTION_NO_USE_TEMP_FILE + 1)
+
+static const struct option long_options[] =
+{
+  {"input", required_argument, 0, 'i'},
+  {"output", required_argument, 0, 'o'},
+  {"input-format", required_argument, 0, 'J'},
+  {"output-format", required_argument, 0, 'O'},
+  {"target", required_argument, 0, 'F'},
+  {"preprocessor", required_argument, 0, OPTION_PREPROCESSOR},
+  {"include-dir", required_argument, 0, 'I'},
+  {"define", required_argument, 0, 'D'},
+  {"undefine", required_argument, 0, 'U'},
+  {"verbose", no_argument, 0, 'v'},
+  {"language", required_argument, 0, 'l'},
+  {"use-temp-file", no_argument, 0, OPTION_USE_TEMP_FILE},
+  {"no-use-temp-file", no_argument, 0, OPTION_NO_USE_TEMP_FILE},
+  {"yydebug", no_argument, 0, OPTION_YYDEBUG},
+  {"version", no_argument, 0, 'V'},
+  {"help", no_argument, 0, 'h'},
+  {0, no_argument, 0, 0}
+};
+
+/* This keeps gcc happy when using -Wmissing-prototypes -Wstrict-prototypes.  */
+int main (int, char **);
+
 /* The main function.  */
 
 int
-main (argc, argv)
-     int argc;
-     char **argv;
+main (int argc, char **argv)
 {
   int c;
   char *input_filename;
   char *output_filename;
   enum res_format input_format;
+  enum res_format input_format_tmp;
   enum res_format output_format;
   char *target;
   char *preprocessor;
   char *preprocargs;
+  const char *quotedarg;
   int language;
   struct res_directory *resources;
+  int use_temp_file;
+
+#if defined (HAVE_SETLOCALE) && defined (HAVE_LC_MESSAGES)
+  setlocale (LC_MESSAGES, "");
+#endif
+#if defined (HAVE_SETLOCALE)
+  setlocale (LC_CTYPE, "");
+#endif
+  bindtextdomain (PACKAGE, LOCALEDIR);
+  textdomain (PACKAGE);
 
   program_name = argv[0];
   xmalloc_set_program_name (program_name);
@@ -698,6 +766,8 @@ main (argc, argv)
   bfd_init ();
   set_default_bfd_target ();
 
+  res_init ();
+
   input_filename = NULL;
   output_filename = NULL;
   input_format = RES_FORMAT_UNKNOWN;
@@ -705,9 +775,10 @@ main (argc, argv)
   target = NULL;
   preprocessor = NULL;
   preprocargs = NULL;
-  language = -1;
+  language = 0x409;   /* LANG_ENGLISH, SUBLANG_ENGLISH_US.  */
+  use_temp_file = 0;
 
-  while ((c = getopt_long (argc, argv, "i:o:I:O:F:", long_options,
+  while ((c = getopt_long (argc, argv, "f:i:l:o:I:J:O:F:D:U:rhHvV", long_options,
                           (int *) 0)) != EOF)
     {
       switch (c)
@@ -716,16 +787,32 @@ main (argc, argv)
          input_filename = optarg;
          break;
 
+       case 'f':
+         /* For compatibility with rc we accept "-fo <name>" as being the
+            equivalent of "-o <name>".  We do not advertise this fact
+            though, as we do not want users to use non-GNU like command
+            line switches.  */
+         if (*optarg != 'o')
+           fatal (_("invalid option -f\n"));
+         optarg++;
+         if (* optarg == 0)
+           {
+             if (optind == argc)
+               fatal (_("No filename following the -fo option.\n"));
+             optarg = argv [optind++];
+           }
+         /* Fall through.  */
+
        case 'o':
          output_filename = optarg;
          break;
 
-       case 'I':
-         input_format = format_from_name (optarg);
+       case 'J':
+         input_format = format_from_name (optarg, 1);
          break;
 
        case 'O':
-         output_format = format_from_name (optarg);
+         output_format = format_from_name (optarg, 1);
          break;
 
        case 'F':
@@ -736,35 +823,57 @@ main (argc, argv)
          preprocessor = optarg;
          break;
 
-       case OPTION_DEFINE:
+       case 'D':
+       case 'U':
          if (preprocargs == NULL)
            {
-             preprocargs = xmalloc (strlen (optarg) + 3);
-             sprintf (preprocargs, "-D%s", optarg);
+             quotedarg = quot (optarg);
+             preprocargs = xmalloc (strlen (quotedarg) + 3);
+             sprintf (preprocargs, "-%c%s", c, quotedarg);
            }
          else
            {
              char *n;
 
-             n = xmalloc (strlen (preprocargs) + strlen (optarg) + 4);
-             sprintf (n, "%s -D%s", preprocargs, optarg);
+             quotedarg = quot (optarg);
+             n = xmalloc (strlen (preprocargs) + strlen (quotedarg) + 4);
+             sprintf (n, "%s -%c%s", preprocargs, c, quotedarg);
              free (preprocargs);
              preprocargs = n;
            }
          break;
 
-       case OPTION_INCLUDE_DIR:
+       case 'r':
+         /* Ignored for compatibility with rc.  */
+         break;
+
+       case 'v':
+         verbose ++;
+         break;
+
+       case 'I':
+         /* For backward compatibility, should be removed in the future.  */
+         input_format_tmp = format_from_name (optarg, 0);
+         if (input_format_tmp != RES_FORMAT_UNKNOWN)
+           {
+             fprintf (stderr, _("Option -I is deprecated for setting the input format, please use -J instead.\n"));
+             input_format = input_format_tmp;
+             break;
+           }
+
          if (preprocargs == NULL)
            {
-             preprocargs = xmalloc (strlen (optarg) + 3);
-             sprintf (preprocargs, "-I%s", optarg);
+             quotedarg = quot (optarg);
+             preprocargs = xmalloc (strlen (quotedarg) + 3);
+             sprintf (preprocargs, "-I%s", quotedarg);
            }
          else
            {
              char *n;
 
-             n = xmalloc (strlen (preprocargs) + strlen (optarg) + 4);
-             sprintf (n, "%s -I%s", preprocargs, optarg);
+             quotedarg = quot (optarg);
+             n = xmalloc (strlen (preprocargs) + strlen (quotedarg) + 4);
+             sprintf (n, "%s -I%s", preprocargs, quotedarg);
              free (preprocargs);
              preprocargs = n;
            }
@@ -783,21 +892,30 @@ main (argc, argv)
 
          break;
 
-       case OPTION_LANGUAGE:
+       case 'l':
          language = strtol (optarg, (char **) NULL, 16);
          break;
 
+       case OPTION_USE_TEMP_FILE:
+         use_temp_file = 1;
+         break;
+
+       case OPTION_NO_USE_TEMP_FILE:
+         use_temp_file = 0;
+         break;
+
 #ifdef YYDEBUG
        case OPTION_YYDEBUG:
          yydebug = 1;
          break;
 #endif
 
-       case OPTION_HELP:
+       case 'h':
+       case 'H':
          usage (stdout, 0);
          break;
 
-       case OPTION_VERSION:
+       case 'V':
          print_version ("windres");
          break;
 
@@ -839,14 +957,13 @@ main (argc, argv)
     }
 
   /* Read the input file.  */
-
   switch (input_format)
     {
     default:
       abort ();
     case RES_FORMAT_RC:
       resources = read_rc_file (input_filename, preprocessor, preprocargs,
-                               language);
+                               language, use_temp_file);
       break;
     case RES_FORMAT_RES:
       resources = read_res_file (input_filename);
@@ -856,7 +973,15 @@ main (argc, argv)
       break;
     }
 
+  if (resources == NULL)
+    fatal (_("no resources"));
+
+  /* Sort the resources.  This is required for COFF, convenient for
+     rc, and unimportant for res.  */
+  resources = sort_resources (resources);
+
   /* Write the output file.  */
+  reswr_init ();
 
   switch (output_format)
     {
@@ -876,37 +1001,3 @@ main (argc, argv)
   xexit (0);
   return 0;
 }
-
-struct res_directory *
-read_res_file (filename)
-     const char *filename;
-{
-  fatal ("read_res_file unimplemented");
-  return NULL;
-}
-
-struct res_directory *
-read_coff_rsrc (filename, target)
-     const char *filename;
-     const char *target;
-{
-  fatal ("read_coff_rsrc unimplemented");
-  return NULL;
-}
-
-void
-write_res_file (filename, resources)
-     const char *filename;
-     const struct res_directory *resources;
-{
-  fatal ("write_res_file unimplemented");
-}
-
-void
-write_coff_file (filename, target, resources)
-     const char *filename;
-     const char *target;
-     const struct res_directory *resources;
-{
-  fatal ("write_coff_file unimplemented");
-}