extsay/extsay.c
author Mikael Berthe <mikael@lilotux.net>
Mon, 08 Mar 2010 22:00:09 +0100
changeset 5 fbfc64c5d6be
parent 0 d6d9e95a4ae5
child 7 ad87c711de84
permissions -rw-r--r--
[extsay] Fix ncurses reinitialization
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
0
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
     1
/*
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
     2
   Copyright 2009,2010 Andreas Fett
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
     3
   Copyright 2010 Mikael Berthe
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
     4
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
     5
  Module "extsay"     -- adds a /extsay command
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
     6
                         Spawns an external editor
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
     7
  Original code from Andreas Fett.
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
     8
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
     9
This module is free software: you can redistribute it and/or modify
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    10
it under the terms of the GNU General Public License as published by
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    11
the Free Software Foundation, either version 2 of the License, or
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    12
(at your option) any later version.
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    13
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    14
This program is distributed in the hope that it will be useful,
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    15
but WITHOUT ANY WARRANTY; without even the implied warranty of
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    16
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    17
GNU General Public License for more details.
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    18
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    19
You should have received a copy of the GNU General Public License
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    20
along with this program.  If not, see <http://www.gnu.org/licenses/>.
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    21
*/
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    22
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    23
#include <unistd.h>
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    24
#include <stdlib.h>
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    25
#include <sys/wait.h>
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    26
#include <glib/gstdio.h>
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    27
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    28
#include <mcabber/modules.h>
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    29
#include <mcabber/commands.h>
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    30
#include <mcabber/screen.h>
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    31
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    32
static void extsay_init(void);
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    33
static void extsay_uninit(void);
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    34
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    35
/* Module description */
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    36
module_info_t info_extsay = {
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    37
        .mcabber_version = "0.10.0",
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    38
        .requires        = NULL,
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    39
        .init            = extsay_init,
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    40
        .uninit          = extsay_uninit,
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    41
};
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    42
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    43
// XXX Not very clean, internal function...
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    44
char *load_message_from_file(const char *filename);
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    45
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    46
static char* spawn_editor() {
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    47
  GError *err = NULL;
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    48
  gchar *argv[] = { NULL, NULL };
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    49
  gchar *tmpfile = NULL;
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    50
  gchar *tmpl = "mcabber-XXXXXX";
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    51
  gchar *msg;
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    52
  gboolean ret;
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    53
  gint fd;
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    54
  gint exit_status = 0;
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    55
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    56
  argv[0] = (gchar*)g_getenv("EDITOR");
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    57
  if (argv[0] == NULL) {
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    58
    scr_LogPrint(LPRINT_NORMAL, "Environment variable EDITOR not set.");
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    59
    return NULL;
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    60
  }
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    61
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    62
  fd = g_file_open_tmp(tmpl, &tmpfile, &err);
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    63
  if ( fd < 0 ) {
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    64
    scr_LogPrint(LPRINT_NORMAL, err->message);
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    65
    g_error_free(err);
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    66
    return NULL;
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    67
  }
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    68
  close(fd);
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    69
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    70
  argv[1] = tmpfile;
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    71
5
fbfc64c5d6be [extsay] Fix ncurses reinitialization
Mikael Berthe <mikael@lilotux.net>
parents: 0
diff changeset
    72
  endwin();
0
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    73
  ret = g_spawn_sync(NULL, argv, NULL,
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    74
                     G_SPAWN_CHILD_INHERITS_STDIN|G_SPAWN_SEARCH_PATH,
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    75
                     NULL, NULL, NULL, NULL, &exit_status, &err);
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    76
5
fbfc64c5d6be [extsay] Fix ncurses reinitialization
Mikael Berthe <mikael@lilotux.net>
parents: 0
diff changeset
    77
  raw();
0
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    78
  readline_refresh_screen();
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    79
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    80
  if (!ret) {
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    81
    scr_LogPrint(LPRINT_NORMAL, err->message);
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    82
    return NULL;
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    83
  }
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    84
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    85
  if (WEXITSTATUS(exit_status) != EXIT_SUCCESS) {
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    86
    scr_LogPrint(LPRINT_NORMAL,
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    87
                 "Editor exited with error, discarding message.");
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    88
    return NULL;
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    89
  }
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    90
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    91
  msg = load_message_from_file(tmpfile);
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    92
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    93
  if (g_unlink(tmpfile) != 0) {
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    94
    scr_LogPrint(LPRINT_NORMAL,"Warning, could not remove temp file.");
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    95
  }
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    96
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    97
 return msg;
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    98
}
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    99
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
   100
static void do_extsay(char *args)
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
   101
{
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
   102
  char *msg = spawn_editor();
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
   103
  if (msg) {
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
   104
    say_cmd(msg, 0);
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
   105
    g_free(msg);
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
   106
  }
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
   107
}
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
   108
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
   109
/* Initialization */
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
   110
static void extsay_init(void)
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
   111
{
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
   112
  /* Add command */
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
   113
  cmd_add("extsay", "Use external editor to write a message",
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
   114
          0, 0, do_extsay, NULL);
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
   115
}
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
   116
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
   117
/* Deinitialization */
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
   118
static void extsay_uninit(void)
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
   119
{
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
   120
  /* Unregister command */
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
   121
  cmd_del("extsay");
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
   122
}
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
   123
d6d9e95a4ae5 Initial module repository
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
   124
/* vim: set expandtab cindent cinoptions=>2\:2(0:  For Vim users... */