rxvt-unicode/src/rxvtd.C

/*----------------------------------------------------------------------*
 * File:        rxvtd.C
 *----------------------------------------------------------------------*
 *
 * All portions of code are copyright by their respective author/s.
 * Copyright (c) 2003-2006 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>

#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 (rxvt_connection::unix_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, "CWD") && recv (tok))
                {
                  if (chdir (tok))
                    {
                      delete envv;
                      delete argv;
                      return err ("unable to change to working directory to '%s', aborting: %s.\n",
                                  (char *)tok, strerror (errno));
                    }
                }
              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 ("/");

            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 opt_fork, opt_opendisplay, opt_quiet;

int
main (int argc, const char *const *argv)
{
  rxvt_init ();

  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;
      else
        {
          rxvt_log ("%s: unknown option '%s', aborting.\n", argv [0], argv [i]);
          return EXIT_FAILURE;
        }
    }

  chdir ("/");

  if (opt_opendisplay)
    displays.get (getenv ("DISPLAY")); // open display and never release it

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

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

  free (sockname);

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

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

      ev_default_fork ();
    }

  ev_loop (0);

  return EXIT_SUCCESS;
}

Revision:	1.42
Committed:	Thu Dec 13 18:24:36 2007 UTC (16 years, 5 months ago) by root
Content type:	text/plain
Branch:	MAIN
Changes since 1.41:	+2 -2 lines
Log Message:	* empty log message *
#	Content
1	/----------------------------------------------------------------------
2	* File: rxvtd.C
3	----------------------------------------------------------------------
4	*
5	* All portions of code are copyright by their respective author/s.
6	* Copyright (c) 2003-2006 Marc Lehmann <pcg@goof.com>
7	*
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	#include "../config.h"
24	#include <cstdio>
25	#include <cstdlib>
26	#include <cstdarg>
27	#include <cstring>
28
29	#include <unistd.h>
30	#include <fcntl.h>
31	#include <sys/types.h>
32	#include <sys/stat.h>
33	#include <sys/socket.h>
34	#include <sys/un.h>
35
36	#include <cerrno>
37
38	#include "rxvt.h"
39	#include "rxvtdaemon.h"
40	#include "libptytty.h"
41
42	struct server : rxvt_connection {
43	log_callback log_cb;
44	getfd_callback getfd_cb;
45
46	void read_cb (ev::io &w, int revents); ev::io read_ev;
47	void log_msg (const char *msg);
48	int getfd (int remote_fd);
49
50	server (int fd)
51	{
52	read_ev.set <server, &server::read_cb> (this);
53	log_cb.set <server, &server::log_msg> (this);
54	getfd_cb.set<server, &server::getfd> (this);
55
56	this->fd = fd;
57	fcntl (fd, F_SETFD, FD_CLOEXEC);
58	fcntl (fd, F_SETFL, 0);
59	read_ev.start (fd, ev::READ);
60	}
61
62	void err (const char *format = 0, ...);
63	};
64
65	struct unix_listener {
66	int fd;
67
68	void accept_cb (ev::io &w, int revents); ev::io accept_ev;
69
70	unix_listener (const char *sockname);
71	};
72
73	unix_listener::unix_listener (const char *sockname)
74	{
75	accept_ev.set<unix_listener, &unix_listener::accept_cb> (this);
76
77	sockaddr_un sa;
78
79	if (strlen (sockname) >= sizeof(sa.sun_path))
80	{
81	fputs ("socket name too long, aborting.\n", stderr);
82	exit (EXIT_FAILURE);
83	}
84
85	if ((fd = socket (AF_UNIX, SOCK_STREAM, 0)) < 0)
86	{
87	perror ("unable to create listening socket");
88	exit (EXIT_FAILURE);
89	}
90
91	fcntl (fd, F_SETFD, FD_CLOEXEC);
92	fcntl (fd, F_SETFL, O_NONBLOCK);
93
94	sa.sun_family = AF_UNIX;
95	strcpy (sa.sun_path, sockname);
96
97	unlink (rxvt_connection::unix_sockname ());
98
99	mode_t omask = umask (0077);
100
101	if (bind (fd, (sockaddr *)&sa, sizeof (sa)))
102	{
103	perror ("unable to bind listening socket");
104	exit (EXIT_FAILURE);
105	}
106
107	umask (omask);
108
109	if (listen (fd, 5))
110	{
111	perror ("unable to listen on socket");
112	exit (EXIT_FAILURE);
113	}
114
115	accept_ev.start (fd, ev::READ);
116	}
117
118	void unix_listener::accept_cb (ev::io &w, int revents)
119	{
120	int fd2 = accept (fd, 0, 0);
121
122	if (fd2 >= 0)
123	new server (fd2);
124	}
125
126	int server::getfd (int remote_fd)
127	{
128	send ("GETFD");
129	send (remote_fd);
130	return ptytty::recv_fd (fd);
131	}
132
133	void server::log_msg (const char *msg)
134	{
135	send ("MSG"), send (msg);
136	}
137
138	void server::err (const char *format, ...)
139	{
140	if (format)
141	{
142	char err[1024];
143
144	va_list ap;
145	va_start (ap, format);
146	vsnprintf (err, 1024, format, ap);
147	va_end (ap);
148
149	log_msg (err);
150	}
151
152	send ("END"), send (0);
153	close (fd);
154	delete this;
155	}
156
157	void server::read_cb (ev::io &w, int revents)
158	{
159	auto_str tok;
160
161	if (recv (tok))
162	{
163	if (!strcmp (tok, "NEW"))
164	{
165	stringvec *argv = new stringvec;
166	stringvec *envv = new stringvec;
167
168	for (;;)
169	{
170	if (!recv (tok))
171	return err ();
172
173	if (!strcmp (tok, "END"))
174	break;
175	else if (!strcmp (tok, "ENV") && recv (tok))
176	envv->push_back (strdup (tok));
177	else if (!strcmp (tok, "CWD") && recv (tok))
178	{
179	if (chdir (tok))
180	{
181	delete envv;
182	delete argv;
183	return err ("unable to change to working directory to '%s', aborting: %s.\n",
184	(char *)tok, strerror (errno));
185	}
186	}
187	else if (!strcmp (tok, "ARG") && recv (tok))
188	argv->push_back (strdup (tok));
189	else
190	return err ("protocol error: unexpected NEW token.\n");
191	}
192
193	envv->push_back (0);
194
195	{
196	rxvt_term *term = new rxvt_term;
197
198	term->log_hook = &log_cb;
199	term->getfd_hook = &getfd_cb;
200
201	bool success = true;
202
203	try
204	{
205	term->init (argv, envv);
206	}
207	catch (const class rxvt_failure_exception &e)
208	{
209	success = false;
210	}
211
212	term->log_hook = 0;
213
214	chdir ("/");
215
216	if (!success)
217	term->destroy ();
218
219	send ("END"); send (success ? 1 : 0);
220	}
221	}
222	else
223	return err ("protocol error: request '%s' unsupported.\n", (char *)tok);
224	}
225	else
226	return err ();
227	}
228
229	int opt_fork, opt_opendisplay, opt_quiet;
230
231	int
232	main (int argc, const char const argv)
233	{
234	rxvt_init ();
235
236	for (int i = 1; i < argc; i++)
237	{
238	if (!strcmp (argv [i], "-f") \|\| !strcmp (argv [i], "--fork"))
239	opt_fork = 1;
240	else if (!strcmp (argv [i], "-o") \|\| !strcmp (argv [i], "--opendisplay"))
241	opt_opendisplay = 1;
242	else if (!strcmp (argv [i], "-q") \|\| !strcmp (argv [i], "--quiet"))
243	opt_quiet = 1;
244	else
245	{
246	rxvt_log ("%s: unknown option '%s', aborting.\n", argv [0], argv [i]);
247	return EXIT_FAILURE;
248	}
249	}
250
251	chdir ("/");
252
253	if (opt_opendisplay)
254	displays.get (getenv ("DISPLAY")); // open display and never release it
255
256	char *sockname = rxvt_connection::unix_sockname ();
257	unix_listener l (sockname);
258
259	if (!opt_quiet)
260	{
261	printf ("rxvt-unicode daemon listening on %s.\n", sockname);
262	fflush (stdout);
263	}
264
265	free (sockname);
266
267	if (opt_fork)
268	{
269	pid_t pid = fork ();
270
271	if (pid < 0)
272	{
273	rxvt_log ("unable to fork daemon, aborting.\n");
274	return EXIT_FAILURE;
275	}
276	else if (pid > 0)
277	_exit (EXIT_SUCCESS);
278
279	ev_default_fork ();
280	}
281
282	ev_loop (0);
283
284	return EXIT_SUCCESS;
285	}
286