trunk/src/geotoad.c

/*
 * Copyright (C) 2009 Till Harbaum <till@harbaum.org>.
 *
 * This file is part of GPXView.
 *
 * GPXView 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 3 of the License, or
 * (at your option) any later version.
 *
 * GPXView 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 GPXView.  If not, see <http://www.gnu.org/licenses/>.
 */

#include "gpxview.h"

#include <fcntl.h>
#include <sys/types.h>
#include <sys/wait.h>
#include <errno.h>

#define COLOR_ERR     "red"
#define COLOR_OK      "darkgreen"
#define COLOR_SYSTEM  "darkblue"

#define BUFFER_SIZE  256

typedef struct {
  appdata_t *appdata;

  char buf[BUFFER_SIZE];
  int bused;

  /** gdk input tag for async IO */
  gint stdout_tag, stderr_tag;
  gint stdin_fd, stdout_fd, stderr_fd;

  struct log_s {
    GtkTextBuffer *buffer;
    GtkWidget *view;
  } log;
  
} gt_context_t;

static void appendf(struct log_s *log, char *colname, 
                    const char *fmt, ...) {
  va_list args;
  va_start( args, fmt );
  char *buf = g_strdup_vprintf(fmt, args);
  va_end( args );

  printf("append: %s", buf);

  GtkTextTag *tag = NULL;
  if(colname)
    tag = gtk_text_buffer_create_tag(log->buffer, NULL,
                                     "foreground", colname,
                                     NULL);
  
  GtkTextIter end;
  gtk_text_buffer_get_end_iter(log->buffer, &end);
  if(tag) 
    gtk_text_buffer_insert_with_tags(log->buffer, &end, buf, -1, tag, NULL);
  else    
    gtk_text_buffer_insert(log->buffer, &end, buf, -1);

  g_free(buf);

  gtk_text_buffer_get_end_iter(log->buffer, &end);
  gtk_text_view_scroll_to_iter(GTK_TEXT_VIEW(log->view),
                               &end, 0.0, FALSE, 0, 0); 
}

/* watch child process and receive events */
static void child_state_cb(GPid pid, gint status, gpointer data) {
  gt_context_t *context = (gt_context_t*)data;

  puts("child state");

  if(WIFEXITED(status)) {
    printf("child exited with return code %d\n", WEXITSTATUS(status));
  } else
    printf("child failed\n");

  puts("gt exited");

  appendf(&context->log, COLOR_SYSTEM, "GeoToad finished\n");

  appendf(&context->log, COLOR_SYSTEM, "TODO: free context!!!\n");
  //    printf("freeing context\n");
  //    g_free(context);

  /* Reap child if needed. */
  waitpid (pid, NULL, WNOHANG);
}

static gboolean child_input_cb(GIOChannel *source,
                               GIOCondition condition,
                               gpointer data) {
  gt_context_t *context = (gt_context_t*)data;
  int fd = g_io_channel_unix_get_fd(source);
  ssize_t bytes;

  g_assert(condition == G_IO_IN);

  /* append to current buffer content */
  while( (bytes = read(fd, context->buf+context->bused, 
                 sizeof(context->buf) - context->bused - 1)) > 0) {
    context->bused += bytes;
    context->buf[context->bused]='\0';

    /* consume line by line */
    gchar *ptr = context->buf;
    
    /* parse as long as the buffer contains a newline */
    while( strchr(ptr, '\n') != NULL) {
      char *p = strchr(ptr, '\n');
      *p = '\0';

      char *color = NULL;
      if(strstr(ptr, "Saved to ") != NULL)
        color = COLOR_OK;

      appendf(&context->log, color, "%s\n", ptr);

      ptr = p+1;
    }

    /* move remaining bytes down the buffer */
    memmove(context->buf, ptr, sizeof(context->buf)-(ptr-context->buf));
    context->bused -= ptr - context->buf;

    /* check if buffer is full but doesn't contain any newline */
    if(context->bused >= sizeof(context->buf)-1) {
      printf("ERROR: reply buffer overflow\n");
      context->bused = 0;
    }
  }

  return TRUE;
}

