rxvt-unicode/src/rxvtd.C

/*----------------------------------------------------------------------*
 * File:        rxvtd.C
 *----------------------------------------------------------------------*
 *
 * All portions of code are copyright by their respective author/s.
 * Copyright (c) 2003-2007 Marc Lehmann <pcg@goof.com>
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 *----------------------------------------------------------------------*/

#include "../config.h"
#include <cstdio>
#include <cstdlib>
#include <cstdarg>
#include <cstring>

#include <unistd.h>
#include <fcntl.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <sys/socket.h>
#include <sys/un.h>

#if defined(ENABLE_FRILLS) && defined(_POSIX_MEMLOCK) && _POSIX_MEMLOCK > 0
# define ENABLE_MLOCK 1
#endif

#if ENABLE_MLOCK
# include <sys/mman.h>
#endif

#include <cerrno>

#include "rxvt.h"
#include "rxvtdaemon.h"
#include "libptytty.h"

struct server : rxvt_connection {
  log_callback log_cb;
  getfd_callback getfd_cb;

  void read_cb (ev::io &w, int revents); ev::io read_ev;
  void log_msg (const char *msg);
  int getfd (int remote_fd);

  server (int fd)
  {
    read_ev.set <server, &server::read_cb> (this);
    log_cb.set  <server, &server::log_msg> (this);
    getfd_cb.set<server, &server::getfd>   (this);

    this->fd = fd;
    fcntl (fd, F_SETFD, FD_CLOEXEC);
    fcntl (fd, F_SETFL, 0);
    read_ev.start (fd, ev::READ);
  }

  void err (const char *format = 0, ...);
};

struct unix_listener {
  int fd;

  void accept_cb (ev::io &w, int revents); ev::io accept_ev;

  unix_listener (const char *sockname);
};

unix_listener::unix_listener (const char *sockname)
{
  accept_ev.set<unix_listener, &unix_listener::accept_cb> (this);

  sockaddr_un sa;

  if (strlen (sockname) >= sizeof(sa.sun_path))
    {
      fputs ("socket name too long, aborting.\n", stderr);
      exit (EXIT_FAILURE);
    }

  if ((fd = socket (AF_UNIX, SOCK_STREAM, 0)) < 0)
    {
      perror ("unable to create listening socket");
      exit (EXIT_FAILURE);
    }

  fcntl (fd, F_SETFD, FD_CLOEXEC);
  fcntl (fd, F_SETFL, O_NONBLOCK);

  sa.sun_family = AF_UNIX;
  strcpy (sa.sun_path, sockname);

  unlink (sockname);

  mode_t omask = umask (0077);

  if (bind (fd, (sockaddr *)&sa, sizeof (sa)))
    {
      perror ("unable to bind listening socket");
      exit (EXIT_FAILURE);
    }

  umask (omask);

  if (listen (fd, 5))
    {
      perror ("unable to listen on socket");
      exit (EXIT_FAILURE);
    }

  accept_ev.start (fd, ev::READ);
}

void unix_listener::accept_cb (ev::io &w, int revents)
{
  int fd2 = accept (fd, 0, 0);

  if (fd2 >= 0)
    new server (fd2);
}

int server::getfd (int remote_fd)
{
  send ("GETFD");
  send (remote_fd);
  return ptytty::recv_fd (fd);
}

void server::log_msg (const char *msg)
{
  send ("MSG"), send (msg);
}

void server::err (const char *format, ...)
{
  if (format)
    {
      char err[1024];

      va_list ap;
      va_start (ap, format);
      vsnprintf (err, 1024, format, ap);
      va_end (ap);

      log_msg (err);
    }

  send ("END"), send (0);
  close (fd);
  delete this;
}

void server::read_cb (ev::io &w, int revents)
{
  auto_str tok;

  if (recv (tok))
    {
      if (!strcmp (tok, "NEW"))
        {
          stringvec *argv = new stringvec;
          stringvec *envv = new stringvec;

          for (;;)
            {
              if (!recv (tok))
                return err ();

              if (!strcmp (tok, "END"))
                break;
              else if (!strcmp (tok, "ENV") && recv (tok))
                envv->push_back (strdup (tok));
              else if (!strcmp (tok, "ARG") && recv (tok))
                argv->push_back (strdup (tok));
              else
                return err ("protocol error: unexpected NEW token.\n");
            }

          envv->push_back (0);

          {
            rxvt_term *term = new rxvt_term;

            term->log_hook = &log_cb;
            term->getfd_hook = &getfd_cb;

            bool success = true;

            try
              {
                term->init (argv, envv);
              }
            catch (const class rxvt_failure_exception &e)
              {
                success = false;
              }

            term->log_hook = 0;

            chdir ("/"); // init might change to different working directory

            if (!success)
              term->destroy ();

            send ("END"); send (success ? 1 : 0);
          }
        }
      else
        return err ("protocol error: request '%s' unsupported.\n", (char *)tok);
    }
  else
    return err ();
}

