327b121d706190719dda96eaa74a9b6b795df9b8
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., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
28 #include "wine/unicode.h"
35 *****************************************************************************
36 * Function : write_resfile
37 * Syntax : void write_resfile(char *outname, resource_t *top)
39 * outname - Filename to write to
40 * top - The resource-tree to convert
44 *****************************************************************************
46 void write_resfile(char *outname
, resource_t
*top
)
50 char zeros
[3] = {0, 0, 0};
52 fo
= fopen(outname
, "wb");
55 error("Could not open %s\n", outname
);
60 /* Put an empty resource first to signal win32 format */
61 res_t
*res
= new_res();
62 put_dword(res
, 0); /* ResSize */
63 put_dword(res
, 0x00000020); /* HeaderSize */
64 put_word(res
, 0xffff); /* ResType */
66 put_word(res
, 0xffff); /* ResName */
68 put_dword(res
, 0); /* DataVersion */
69 put_word(res
, 0); /* Memory options */
70 put_word(res
, 0); /* Language */
71 put_dword(res
, 0); /* Version */
72 put_dword(res
, 0); /* Charateristics */
73 ret
= fwrite(res
->data
, 1, res
->size
, fo
);
77 error("Error writing %s", outname
);
82 for(; top
; top
= top
->next
)
87 ret
= fwrite(top
->binres
->data
, 1, top
->binres
->size
, fo
);
88 if(ret
!= top
->binres
->size
)
91 error("Error writing %s", outname
);
93 if(win32
&& (top
->binres
->size
& 0x03))
96 ret
= fwrite(zeros
, 1, 4 - (top
->binres
->size
& 0x03), fo
);
97 if(ret
!= 4 - (top
->binres
->size
& 0x03))
100 error("Error writing %s", outname
);