static void run(gt_context_t *context) {
  /* setup context */
  context->bused = 0;
  context->stdout_tag = -1;
  context->stderr_tag = -1;
  context->stdin_fd  = -1;
  context->stderr_fd = -1;
  context->stderr_fd = -1;

  /* build list of arguments to call geotoad */
  GPtrArray *gt_argv = g_ptr_array_new();
  g_ptr_array_add (gt_argv, "/usr/bin/geotoad");
  g_ptr_array_add (gt_argv, "--distanceMax=1.0");
  g_ptr_array_add (gt_argv, "--output=gtoad.gpx");
  g_ptr_array_add (gt_argv, "--password=winterblume");
  g_ptr_array_add (gt_argv, "--queryType=coord");
  g_ptr_array_add (gt_argv, "--user=Tantil");

  /* check if we need to add proxy config */
  char *proxy = NULL;
  if(context->appdata->proxy && context->appdata->proxy->host) {
    if(context->appdata->proxy->use_authentication &&
       context->appdata->proxy->authentication_user &&
       context->appdata->proxy->authentication_password)
      proxy = g_strdup_printf("--proxy=http://%s:%s@%s:%d", 
                              context->appdata->proxy->authentication_user,
                              context->appdata->proxy->authentication_password,
                              context->appdata->proxy->host,
                              context->appdata->proxy->port);
    else
      proxy = g_strdup_printf("--proxy=http://%s:%d", 
                              context->appdata->proxy->host,
                              context->appdata->proxy->port);
    
    appendf(&context->log, COLOR_SYSTEM, "Using proxy: %s\n", proxy);
    g_ptr_array_add (gt_argv, proxy);
  }

  g_ptr_array_add (gt_argv, "N49 00.000 E008 23.000");
  g_ptr_array_add (gt_argv, NULL);

  GError *error=NULL;
  GPid pid;
  GSource *gt_watch;

  if (!g_spawn_async_with_pipes (NULL, /* CWD */
                                 (char **) gt_argv->pdata, /* argv */
                                 NULL, /* envp */
                                 G_SPAWN_DO_NOT_REAP_CHILD, /* flags */
                                 NULL, /* child setup */
                                 NULL, /* user data */
                                 &pid,
                                 &context->stdin_fd,
                                 &context->stdout_fd,
                                 &context->stderr_fd,
                                 &error)) {
    g_ptr_array_free(gt_argv, TRUE);
    if(proxy) g_free(proxy);
    appendf(&context->log, COLOR_ERR,
            _("GeoToad failed to start!\n%s\n"), error->message);
    g_error_free(error);
    return;
  }

  g_ptr_array_free (gt_argv, TRUE);
  if(proxy) g_free(proxy);

  gt_watch = g_child_watch_source_new(pid);
  g_source_set_callback(gt_watch, (GSourceFunc) child_state_cb, context, NULL);

  g_source_attach(gt_watch, NULL);
  g_source_unref(gt_watch);

  /* make nonblocking */
  if(fcntl(context->stdout_fd, F_SETFL, O_NONBLOCK) == -1) 
    perror("fcntl failed");

  if(fcntl(context->stderr_fd, F_SETFL, O_NONBLOCK) == -1) 
    perror("fcntl failed");

  GIOChannel *ioc = g_io_channel_unix_new(context->stdout_fd);
  g_io_channel_set_close_on_unref (ioc, TRUE);
  g_io_channel_set_encoding (ioc, NULL, NULL);
  g_io_add_watch(ioc, G_IO_IN,  child_input_cb, context);
  g_io_channel_unref(ioc);

  //  ioc = g_io_channel_unix_new(context->stderr_fd);
  //  g_io_add_watch(ioc, G_IO_IN,  child_input_cb, context);
  //  g_io_channel_unref(ioc);
}
        
