source: trunk/idl-compiler/c/open_outfile.c

Last change on this file was 326, checked in by cinc, 17 years ago

Portability patches for Windows, Linux, Darwin by Bird.

File size: 4.1 KB
Line 
1/* ***** BEGIN LICENSE BLOCK *****
2* Version: CDDL 1.0/LGPL 2.1
3*
4* The contents of this file are subject to the COMMON DEVELOPMENT AND
5* DISTRIBUTION LICENSE (CDDL) Version 1.0 (the "License"); you may not use
6* this file except in compliance with the License. You may obtain a copy of
7* the License at http://www.sun.com/cddl/
8*
9* Software distributed under the License is distributed on an "AS IS" basis,
10* WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
11* for the specific language governing rights and limitations under the
12* License.
13*
14* The Original Code is "NOM" Netlabs Object Model
15*
16* The Initial Developer of the Original Code is
17* netlabs.org: Chris Wohlgemuth <cinc-ml@netlabs.org>.
18* Portions created by the Initial Developer are Copyright (C) 2007
19* the Initial Developer. All Rights Reserved.
20*
21* Contributor(s):
22*
23* Alternatively, the contents of this file may be used under the terms of
24* the GNU Lesser General Public License Version 2.1 (the "LGPL"), in which
25* case the provisions of the LGPL are applicable instead of those above. If
26* you wish to allow use of your version of this file only under the terms of
27* the LGPL, and not to allow others to use your version of this file under
28* the terms of the CDDL, indicate your decision by deleting the provisions
29* above and replace them with the notice and other provisions required by the
30* LGPL. If you do not delete the provisions above, a recipient may use your
31* version of this file under the terms of any one of the CDDL or the LGPL.
32*
33* ***** END LICENSE BLOCK ***** */
34#ifdef __OS2__
35# include <os2.h>
36#endif /* __OS2__ */
37
38#include <stdlib.h>
39#include <string.h>
40
41#include <glib.h>
42#include <glib/gprintf.h>
43#define INCL_FILE
44#include "parser.h"
45
46typedef struct
47{
48 FILE* pFile;
49 gchar* chrOutFileName;
50}OPENFILEINFO, *POPENFILEINFO;
51
52GArray *pOpenFileArray=NULL;
53
54/**
55 This function opens a file at the location specified by the arguments for the compiler.
56 To support several class definitions in one output file this function maintains a list of
57 once opened files. If the same file is asked again, the file will be opened for appending.
58 Otherwise a new file is created.
59
60 \param gScanner A GScanner struct used during parsing.
61 \param chrOutName The filename with extension added to the path build from the command
62 line arguments when calling the compiler
63
64 \Returns A filehandle or NULL in case of error.
65 */
66FILE* openOutfile(GScanner *gScanner, gchar* chrOutName)
67{
68 gchar* chrTemp;
69 FILE* pFile;
70 int a;
71 OPENFILEINFO oi;
72
73 PARSEINFO *parseInfo=(PPARSEINFO)gScanner->user_data;
74
75 if(!pOpenFileArray)
76 pOpenFileArray=g_array_new(FALSE, TRUE, sizeof(OPENFILEINFO));
77
78 chrTemp=g_build_filename(parseInfo->chrOutfilePath, chrOutName, NULL);
79 if(!chrOutName)
80 {
81 g_message("No output file name. Check if a filestem is specified in the IDL file.");
82 exit(1);
83 }
84
85 for(a=0;a<pOpenFileArray->len;a++)
86 {
87 POPENFILEINFO poi=g_array_index(pOpenFileArray, POPENFILEINFO, a);
88 if(!strcmp(poi->chrOutFileName, chrTemp))
89 {
90 g_free(chrTemp);
91 if((poi->pFile=fopen(poi->chrOutFileName, "a"))==NULL)
92 {
93 g_message("Can't open output file %s", poi->chrOutFileName);
94 exit(1);
95 }
96 return poi->pFile;
97 }
98 }
99
100 if((pFile=fopen(chrTemp, "w"))==NULL)
101 {
102 g_message("Can't open output file %s", chrTemp);
103 g_free(chrTemp);
104 exit(1);
105 }
106 oi.pFile=pFile;
107 oi.chrOutFileName=chrTemp;
108 g_array_append_val(pOpenFileArray, oi);
109
110 return pFile;
111}
112
113/**
114 Close the file opened using openOutFile(). Note that you have to close the
115 file before working on another interface because otherwise reopening will fail.
116 */
117void closeOutfile(FILE* pFile)
118{
119 int a;
120
121 fclose(pFile);
122 for(a=0;a<pOpenFileArray->len;a++)
123 {
124 POPENFILEINFO poi=g_array_index(pOpenFileArray, POPENFILEINFO, a);
125 if(poi->pFile==pFile)
126 {
127 poi->pFile=NULL;
128 break;
129 }
130 }
131}
132
Note: See TracBrowser for help on using the repository browser.