int
main (int argc, const char *const *argv)
{
  ptytty::init ();

  static char opt_fork, opt_opendisplay, opt_quiet;
#if ENABLE_MLOCK
  static char opt_lock;
#endif

  for (int i = 1; i < argc; i++)
    {
      if (!strcmp (argv [i], "-f") || !strcmp (argv [i], "--fork"))
        opt_fork = 1;
      else if (!strcmp (argv [i], "-o") || !strcmp (argv [i], "--opendisplay"))
        opt_opendisplay = 1;
      else if (!strcmp (argv [i], "-q") || !strcmp (argv [i], "--quiet"))
        opt_quiet = 1;
#if ENABLE_MLOCK
      else if (!strcmp (argv [i], "-m") || !strcmp (argv [i], "--mlock"))
        opt_lock = 1;
#endif
      else
        {
          rxvt_log ("%s: unknown option '%s', aborting.\n", argv [0], argv [i]);
          return EXIT_FAILURE;
        }
    }

  rxvt_init ();

  // optionally open display and never release it.
  if (opt_opendisplay)
    if (const char *dpy = getenv ("DISPLAY"))
      displays.get (dpy ? dpy : ":0"); // move string logic into rxvt_display maybe?

  char *sockname = rxvt_connection::unix_sockname ();
  unix_listener l (sockname);

  chdir ("/");

  if (!opt_quiet)
    {
      printf ("rxvt-unicode daemon listening on %s.\n", sockname);
      fflush (stdout);
    }

  free (sockname);

  pid_t pid = 0;
  if (opt_fork)
    {
      pid = fork ();
    }

#if ENABLE_MLOCK
  // Optionally perform an mlockall so this process does not get swapped out.
  if (opt_lock && !pid)
    if (mlockall (MCL_CURRENT | MCL_FUTURE) < 0)
      perror ("unable to lock into ram");
#endif

  if (opt_fork)
    {
      if (pid < 0)
        {
          rxvt_log ("unable to fork daemon, aborting.\n");
          return EXIT_FAILURE;
        }
      else if (pid > 0)
        _exit (EXIT_SUCCESS);

      ev_loop_fork (EV_DEFAULT_UC);
    }

  ev_run ();

  return EXIT_SUCCESS;
}

