4 * Copyright 2000 Alexandre Julliard
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
31 #include "wine/library.h"
33 #include "wine/debug.h"
41 void (*func
)( const char *arg
);
45 static char *inherit_str
; /* options to pass to child processes */
47 static void DECLSPEC_NORETURN
out_of_memory(void);
48 static void out_of_memory(void)
50 MESSAGE( "Virtual memory exhausted\n" );
54 static void do_debugmsg( const char *arg
);
55 static void do_dll( const char *arg
);
56 static void do_help( const char *arg
);
57 static void do_version( const char *arg
);
59 static const struct option_descr option_table
[] =
61 { "debugmsg", 0, 1, 1, do_debugmsg
,
62 "--debugmsg name Turn debugging-messages on or off" },
63 { "dll", 0, 1, 1, do_dll
,
64 "--dll name This option is no longer supported" },
65 { "help", 'h', 0, 0, do_help
,
66 "--help,-h Show this help message" },
67 { "version", 'v', 0, 0, do_version
,
68 "--version,-v Display the Wine version" },
69 { NULL
, 0, 0, 0, NULL
, NULL
} /* terminator */
73 static void do_help( const char *arg
)
78 static void do_version( const char *arg
)
80 MESSAGE( "%s\n", PACKAGE_STRING
);
84 static void do_debugmsg( const char *arg
)
86 if (wine_dbg_parse_options( arg
))
88 MESSAGE("wine: Syntax: --debugmsg [class]+xxx,... or -debugmsg [class]-xxx,...\n");
89 MESSAGE("Example: --debugmsg +all,warn-heap\n"
90 " turn on all messages except warning heap messages\n");
91 MESSAGE("Available message classes: err, warn, fixme, trace\n\n");
96 static void do_dll( const char *arg
)
98 MESSAGE("The --dll option has been removed, you should use\n"
99 "the WINEDLLOVERRIDES environment variable instead.\n"
100 "To see a help message, run:\n"
101 " WINEDLLOVERRIDES=help wine <program.exe>\n");
105 static void remove_options( char *argv
[], int pos
, int count
, int inherit
)
110 for (i
= 0; i
< count
; i
++) len
+= strlen(argv
[pos
+i
]) + 1;
113 if (!(inherit_str
= realloc( inherit_str
, strlen(inherit_str
) + 1 + len
)))
115 strcat( inherit_str
, " " );
119 if (!(inherit_str
= malloc( len
))) out_of_memory();
122 for (i
= 0; i
< count
; i
++)
124 strcat( inherit_str
, argv
[pos
+i
] );
125 if (i
< count
-1) strcat( inherit_str
, " " );
128 while ((argv
[pos
] = argv
[pos
+count
])) pos
++;
131 /* parse options from the argv array and remove all the recognized ones */
132 static void parse_options( char *argv
[] )
134 const struct option_descr
*opt
;
137 for (i
= 0; argv
[i
]; i
++)
139 const char *equalarg
= NULL
;
141 if (*p
++ != '-') continue; /* not an option */
142 if (*p
&& !p
[1]) /* short name */
144 if (*p
== '-') break; /* "--" option */
145 for (opt
= option_table
; opt
->longname
; opt
++) if (opt
->shortname
== *p
) break;
149 const char *equal
= strchr (p
, '=');
151 /* check for the long name */
152 for (opt
= option_table
; opt
->longname
; opt
++) {
154 if (!strcmp( p
, opt
->longname
)) break;
159 strlen (opt
->longname
) == equal
- p
&&
160 !strncmp (p
, opt
->longname
, equal
- p
)) {
161 equalarg
= equal
+ 1;
166 if (!opt
->longname
) continue;
170 opt
->func( equalarg
);
171 remove_options( argv
, i
, 1, opt
->inherit
);
173 else if (opt
->has_arg
&& argv
[i
+1])
175 opt
->func( argv
[i
+1] );
176 remove_options( argv
, i
, 2, opt
->inherit
);
181 remove_options( argv
, i
, 1, opt
->inherit
);
187 /* inherit options from WINEOPTIONS variable */
188 static void inherit_options( char *buffer
)
193 char *p
= strtok( buffer
, " \t" );
194 for (n
= 0; n
< sizeof(argv
)/sizeof(argv
[0])-1 && p
; n
++)
197 p
= strtok( NULL
, " \t" );
200 parse_options( argv
);
201 if (argv
[0]) /* an option remains */
203 MESSAGE( "Unknown option '%s' in WINEOPTIONS variable\n\n", argv
[0] );
208 /***********************************************************************
211 void OPTIONS_Usage(void)
213 const struct option_descr
*opt
;
214 MESSAGE( "%s\n\n", PACKAGE_STRING
);
215 MESSAGE( "Usage: wine [options] [--] program_name [arguments]\n" );
216 MESSAGE("The -- has to be used if you specify arguments (of the program)\n\n");
217 MESSAGE( "Options:\n" );
218 for (opt
= option_table
; opt
->longname
; opt
++) MESSAGE( " %s\n", opt
->usage
);
222 /***********************************************************************
223 * OPTIONS_ParseOptions
225 void OPTIONS_ParseOptions( char *argv
[] )
230 if (GetEnvironmentVariableA( "WINEOPTIONS", buffer
, sizeof(buffer
) ) && buffer
[0])
231 inherit_options( buffer
);
234 parse_options( argv
+ 1 );
236 SetEnvironmentVariableA( "WINEOPTIONS", inherit_str
);
238 /* check if any option remains */
239 for (i
= 1; argv
[i
]; i
++)
241 if (!strcmp( argv
[i
], "--" ))
243 remove_options( argv
, i
, 1, 0 );
246 if (argv
[i
][0] == '-')
248 MESSAGE( "Unknown option '%s'\n\n", argv
[i
] );