source: neercs/trunk/src/main.c @ 2591

Last change on this file since 2591 was 2591, checked in by Pascal Terjan, 13 years ago
  • Fix a double free and free everything in case of error
  • Property svn:keywords set to Id
File size: 15.3 KB
Line 
1/*
2 *  neercs        console-based window manager
3 *  Copyright (c) 2006 Sam Hocevar <sam@zoy.org>
4 *                2008 Jean-Yves Lamoureux <jylam@lnxscene.org>
5 *                2008 Pascal Terjan <pterjan@linuxfr.org>
6 *                All Rights Reserved
7 *
8 *  $Id: main.c 2591 2008-07-27 08:25:32Z pterjan $
9 *
10 *  This program is free software. It comes without any warranty, to
11 *  the extent permitted by applicable law. You can redistribute it
12 *  and/or modify it under the terms of the Do What The Fuck You Want
13 *  To Public License, Version 2, as published by Sam Hocevar. See
14 *  http://sam.zoy.org/wtfpl/COPYING for more details.
15 */
16
17#include "config.h"
18
19#include <stdio.h>
20#include <string.h>
21#include <stdlib.h>
22#include <unistd.h>
23#include <fcntl.h>
24#include <signal.h>
25#include <sys/ioctl.h>
26#include <sys/types.h>
27#include <sys/wait.h>
28#include <sys/time.h>
29#include <time.h>
30#include <pwd.h>
31
32
33#if !defined HAVE_GETOPT_LONG
34#   include "mygetopt.h"
35#elif defined HAVE_GETOPT_H
36#   include <getopt.h>
37#endif
38#if defined HAVE_GETOPT_LONG
39#   define mygetopt getopt_long
40#   define myoptind optind
41#   define myoptarg optarg
42#   define myoption option
43#endif
44#include <errno.h>
45#include <cucul.h>
46#include <caca.h>
47
48#include "neercs.h"
49
50
51void version(void)
52{
53    printf("%s\n", PACKAGE_STRING);
54    printf("Copyright (C) 2006, 2008 Sam Hocevar <sam@zoy.org>\n");
55    printf("                         Jean-Yves Lamoureux <jylam@lnxscene.org>\n\n");
56    printf("This is free software.  You may redistribute copies of it under the\n");
57    printf("terms of the Do What The Fuck You Want To Public License, Version 2\n");
58    printf("<http://sam.zoy.org/wtfpl/>.\n");
59    printf("There is NO WARRANTY, to the extent permitted by law.\n");
60    printf("\n");
61    printf("For more informations, visit http://libcaca.zoy.org/wiki/neercs\n");
62}
63
64void usage(int argc, char **argv)
65{
66    printf("%s\n", PACKAGE_STRING);
67    printf("Usage : %s [command1] [command2] ... [commandN]\n", argv[0]);
68    printf("Example : %s zsh top \n\n", argv[0]);
69    printf("Options :\n");
70    printf("\t--config\t-c <file>\t\tuse given config file\n");
71    printf("\t--pid\t\t-P <pid>\t\tgrab <pid>\n");
72    printf("\t\t\t-r [session]\t\treattach to a detached neercs\n");
73    printf("\t\t\t-R [session]\t\treattach if possible, otherwise start a new session\n");
74    printf("\t\t\t-S <name>\t\tname this session <name> instead of <pid>\n");
75    printf("\t--version\t-v \t\t\tdisplay version and exit\n");
76    printf("\t--help\t\t-h \t\t\tthis help\n");
77}
78
79int main(int argc, char **argv)
80{
81    struct screen_list *screen_list = NULL;
82    struct passwd *user_info;
83    char *user_path = NULL, *user_dir = NULL;
84    int i, args, s=0;
85    long long unsigned int last_key_time = 0;
86    int mainret = -1;
87    int attach = 0, forceattach = 0;
88    int *to_grab = NULL;
89    char **to_start = NULL;
90    int nb_to_grab = 0;
91
92    screen_list = create_screen_list();
93    screen_list->default_shell = getenv("SHELL");
94
95    args = argc -1;
96    if(screen_list->default_shell == NULL  && args <= 0)
97    {
98        fprintf(stderr, "Environment variable SHELL not set and no arguments given. kthxbye.\n");
99        goto end;
100    }
101
102    if(args==0)
103        args = 1;
104
105    /* Build local config file path */
106    user_dir = getenv("HOME");
107    if(!user_dir)
108    {
109        user_info = getpwuid(getuid());
110        if(user_info)
111        {
112            user_dir = user_info->pw_dir;
113        }
114    }
115    if(user_dir)
116    {
117        user_path = malloc(strlen(user_dir) + strlen("/.neercsrc") + 1);
118        sprintf(user_path, "%s/%s", user_dir, ".neercsrc");
119    }
120
121
122    screen_list->recurrent_list = (struct recurrent_list*) malloc(sizeof(struct recurrent_list));
123    screen_list->recurrent_list->recurrent = (struct recurrent**) malloc(sizeof(struct recurrent*));
124    if(!screen_list->recurrent_list->recurrent)
125    {
126        fprintf(stderr, "Can't allocate memory at %s:%d\n", __FUNCTION__, __LINE__);
127        goto end;
128    }
129    screen_list->recurrent_list->count = 0;
130
131    for(;;)
132    {
133        int option_index = 0;
134        int pidopt;
135        static struct myoption long_options[] =
136            {
137                { "config",      1, NULL, 'c' },
138#if defined USE_GRAB
139                { "pid",         1, NULL, 'P' },
140#endif
141                { "help",        0, NULL, 'h' },
142                { "version",     0, NULL, 'v' },
143            };
144#if defined USE_GRAB
145        int c = mygetopt(argc, argv, "c:S:R::r::P:hv", long_options, &option_index);
146#else
147        int c = mygetopt(argc, argv, "c:S:R::r::hv", long_options, &option_index);
148#endif
149        if(c == -1)
150            break;
151
152        switch(c)
153        {
154        case 'c': /* --config */
155            if(user_path)
156                free(user_path);
157            user_path = strdup(myoptarg);
158            s+=2;
159            break;
160        case 'S':
161            if(!screen_list->session_name)
162                screen_list->session_name = strdup(myoptarg);
163            s+=2;
164            break;
165        case 'P': /* --pid */
166            pidopt = atoi(myoptarg);
167            if(pidopt <= 0)
168            {
169                fprintf(stderr, "Invalid pid %d\n", pidopt);
170                if(to_grab)
171                    free(to_grab);
172                return -1;
173            }
174            if(!to_grab)
175            {
176                /* At most argc-1-s times -P <pid> + final 0 */
177                to_grab = (int *)malloc(((argc-1-s)/2+1)*sizeof(int));
178                if(!to_grab)
179                {
180                    fprintf(stderr, "Can't allocate memory at %s:%d\n", __FUNCTION__, __LINE__);
181                    goto end;
182                }
183            }
184            to_grab[nb_to_grab++] = pidopt;
185            to_grab[nb_to_grab] = 0;
186            s+=2;
187            break;
188        case 'r':
189            forceattach = 1;
190        case 'R':
191            if(attach)
192            {
193                fprintf(stderr, "Attaching can only be requested once\n");
194                goto end;
195            }
196            if(myoptarg)
197            {
198                if(screen_list->session_name)
199                    free(screen_list->session_name);
200                screen_list->session_name = strdup(myoptarg);
201                s+=1;
202            }
203            attach = 1;
204            s+=1;
205            break;
206        case 'h': /* --help */
207            usage(argc, argv);
208            mainret = 0;
209            goto end;
210            break;
211        case 'v': /* --version */
212            version();
213            mainret = 0;
214            goto end;
215            break;
216        default:
217            fprintf(stderr, "Unknown argument #%d\n", myoptind);
218            goto end;
219            break;
220        }
221    }
222
223    if(s < argc - 1)
224    {
225        to_start = (char**)malloc((argc-s)*sizeof(char*));
226        if(!to_start)
227        {
228            fprintf(stderr, "Can't allocate memory at %s:%d\n", __FUNCTION__, __LINE__);
229            goto end;
230        }
231        for(i=0; i<(argc-1) - s; i++)
232        {
233            to_start[i] = strdup(argv[i+s+1]);
234        }
235        to_start[argc-1-s] = NULL;
236    }
237
238    /* Read global configuration first */
239    read_configuration_file("/etc/neercsrc", screen_list);
240
241    /* Then local one  */
242    if(user_path)
243    {
244        read_configuration_file(user_path, screen_list);
245        free(user_path);
246    }
247
248    if(attach)
249    {
250        char **sockets;
251        if(nb_to_grab || (argc-1 > s))
252        {
253            fprintf(stderr, "-R can not be associated with commands or pids!\n");
254            goto end;
255        }
256
257        sockets = list_sockets(screen_list->socket_dir, screen_list->session_name);
258        if(sockets && sockets[0])
259        {
260            char *session;
261            for(i=0; sockets[i]; i++);
262            i--;
263            screen_list->s_socket_path = strdup(sockets[i]);
264            session = connect_server(screen_list);
265            if(session)
266            {
267                /* Create main canvas and associated caca window */
268                screen_list->cv = cucul_create_canvas(0, 0);
269                screen_list->dp = caca_create_display(screen_list->cv);
270                if(!screen_list->dp)
271                    goto end;
272                caca_set_cursor(screen_list->dp, 1);
273
274                screen_list->c_socket_path = build_socket_path(screen_list->socket_dir, session, 1);
275                create_client_socket(screen_list);
276                request_attach(screen_list);
277                if(screen_list->session_name)
278                    free(screen_list->session_name);
279                screen_list->session_name = session;
280            }
281            else
282            {
283                fprintf(stderr, "Failed to attach!\n");
284                free(screen_list->s_socket_path);
285                screen_list->s_socket_path = NULL;
286                attach = 0;
287            }
288            for(i=0; sockets[i]; i++)
289                free(sockets[i]);
290            free(sockets);
291        }
292        else
293        {
294            fprintf(stderr, "No socket found!\n");
295            attach = 0;
296        }
297        if(forceattach && !attach)
298            goto end;
299    }
300
301    /* Build default session name */
302    if(!screen_list->session_name)
303    {
304        char mypid[32]; /* FIXME Compute the length of PID_MAX ? */
305        snprintf(mypid, 31, "%d", getpid());
306        mypid[31]= '\0';
307        screen_list->session_name = strdup(mypid);
308        if(!screen_list->session_name)
309        {
310            fprintf(stderr, "Can't allocate memory at %s:%d\n", __FUNCTION__, __LINE__);
311            goto end;
312        }
313    }
314    if(!screen_list->c_socket_path)
315        screen_list->c_socket_path =
316            build_socket_path(screen_list->socket_dir, screen_list->session_name, 1);
317
318    if(!screen_list->s_socket_path)
319        screen_list->s_socket_path =
320            build_socket_path(screen_list->socket_dir, screen_list->session_name, 0);
321
322    /* Fork the server if needed */
323    if(!attach)
324    {
325        pid_t pid;
326
327        pid = fork();
328        if(pid < 0)
329        {
330            fprintf(stderr, "Failed to create child process\n");
331            goto end;
332        }
333        if(pid == 0)
334        {
335            int fd;
336            close(0);
337            close(1);
338            close(2);
339            fd = open("/dev/null", O_RDWR|O_CREAT, S_IRUSR|S_IWUSR);
340            dup2(fd, 0);
341#ifndef DEBUG
342            dup2(fd, 1);
343            dup2(fd, 2);
344            if (fd > 2)
345                close(fd);
346#else
347            if(fd != 0)
348                close(fd);
349            fd = open("/tmp/log.txt", O_RDWR|O_CREAT, S_IRUSR|S_IWUSR);
350            dup2(fd, 1);
351            dup2(fd, 2);
352            if (fd > 2)
353                close(fd);
354#endif
355            setsid();
356            return server_main(to_grab, to_start, screen_list);
357        }
358        create_client_socket(screen_list);
359        free(connect_server(screen_list));
360
361        /* Create main canvas and associated caca window */
362        screen_list->cv = cucul_create_canvas(0, 0);
363        screen_list->dp = caca_create_display(screen_list->cv);
364        if(!screen_list->dp)
365            goto end;
366        caca_set_cursor(screen_list->dp, 1);
367
368        request_attach(screen_list);
369    }
370
371    last_key_time = get_us();
372
373    for(;;)
374    {
375        caca_event_t ev;
376        int ret = 0;
377        ssize_t n;
378        char buf[128*1024];
379
380        while (screen_list->c_socket && (n = read(screen_list->c_socket, buf, sizeof(buf)-1)) > 0)
381        {
382            buf[n] = 0;
383            debug("Received from server: %s", buf);
384            if(!strncmp("DETACH", buf, 6))
385            {
386                ret = 1;
387                break;
388            }
389            else if(!strncmp("REFRESH ", buf, 8))
390            {
391                cucul_import_memory(screen_list->cv, buf+8, n-8, "caca");
392
393                caca_refresh_display(screen_list->dp);
394            }
395            else if(!strncmp("CURSOR ", buf, 7))
396            {
397                caca_set_cursor(screen_list->dp, atoi(buf+7));
398            }
399            else if(!strncmp("TITLE ", buf, 6))
400            {
401                caca_set_display_title(screen_list->dp, buf+6);
402                caca_refresh_display(screen_list->dp);
403            }
404            else
405            {
406                debug("Unknown message received from server: %s", buf);
407            }
408        }
409        if(ret)
410            break;
411
412        ret = caca_get_event(screen_list->dp, CACA_EVENT_ANY, &ev, 100000);
413        if(ret)
414            ret = send_event(ev, screen_list);
415
416        if(ret)
417            break;
418    }
419
420    /* Clean up */
421    mainret = 0;
422end:
423    if(screen_list)
424    {
425        if(screen_list->dp)
426            caca_free_display(screen_list->dp);
427
428        if(screen_list->cv)
429            cucul_free_canvas(screen_list->cv);
430
431        for(i = 0; i < screen_list->count; i++)
432        {
433            destroy_screen(screen_list->screen[i]);
434        }
435
436        if(screen_list->s_socket_path)
437            free(screen_list->s_socket_path);
438
439        if(screen_list->c_socket_path)
440        {
441            unlink(screen_list->c_socket_path);
442            free(screen_list->c_socket_path);
443        }
444
445        if(screen_list->c_socket)
446            close(screen_list->c_socket);
447
448        if(screen_list->s_socket)
449            close(screen_list->s_socket);
450
451        if(screen_list->screen)
452            free(screen_list->screen);
453
454        struct option *option = screen_list->config;
455
456        while(option)
457        {
458            struct option *kromeugnon = option;
459            option = option->next;
460            if(kromeugnon->key)   free(kromeugnon->key);
461            if(kromeugnon->value) free(kromeugnon->value);
462            free(kromeugnon);
463        }
464
465        for(i=0; i<screen_list->recurrent_list->count; i++)
466        {
467            remove_recurrent(screen_list->recurrent_list, i);
468            i = 0;
469        }
470
471        if(screen_list->recurrent_list->recurrent)
472            free(screen_list->recurrent_list->recurrent);
473        if(screen_list->recurrent_list)
474            free(screen_list->recurrent_list);
475
476        if(screen_list->session_name)
477            free(screen_list->session_name);
478
479        free(screen_list);
480    }
481
482    return mainret;
483}
484
485
486struct screen_list *create_screen_list(void)
487{
488
489    struct screen_list *screen_list = NULL;
490
491    /* Create screen list */
492    screen_list = (struct screen_list*)     malloc(sizeof(struct screen_list));
493    if(!screen_list)
494    {
495        fprintf(stderr, "Can't allocate memory at %s:%d\n", __FUNCTION__, __LINE__);
496        return NULL;
497    }
498    screen_list->screen = (struct screen**) malloc(sizeof(sizeof(struct screen*)));
499    if(!screen_list->screen)
500    {
501        fprintf(stderr, "Can't allocate memory at %s:%d\n", __FUNCTION__, __LINE__);
502        free(screen_list);
503        return NULL;
504    }
505
506    screen_list->count = 0;
507    screen_list->mini = 1;
508    screen_list->help = 0;
509    screen_list->status = 1;
510    screen_list->wm_type = WM_VSPLIT;
511    screen_list->in_bell = 0;
512    screen_list->pty = screen_list->prevpty = 0;
513    screen_list->dont_update_coords = 0;
514    screen_list->screensaver_timeout = (60) * 1000000;
515    screen_list->screensaver_data = NULL;
516    screen_list->in_screensaver = 0;
517    screen_list->locked = 0;
518    screen_list->lock_offset = 0;
519    screen_list->attached = 1;
520    screen_list->s_socket = 0;
521    screen_list->c_socket = 0;
522    screen_list->socket_dir    = NULL;
523    screen_list->s_socket_path = NULL;
524    screen_list->c_socket_path = NULL;
525    screen_list->session_name  = NULL;
526    screen_list->default_shell = NULL;
527
528    screen_list->autolock_timeout = -1;
529
530
531    screen_list->recurrent_list = NULL;
532    screen_list->cv = NULL;
533    screen_list->dp = NULL;
534
535    memset(screen_list->lockmsg, 0, 1024);
536    memset(screen_list->lockpass, 0, 1024);
537
538    return screen_list;
539}
Note: See TracBrowser for help on using the repository browser.