Revision:	1.55
Committed:	Sun Dec 12 19:30:10 2010 UTC (15 years, 9 months ago) by sf-exg
Content type:	text/plain
Branch:	MAIN
CVS Tags:	rel-9_10
Changes since 1.54:	+1 -1 lines
Log Message:	Plug leaks.
#	User	Rev	Content
1	root	1.29	/----------------------------------------------------------------------
2	pcg	1.14	* File: rxvtd.C
3			----------------------------------------------------------------------
4			*
5			* All portions of code are copyright by their respective author/s.
6	root	1.43	* Copyright (c) 2003-2007 Marc Lehmann <pcg@goof.com>
7	pcg	1.14	*
8			* This program is free software; you can redistribute it and/or modify
9			* it under the terms of the GNU General Public License as published by
10			* the Free Software Foundation; either version 2 of the License, or
11			* (at your option) any later version.
12			*
13			* This program is distributed in the hope that it will be useful,
14			* but WITHOUT ANY WARRANTY; without even the implied warranty of
15			* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16			* GNU General Public License for more details.
17			*
18			* You should have received a copy of the GNU General Public License
19			* along with this program; if not, write to the Free Software
20			* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
21			----------------------------------------------------------------------/
22
23	pcg	1.9	#include "../config.h"
24	pcg	1.1	#include <cstdio>
25			#include <cstdlib>
26	pcg	1.3	#include <cstdarg>
27			#include <cstring>
28	pcg	1.1
29			#include <unistd.h>
30	pcg	1.12	#include <fcntl.h>
31	pcg	1.5	#include <sys/types.h>
32			#include <sys/stat.h>
33	pcg	1.1	#include <sys/socket.h>
34			#include <sys/un.h>
35
36	root	1.47	#if defined(ENABLE_FRILLS) && defined(_POSIX_MEMLOCK) && _POSIX_MEMLOCK > 0
37			# define ENABLE_MLOCK 1
38			#endif
39
40			#if ENABLE_MLOCK
41			# include <sys/mman.h>
42			#endif
43
44	pcg	1.3	#include <cerrno>
45
46	root	1.27	#include "rxvt.h"
47			#include "rxvtdaemon.h"
48			#include "libptytty.h"
49	pcg	1.3
50	pcg	1.1	struct server : rxvt_connection {
51	pcg	1.10	log_callback log_cb;
52	root	1.22	getfd_callback getfd_cb;
53	pcg	1.10
54	root	1.34	void read_cb (ev::io &w, int revents); ev::io read_ev;
55	pcg	1.10	void log_msg (const char *msg);
56	root	1.22	int getfd (int remote_fd);
57	pcg	1.1
58			server (int fd)
59			{
60	root	1.41	read_ev.set <server, &server::read_cb> (this);
61			log_cb.set <server, &server::log_msg> (this);
62			getfd_cb.set<server, &server::getfd> (this);
63
64	root	1.37	this->fd = fd;
65	root	1.35	fcntl (fd, F_SETFD, FD_CLOEXEC);
66			fcntl (fd, F_SETFL, 0);
67	root	1.34	read_ev.start (fd, ev::READ);
68	pcg	1.1	}
69
70	pcg	1.3	void err (const char *format = 0, ...);
71	pcg	1.1	};
72
73	pcg	1.5	struct unix_listener {
74	pcg	1.1	int fd;
75
76	root	1.34	void accept_cb (ev::io &w, int revents); ev::io accept_ev;
77	pcg	1.1
78	pcg	1.5	unix_listener (const char *sockname);
79	pcg	1.1	};
80
81	pcg	1.5	unix_listener::unix_listener (const char *sockname)
82	pcg	1.1	{
83	root	1.41	accept_ev.set<unix_listener, &unix_listener::accept_cb> (this);
84
85	root	1.30	sockaddr_un sa;
86	ayin	1.33
87	root	1.31	if (strlen (sockname) >= sizeof(sa.sun_path))
88			{
89			fputs ("socket name too long, aborting.\n", stderr);
90			exit (EXIT_FAILURE);
91			}
92	root	1.30
93	root	1.24	if ((fd = socket (AF_UNIX, SOCK_STREAM, 0)) < 0)
94	pcg	1.1	{
95			perror ("unable to create listening socket");
96			exit (EXIT_FAILURE);
97			}
98
99	pcg	1.12	fcntl (fd, F_SETFD, FD_CLOEXEC);
100	root	1.35	fcntl (fd, F_SETFL, O_NONBLOCK);
101	pcg	1.12
102	pcg	1.1	sa.sun_family = AF_UNIX;
103	pcg	1.5	strcpy (sa.sun_path, sockname);
104	pcg	1.1
105	sf-exg	1.55	unlink (sockname);
106	pcg	1.1
107	pcg	1.5	mode_t omask = umask (0077);
108
109	pcg	1.1	if (bind (fd, (sockaddr *)&sa, sizeof (sa)))
110			{
111			perror ("unable to bind listening socket");
112			exit (EXIT_FAILURE);
113			}
114
115	pcg	1.5	umask (omask);
116
117	pcg	1.1	if (listen (fd, 5))
118			{
119			perror ("unable to listen on socket");
120			exit (EXIT_FAILURE);
121			}
122
123	root	1.34	accept_ev.start (fd, ev::READ);
124	pcg	1.1	}
125
126	root	1.34	void unix_listener::accept_cb (ev::io &w, int revents)
127	pcg	1.1	{
128			int fd2 = accept (fd, 0, 0);
129
130			if (fd2 >= 0)
131	root	1.35	new server (fd2);
132	pcg	1.1	}
133
134	root	1.22	int server::getfd (int remote_fd)
135			{
136			send ("GETFD");
137			send (remote_fd);
138	root	1.27	return ptytty::recv_fd (fd);
139	root	1.22	}
140
141	pcg	1.10	void server::log_msg (const char *msg)
142			{
143			send ("MSG"), send (msg);
144			}
145
146	pcg	1.3	void server::err (const char *format, ...)
147	pcg	1.1	{
148	pcg	1.3	if (format)
149			{
150			char err[1024];
151
152			va_list ap;
153			va_start (ap, format);
154			vsnprintf (err, 1024, format, ap);
155			va_end (ap);
156
157	root	1.32	log_msg (err);
158	pcg	1.3	}
159
160	root	1.32	send ("END"), send (0);
161	pcg	1.1	close (fd);
162			delete this;
163			}
164
165	root	1.34	void server::read_cb (ev::io &w, int revents)
166	pcg	1.1	{
167	pcg	1.2	auto_str tok;
168	pcg	1.1
169	pcg	1.2	if (recv (tok))
170	pcg	1.1	{
171	pcg	1.2	if (!strcmp (tok, "NEW"))
172	pcg	1.1	{
173	pcg	1.9	stringvec *argv = new stringvec;
174			stringvec *envv = new stringvec;
175	ayin	1.33
176	pcg	1.2	for (;;)
177			{
178			if (!recv (tok))
179			return err ();
180
181			if (!strcmp (tok, "END"))
182			break;
183	pcg	1.3	else if (!strcmp (tok, "ENV") && recv (tok))
184	root	1.26	envv->push_back (strdup (tok));
185	pcg	1.2	else if (!strcmp (tok, "ARG") && recv (tok))
186	root	1.26	argv->push_back (strdup (tok));
187	pcg	1.2	else
188	root	1.31	return err ("protocol error: unexpected NEW token.\n");
189	pcg	1.2	}
190
191	pcg	1.9	envv->push_back (0);
192	pcg	1.3
193			{
194	pcg	1.10	rxvt_term *term = new rxvt_term;
195	ayin	1.33
196	pcg	1.10	term->log_hook = &log_cb;
197	root	1.22	term->getfd_hook = &getfd_cb;
198	pcg	1.2
199	root	1.42	bool success = true;
200	ayin	1.33
201	pcg	1.10	try
202			{
203	root	1.42	term->init (argv, envv);
204	pcg	1.10	}
205			catch (const class rxvt_failure_exception &e)
206			{
207			success = false;
208			}
209
210	root	1.15	term->log_hook = 0;
211
212	root	1.46	chdir ("/"); // init might change to different working directory
213	pcg	1.10
214			if (!success)
215			term->destroy ();
216
217			send ("END"); send (success ? 1 : 0);
218	pcg	1.3	}
219	pcg	1.1	}
220			else
221	root	1.31	return err ("protocol error: request '%s' unsupported.\n", (char *)tok);
222	pcg	1.1	}
223			else
224	pcg	1.2	return err ();
225	pcg	1.1	}
226
227	sf-exg	1.49	int
228			main (int argc, const char const argv)
229			{
230	root	1.52	ptytty::init ();
231
232	sf-exg	1.54	static char opt_fork, opt_opendisplay, opt_quiet;
233	root	1.47	#if ENABLE_MLOCK
234	sf-exg	1.54	static char opt_lock;
235	root	1.47	#endif
236	root	1.21
237			for (int i = 1; i < argc; i++)
238			{
239			if (!strcmp (argv [i], "-f") \|\| !strcmp (argv [i], "--fork"))
240			opt_fork = 1;
241			else if (!strcmp (argv [i], "-o") \|\| !strcmp (argv [i], "--opendisplay"))
242			opt_opendisplay = 1;
243			else if (!strcmp (argv [i], "-q") \|\| !strcmp (argv [i], "--quiet"))
244			opt_quiet = 1;
245	root	1.47	#if ENABLE_MLOCK
246			else if (!strcmp (argv [i], "-m") \|\| !strcmp (argv [i], "--mlock"))
247			opt_lock = 1;
248			#endif
249	root	1.21	else
250			{
251			rxvt_log ("%s: unknown option '%s', aborting.\n", argv [0], argv [i]);
252			return EXIT_FAILURE;
253			}
254			}
255	ayin	1.33
256	root	1.52	rxvt_init ();
257
258	root	1.45	// optionally open display and never release it.
259	root	1.21	if (opt_opendisplay)
260	root	1.45	if (const char *dpy = getenv ("DISPLAY"))
261			displays.get (dpy ? dpy : ":0"); // move string logic into rxvt_display maybe?
262	root	1.21
263	pcg	1.5	char *sockname = rxvt_connection::unix_sockname ();
264			unix_listener l (sockname);
265	root	1.21
266	root	1.44	chdir ("/");
267
268	root	1.21	if (!opt_quiet)
269			{
270			printf ("rxvt-unicode daemon listening on %s.\n", sockname);
271			fflush (stdout);
272			}
273
274	pcg	1.5	free (sockname);
275
276	root	1.47	pid_t pid = 0;
277	root	1.21	if (opt_fork)
278			{
279	root	1.47	pid = fork ();
280			}
281
282			#if ENABLE_MLOCK
283	root	1.48	// Optionally perform an mlockall so this process does not get swapped out.
284			if (opt_lock && !pid)
285			if (mlockall (MCL_CURRENT \| MCL_FUTURE) < 0)
286			perror ("unable to lock into ram");
287	root	1.47	#endif
288	root	1.21
289	root	1.47	if (opt_fork)
290			{
291	root	1.21	if (pid < 0)
292			{
293			rxvt_log ("unable to fork daemon, aborting.\n");
294			return EXIT_FAILURE;
295			}
296			else if (pid > 0)
297			_exit (EXIT_SUCCESS);
298	root	1.38
299	root	1.51	ev_loop_fork (EV_DEFAULT_UC);
300	root	1.21	}
301
302	root	1.50	ev_run ();
303	pcg	1.1
304			return EXIT_SUCCESS;
305			}
306	pcg	1.7