1 /* The main program - startup */
11 #include <sys/types.h>
13 #include <fcntl.h> /* OS/2 needs this after sys/types.h */
21 #include "bfu/dialog.h"
22 #include "cache/cache.h"
23 #include "config/cmdline.h"
24 #include "config/conf.h"
25 #include "config/home.h"
26 #include "config/kbdbind.h"
27 #include "config/options.h"
28 #include "dialogs/menu.h"
29 #include "document/document.h"
30 #include "intl/charsets.h"
31 #include "intl/gettext/libintl.h"
32 #include "main/event.h"
33 #include "main/interlink.h"
34 #include "main/main.h"
35 #include "main/module.h"
36 #include "main/select.h"
37 #include "main/version.h"
38 #include "network/connection.h"
39 #include "network/dns.h"
40 #include "network/state.h"
41 #include "osdep/osdep.h"
42 #include "osdep/signals.h"
43 #include "osdep/sysname.h"
44 #include "protocol/auth/auth.h"
45 #include "session/download.h"
46 #include "session/session.h"
47 #include "terminal/kbd.h"
48 #include "terminal/screen.h"
49 #include "terminal/terminal.h"
50 #include "util/color.h"
51 #include "util/error.h"
52 #include "util/file.h"
53 #include "util/memdebug.h"
54 #include "util/memory.h"
55 #include "viewer/dump/dump.h"
56 #include "viewer/text/marks.h"
58 struct program program
;
61 static unsigned char **av
;
62 static int init_b
= 0;
64 /* Check if either stdin or stdout are pipes */
66 check_stdio(struct list_head
*url_list
)
68 assert(!remote_session_flags
);
70 /* Should the document be read from stdin? */
71 if (!isatty(STDIN_FILENO
)) {
72 /* Only start reading from stdin if no URL was given on the
74 if (url_list
&& list_empty(*url_list
)) {
75 get_opt_bool("protocol.file.allow_special_files") = 1;
76 add_to_string_list(url_list
, "file:///dev/stdin", 17);
78 get_cmd_opt_bool("no-connect") = 1;
81 /* If called for outputting to a pipe without -dump or -source
82 * specified default to using dump viewer. */
83 if (!isatty(STDOUT_FILENO
)) {
84 int *dump
= &get_cmd_opt_bool("dump");
86 if (!*dump
&& !get_cmd_opt_bool("source"))
94 unsigned char *cwd
= get_cwd();
96 if (!cwd
|| !file_is_dir(cwd
)) {
97 unsigned char *home
= getenv("HOME");
99 if (home
&& file_is_dir(home
))
109 INIT_LIST_HEAD(url_list
);
114 init_static_version();
118 bindtextdomain(PACKAGE
, LOCALEDIR
);
125 init_charsets_lookup();
126 init_colors_lookup();
127 init_modules(main_modules
);
130 register_modules_options(main_modules
);
131 register_modules_options(builtin_modules
);
136 /* XXX: OS/2 has some stupid bug and the pipe must be created before
137 * socket :-/. -- Mikulas */
138 if (check_terminal_pipes()) {
139 ERROR(gettext("Cannot create a pipe for internal communication."));
140 program
.retval
= RET_FATAL
;
141 program
.terminate
= 1;
145 /* Parsing command line options */
146 ret
= parse_options(ac
- 1, av
+ 1, &url_list
);
148 /* Command line handlers return RET_COMMAND to signal that they
149 * completed successfully and that the program should stop. */
150 if (ret
!= RET_COMMAND
)
151 program
.retval
= ret
;
152 program
.terminate
= 1;
153 free_string_list(&url_list
);
157 if (!remote_session_flags
) {
158 check_stdio(&url_list
);
161 if (!get_cmd_opt_bool("no-home")) {
165 /* If there's no -no-connect, -dump or -source option, check if there's
166 * no other ELinks running. If we found any, by-pass initialization of
167 * non critical subsystems, open socket and act as a slave for it. */
168 if (get_cmd_opt_bool("no-connect")
169 || get_cmd_opt_bool("dump")
170 || get_cmd_opt_bool("source")
171 || (fd
= init_interlink()) == -1) {
174 update_options_visibility();
175 /* Parse commandline options again, in order to override any
176 * config file options. */
177 parse_options(ac
- 1, av
+ 1, NULL
);
178 /* ... and re-check stdio, in order to override any command
179 * line options! >;) */
180 if (!remote_session_flags
) {
185 init_modules(builtin_modules
);
188 if (get_cmd_opt_bool("dump")
189 || get_cmd_opt_bool("source")) {
190 /* Dump the URL list */
191 #ifdef CONFIG_ECMASCRIPT
192 /* The ECMAScript code is not good at coping with this. And it
193 * makes currently no sense to evaluate ECMAScript in this
195 get_opt_bool("ecmascript.enable") = 0;
197 if (!list_empty(url_list
)) {
198 dump_next(&url_list
);
200 unsigned char *arg
= get_cmd_opt_bool("dump")
203 usrerror(gettext("URL expected after -%s"), arg
);
204 program
.retval
= RET_SYNTAX
;
205 program
.terminate
= 1;
208 } else if (remote_session_flags
& SES_REMOTE_PING
) {
209 /* If no instance was running return ping failure */
211 usrerror(gettext("No running ELinks found."));
212 program
.retval
= RET_PING
;
214 program
.terminate
= 1;
216 } else if (remote_session_flags
&& fd
== -1) {
217 /* The remote session(s) can not be created */
218 usrerror(gettext("No remote session to connect to."));
219 program
.retval
= RET_REMOTE
;
220 program
.terminate
= 1;
224 struct terminal
*term
= NULL
;
226 if (!encode_session_info(&info
, &url_list
)) {
227 ERROR(gettext("Unable to encode session info."));
228 program
.retval
= RET_FATAL
;
229 program
.terminate
= 1;
231 } else if (fd
!= -1) {
232 /* Attach to already running ELinks and act as a slave
234 close_terminal_pipes();
236 handle_trm(get_input_handle(), get_output_handle(),
237 fd
, fd
, get_ctl_handle(), info
.source
, info
.length
,
238 remote_session_flags
);
240 /* Setup a master terminal */
241 term
= attach_terminal(get_input_handle(), get_output_handle(),
242 get_ctl_handle(), info
.source
, info
.length
);
244 ERROR(gettext("Unable to attach_terminal()."));
245 program
.retval
= RET_FATAL
;
246 program
.terminate
= 1;
250 /* OK, this is race condition, but it must be so; GPM installs
251 * it's own buggy TSTP handler. */
252 if (!program
.terminate
) handle_basic_signals(term
);
256 if (program
.terminate
) close_terminal_pipes();
257 free_string_list(&url_list
);
262 terminate_all_subsystems(void)
265 check_bottom_halves();
266 abort_all_downloads();
267 check_bottom_halves();
268 destroy_all_terminals();
269 check_bottom_halves();
272 /* When aborting all connections also keep-alive connections are
273 * aborted. A (normal) connection will be started for any keep-alive
274 * connection that needs to send a command to the server before
275 * aborting. This means we need to abort_all_connections() twice.
277 * It forces a some what unclean connection tear-down since at most the
278 * shutdown routine will be able to send one command. But else it would
279 * take too long time to terminate. */
280 abort_all_connections();
281 check_bottom_halves();
282 abort_all_connections();
285 #ifdef CONFIG_SCRIPTING
286 trigger_event_name("quit");
291 free_history_lists();
293 done_modules(builtin_modules
);
294 done_screen_drivers();
295 done_saved_session_info();
299 free_charsets_lookup();
300 free_colors_lookup();
301 done_modules(main_modules
);
304 check_bottom_halves();
306 done_state_message();
308 unregister_modules_options(builtin_modules
);
309 unregister_modules_options(main_modules
);
316 shrink_memory(int whole
)
318 shrink_dns_cache(whole
);
319 shrink_format_cache(whole
);
320 garbage_collection(whole
);
323 #ifdef CONFIG_NO_ROOT_EXEC
327 if (!getuid() || !geteuid()) {
328 fprintf(stderr
, "%s\n\n"
329 "Permission to run this program as root "
330 "user was disabled at compile time.\n\n",
331 full_static_version
);
336 #define check_if_root()
340 main(int argc
, char *argv
[])
344 program
.terminate
= 0;
345 program
.retval
= RET_OK
;
346 program
.path
= argv
[0];
348 av
= (unsigned char **) argv
;
351 terminate_all_subsystems();
354 check_memory_leaks();
356 return program
.retval
;