rxvt-unicode/src/rxvtd.C

/*--------------------------------*-C-*---------------------------------*
 * File:        rxvtd.C
 *----------------------------------------------------------------------*
 *
 * All portions of code are copyright by their respective author/s.
 * Copyright (c) 2003-2004 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 "rxvt.h"
#include "rxvtdaemon.h"
#include "fdpass.h"
#include "iom.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>

extern char **environ;

struct server : rxvt_connection {
  log_callback log_cb;
  getfd_callback getfd_cb;

  void read_cb (io_watcher &w, short revents); io_watcher read_ev;
  void log_msg (const char *msg);
  int getfd (int remote_fd);

  server (int fd)
  : read_ev (this, &server::read_cb),
    log_cb (this, &server::log_msg),
    getfd_cb (this, &server::getfd)
  {
    this->fd = fd;
    read_ev.start (fd, EVENT_READ);
  }

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

struct unix_listener {
  int fd;

  void accept_cb (io_watcher &w, short revents); io_watcher accept_ev;

  unix_listener (const char *sockname);
};

unix_listener::unix_listener (const char *sockname)
: accept_ev (this, &unix_listener::accept_cb)
{
  if ((fd = socket (PF_UNIX, SOCK_STREAM, 0)) < 0)
    {
      perror ("unable to create listening socket");
      exit (EXIT_FAILURE);
    }

  fcntl (fd, F_SETFD, FD_CLOEXEC);

  sockaddr_un sa;

  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, EVENT_READ);
}

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

  if (fd2 >= 0)
    {
      fcntl (fd2, F_SETFD, FD_CLOEXEC);
      new server (fd2);
    }
}

int server::getfd (int remote_fd)
{
#if ENABLE_FRILLS && HAVE_UNIX_FDPASS
  send ("GETFD");
  send (remote_fd);
  return rxvt_recv_fd (fd);
#else
  return -1;
#endif
}

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);

      send ("MSG"), send (err);
    }

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

void server::read_cb (io_watcher &w, short 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 (tok.get ());
              else if (!strcmp (tok, "CWD") && recv (tok))
                {
                  if (chdir (tok))
                    err ("unable to change to working directory to '%s': %s",
                         (char *)tok, strerror (errno));
                }
              else if (!strcmp (tok, "ARG") && recv (tok))
                argv->push_back (tok.get ());
              else
                return err ("protocol error: unexpected NEW token");
            }

          envv->push_back (0);

          {
            char **old_environ = environ;
            environ = envv->begin ();

            rxvt_term *term = new rxvt_term;
            
            term->log_hook = &log_cb;
            term->getfd_hook = &getfd_cb;
            term->argv = argv;
            term->envv = envv;

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

            term->log_hook = 0;

            environ = old_environ;
            chdir ("/");

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

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

int opt_fork, opt_opendisplay, opt_quiet;

int
main (int argc, const char *const *argv)
{
  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;
        }
    }
  
  rxvt_init ();

  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);
    }

  io_manager::loop ();

  return EXIT_SUCCESS;
}

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