Release 1.1.14.
[wine/gsoc-2012-control.git] / tools / wrc / writeres.c
blobe26a559e7655cb05bf164946e88a35f636e18c40
1 /*
2 * Write .res file from a resource-tree
4 * Copyright 1998 Bertho A. Stultiens
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
21 #include "config.h"
22 #include "wine/port.h"
24 #include <stdio.h>
25 #include <stdlib.h>
26 #include <string.h>
27 #include <assert.h>
29 #include "wine/unicode.h"
30 #include "wrc.h"
31 #include "genres.h"
32 #include "newstruc.h"
33 #include "utils.h"
36 *****************************************************************************
37 * Function : write_resfile
38 * Syntax : void write_resfile(char *outname, resource_t *top)
39 * Input :
40 * outname - Filename to write to
41 * top - The resource-tree to convert
42 * Output :
43 * Description :
44 * Remarks :
45 *****************************************************************************
47 void write_resfile(char *outname, resource_t *top)
49 FILE *fo;
50 unsigned int ret;
51 char zeros[3] = {0, 0, 0};
53 fo = fopen(outname, "wb");
54 if(!fo)
56 error("Could not open %s\n", outname);
59 if(win32)
61 /* Put an empty resource first to signal win32 format */
62 res_t *res = new_res();
63 put_dword(res, 0); /* ResSize */
64 put_dword(res, 0x00000020); /* HeaderSize */
65 put_word(res, 0xffff); /* ResType */
66 put_word(res, 0);
67 put_word(res, 0xffff); /* ResName */
68 put_word(res, 0);
69 put_dword(res, 0); /* DataVersion */
70 put_word(res, 0); /* Memory options */
71 put_word(res, 0); /* Language */
72 put_dword(res, 0); /* Version */
73 put_dword(res, 0); /* Characteristics */
74 ret = fwrite(res->data, 1, res->size, fo);
75 if(ret != res->size)
77 fclose(fo);
78 error("Error writing %s\n", outname);
80 free(res);
83 for(; top; top = top->next)
85 if(!top->binres)
86 continue;
88 ret = fwrite(top->binres->data, 1, top->binres->size, fo);
89 if(ret != top->binres->size)
91 fclose(fo);
92 error("Error writing %s\n", outname);
94 if(win32 && (top->binres->size & 0x03))
96 /* Write padding */
97 ret = fwrite(zeros, 1, 4 - (top->binres->size & 0x03), fo);
98 if(ret != 4 - (top->binres->size & 0x03))
100 fclose(fo);
101 error("Error writing %s\n", outname);
105 fclose(fo);