void geotoad(appdata_t *appdata) {
  gt_context_t *context = g_new0(gt_context_t, 1);
  context->appdata = appdata;

  printf("geoToad\n");

  GtkWidget *dialog = gtk_dialog_new_with_buttons(_("GeoToad"),
                          GTK_WINDOW(appdata->window),
                          GTK_DIALOG_MODAL | GTK_DIALOG_DESTROY_WITH_PARENT,
                          GTK_STOCK_CLOSE, GTK_RESPONSE_CLOSE,
                          NULL);

  gtk_window_set_default_size(GTK_WINDOW(dialog), 640, 480);

#ifndef USE_PANNABLE_AREA
  GtkWidget *scrolled_window = gtk_scrolled_window_new(NULL, NULL);
  gtk_scrolled_window_set_policy(GTK_SCROLLED_WINDOW(scrolled_window), 
                                 GTK_POLICY_AUTOMATIC, GTK_POLICY_AUTOMATIC);
#else
  GtkWidget *pannable_area = hildon_pannable_area_new();
#endif
  
  context->log.buffer = gtk_text_buffer_new(NULL);

#ifndef USE_HILDON_TEXT_VIEW
  context->log.view = gtk_text_view_new_with_buffer(context->log.buffer);
#else
  context->log.view = hildon_text_view_new();
  hildon_text_view_set_buffer(HILDON_TEXT_VIEW(context->log.view), 
                              context->log.buffer);
#endif

#ifndef USE_PANNABLE_AREA
  gtk_container_add(GTK_CONTAINER(scrolled_window), context->log.view);
  gtk_scrolled_window_set_shadow_type( GTK_SCROLLED_WINDOW(scrolled_window),
                                       GTK_SHADOW_IN);

  gtk_box_pack_start(GTK_BOX(GTK_DIALOG(dialog)->vbox), 
                     scrolled_window, TRUE, TRUE, 0);
#else
  gtk_container_add(GTK_CONTAINER(pannable_area), context->log.view);
  gtk_box_pack_start(GTK_BOX(GTK_DIALOG(dialog)->vbox), 
                     pannable_area, TRUE, TRUE, 0);
#endif

  gtk_dialog_set_default_response(GTK_DIALOG(dialog), GTK_RESPONSE_CLOSE);

  gtk_widget_show_all(dialog);

  appendf(&context->log, COLOR_SYSTEM, "Running GeoToad\n");
  run(context);

  gtk_dialog_run(GTK_DIALOG(dialog));

  gtk_widget_destroy(dialog);
}
1	/*
2	* Copyright (C) 2009 Till Harbaum <till@harbaum.org>.
3	*
4	* This file is part of GPXView.
5	*
6	* GPXView is free software: you can redistribute it and/or modify
7	* it under the terms of the GNU General Public License as published by
8	* the Free Software Foundation, either version 3 of the License, or
9	* (at your option) any later version.
10	*
11	* GPXView is distributed in the hope that it will be useful,
12	* but WITHOUT ANY WARRANTY; without even the implied warranty of
13	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14	* GNU General Public License for more details.
15	*
16	* You should have received a copy of the GNU General Public License
17	* along with GPXView. If not, see <http://www.gnu.org/licenses/>.
18	*/
19
20	#include "gpxview.h"
21
22	#include <fcntl.h>
23	#include <sys/types.h>
24	#include <sys/wait.h>
25	#include <errno.h>
26
27	#define COLOR_ERR "red"
28	#define COLOR_OK "darkgreen"
29	#define COLOR_SYSTEM "darkblue"
30
31	#define BUFFER_SIZE 256
32
33	typedef struct {
34	appdata_t *appdata;
35
36	char buf[BUFFER_SIZE];
37	int bused;
38
39	/** gdk input tag for async IO */
40	gint stdout_tag, stderr_tag;
41	gint stdin_fd, stdout_fd, stderr_fd;
42
43	struct log_s {
44	GtkTextBuffer *buffer;
45	GtkWidget *view;
46	} log;
47
48	} gt_context_t;
49
50	static void appendf(struct log_s log, char colname,
51	const char *fmt, ...) {
52	va_list args;
53	va_start( args, fmt );
54	char *buf = g_strdup_vprintf(fmt, args);
55	va_end( args );
56
57	printf("append: %s", buf);
58
59	GtkTextTag *tag = NULL;
60	if(colname)
61	tag = gtk_text_buffer_create_tag(log->buffer, NULL,
62	"foreground", colname,
63	NULL);
64
65	GtkTextIter end;
66	gtk_text_buffer_get_end_iter(log->buffer, &end);
67	if(tag)
68	gtk_text_buffer_insert_with_tags(log->buffer, &end, buf, -1, tag, NULL);
69	else
70	gtk_text_buffer_insert(log->buffer, &end, buf, -1);
71
72	g_free(buf);
73
74	gtk_text_buffer_get_end_iter(log->buffer, &end);
75	gtk_text_view_scroll_to_iter(GTK_TEXT_VIEW(log->view),
76	&end, 0.0, FALSE, 0, 0);
77	}
78
79	/* watch child process and receive events */
80	static void child_state_cb(GPid pid, gint status, gpointer data) {
81	gt_context_t context = (gt_context_t)data;
82
83	puts("child state");
84
85	if(WIFEXITED(status)) {
86	printf("child exited with return code %d\n", WEXITSTATUS(status));
87	} else
88	printf("child failed\n");
89
90	puts("gt exited");
91
92	appendf(&context->log, COLOR_SYSTEM, "GeoToad finished\n");
93
94	appendf(&context->log, COLOR_SYSTEM, "TODO: free context!!!\n");
95	// printf("freeing context\n");
96	// g_free(context);
97
98	/* Reap child if needed. */
99	waitpid (pid, NULL, WNOHANG);
100	}
101
102	static gboolean child_input_cb(GIOChannel *source,
103	GIOCondition condition,
104	gpointer data) {
105	gt_context_t context = (gt_context_t)data;
106	int fd = g_io_channel_unix_get_fd(source);
107	ssize_t bytes;
108
109	g_assert(condition == G_IO_IN);
110
111	/* append to current buffer content */
112	while( (bytes = read(fd, context->buf+context->bused,
113	sizeof(context->buf) - context->bused - 1)) > 0) {
114	context->bused += bytes;
115	context->buf[context->bused]='\0';
116
117	/* consume line by line */
118	gchar *ptr = context->buf;
119
120	/* parse as long as the buffer contains a newline */
121	while( strchr(ptr, '\n') != NULL) {
122	char *p = strchr(ptr, '\n');
123	*p = '\0';
124
125	char *color = NULL;
126	if(strstr(ptr, "Saved to ") != NULL)
127	color = COLOR_OK;
128
129	appendf(&context->log, color, "%s\n", ptr);
130
131	ptr = p+1;
132	}
133
134	/* move remaining bytes down the buffer */
135	memmove(context->buf, ptr, sizeof(context->buf)-(ptr-context->buf));
136	context->bused -= ptr - context->buf;
137
138	/* check if buffer is full but doesn't contain any newline */
139	if(context->bused >= sizeof(context->buf)-1) {
140	printf("ERROR: reply buffer overflow\n");
141	context->bused = 0;
142	}
143	}
144
145	return TRUE;
146	}
147
148	static void run(gt_context_t *context) {
149	/* setup context */
150	context->bused = 0;
151	context->stdout_tag = -1;
152	context->stderr_tag = -1;
153	context->stdin_fd = -1;
154	context->stderr_fd = -1;
155	context->stderr_fd = -1;
156
157	/* build list of arguments to call geotoad */
158	GPtrArray *gt_argv = g_ptr_array_new();
159	g_ptr_array_add (gt_argv, "/usr/bin/geotoad");
160	g_ptr_array_add (gt_argv, "--distanceMax=1.0");
161	g_ptr_array_add (gt_argv, "--output=gtoad.gpx");
162	g_ptr_array_add (gt_argv, "--password=winterblume");
163	g_ptr_array_add (gt_argv, "--queryType=coord");
164	g_ptr_array_add (gt_argv, "--user=Tantil");
165
166	/* check if we need to add proxy config */
167	char *proxy = NULL;
168	if(context->appdata->proxy && context->appdata->proxy->host) {
169	if(context->appdata->proxy->use_authentication &&
170	context->appdata->proxy->authentication_user &&
171	context->appdata->proxy->authentication_password)
172	proxy = g_strdup_printf("--proxy=http://%s:%s@%s:%d",
173	context->appdata->proxy->authentication_user,
174	context->appdata->proxy->authentication_password,
175	context->appdata->proxy->host,
176	context->appdata->proxy->port);
177	else
178	proxy = g_strdup_printf("--proxy=http://%s:%d",
179	context->appdata->proxy->host,
180	context->appdata->proxy->port);
181
182	appendf(&context->log, COLOR_SYSTEM, "Using proxy: %s\n", proxy);
183	g_ptr_array_add (gt_argv, proxy);
184	}
185
186	g_ptr_array_add (gt_argv, "N49 00.000 E008 23.000");
187	g_ptr_array_add (gt_argv, NULL);
188
189	GError *error=NULL;
190	GPid pid;
191	GSource *gt_watch;
192
193	if (!g_spawn_async_with_pipes (NULL, /* CWD */
194	(char *) gt_argv->pdata, / argv */
195	NULL, /* envp */
196	G_SPAWN_DO_NOT_REAP_CHILD, /* flags */
197	NULL, /* child setup */
198	NULL, /* user data */
199	&pid,
200	&context->stdin_fd,
201	&context->stdout_fd,
202	&context->stderr_fd,
203	&error)) {
204	g_ptr_array_free(gt_argv, TRUE);
205	if(proxy) g_free(proxy);
206	appendf(&context->log, COLOR_ERR,
207	_("GeoToad failed to start!\n%s\n"), error->message);
208	g_error_free(error);
209	return;
210	}
211
212	g_ptr_array_free (gt_argv, TRUE);
213	if(proxy) g_free(proxy);
214
215	gt_watch = g_child_watch_source_new(pid);
216	g_source_set_callback(gt_watch, (GSourceFunc) child_state_cb, context, NULL);
217
218	g_source_attach(gt_watch, NULL);
219	g_source_unref(gt_watch);
220
221	/* make nonblocking */
222	if(fcntl(context->stdout_fd, F_SETFL, O_NONBLOCK) == -1)
223	perror("fcntl failed");
224
225	if(fcntl(context->stderr_fd, F_SETFL, O_NONBLOCK) == -1)
226	perror("fcntl failed");
227
228	GIOChannel *ioc = g_io_channel_unix_new(context->stdout_fd);
229	g_io_channel_set_close_on_unref (ioc, TRUE);
230	g_io_channel_set_encoding (ioc, NULL, NULL);
231	g_io_add_watch(ioc, G_IO_IN, child_input_cb, context);
232	g_io_channel_unref(ioc);
233
234	// ioc = g_io_channel_unix_new(context->stderr_fd);
235	// g_io_add_watch(ioc, G_IO_IN, child_input_cb, context);
236	// g_io_channel_unref(ioc);
237	}
238
239	void geotoad(appdata_t *appdata) {
240	gt_context_t *context = g_new0(gt_context_t, 1);
241	context->appdata = appdata;
242
243	printf("geoToad\n");
244
245	GtkWidget *dialog = gtk_dialog_new_with_buttons(_("GeoToad"),
246	GTK_WINDOW(appdata->window),
247	GTK_DIALOG_MODAL \| GTK_DIALOG_DESTROY_WITH_PARENT,
248	GTK_STOCK_CLOSE, GTK_RESPONSE_CLOSE,
249	NULL);
250
251	gtk_window_set_default_size(GTK_WINDOW(dialog), 640, 480);
252
253	#ifndef USE_PANNABLE_AREA
254	GtkWidget *scrolled_window = gtk_scrolled_window_new(NULL, NULL);
255	gtk_scrolled_window_set_policy(GTK_SCROLLED_WINDOW(scrolled_window),
256	GTK_POLICY_AUTOMATIC, GTK_POLICY_AUTOMATIC);
257	#else
258	GtkWidget *pannable_area = hildon_pannable_area_new();
259	#endif
260
261	context->log.buffer = gtk_text_buffer_new(NULL);
262
263	#ifndef USE_HILDON_TEXT_VIEW
264	context->log.view = gtk_text_view_new_with_buffer(context->log.buffer);
265	#else
266	context->log.view = hildon_text_view_new();
267	hildon_text_view_set_buffer(HILDON_TEXT_VIEW(context->log.view),
268	context->log.buffer);
269	#endif
270
271	#ifndef USE_PANNABLE_AREA
272	gtk_container_add(GTK_CONTAINER(scrolled_window), context->log.view);
273	gtk_scrolled_window_set_shadow_type( GTK_SCROLLED_WINDOW(scrolled_window),
274	GTK_SHADOW_IN);
275
276	gtk_box_pack_start(GTK_BOX(GTK_DIALOG(dialog)->vbox),
277	scrolled_window, TRUE, TRUE, 0);
278	#else
279	gtk_container_add(GTK_CONTAINER(pannable_area), context->log.view);
280	gtk_box_pack_start(GTK_BOX(GTK_DIALOG(dialog)->vbox),
281	pannable_area, TRUE, TRUE, 0);
282	#endif
283
284	gtk_dialog_set_default_response(GTK_DIALOG(dialog), GTK_RESPONSE_CLOSE);
285
286	gtk_widget_show_all(dialog);
287
288	appendf(&context->log, COLOR_SYSTEM, "Running GeoToad\n");
289	run(context);
290
291	gtk_dialog_run(GTK_DIALOG(dialog));
292
293	gtk_widget_destroy(dialog);
294	}