nautilus-history-view.c 8.04 KB
Newer Older
Elliot Lee's avatar
Elliot Lee committed
1
2
3
4
5
/* -*- Mode: C; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 2 -*- */

/*
 *  Nautilus
 *
Elliot Lee's avatar
Elliot Lee committed
6
 *  Copyright (C) 1999, 2000 Red Hat, Inc.
Elliot Lee's avatar
Elliot Lee committed
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
 *
 *  This library 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 library 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 library; if not, write to the Free Software
 *  Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 *
 *  Author: Elliot Lee <sopwith@redhat.com>
 *
 */
25
 
26
#include <config.h>
Elliot Lee's avatar
Elliot Lee committed
27

28
#include <gnome.h>
Elliot Lee's avatar
Elliot Lee committed
29
#include <libnautilus/libnautilus.h>
30
31
#include <libnautilus-extensions/nautilus-bookmark.h>
#include <libnautilus-extensions/nautilus-icon-factory.h>
32
#include <nautilus-widgets/nautilus-preferences.h>
33
#include <libgnome/gnome-i18n.h>
34
#include <libgnomevfs/gnome-vfs-init.h>
35
#include <libgnomevfs/gnome-vfs-uri.h>
36
#include <liboaf/liboaf.h>
Elliot Lee's avatar
Elliot Lee committed
37
38

typedef struct {
39
  NautilusViewFrame *view;
Elliot Lee's avatar
Elliot Lee committed
40
41
42

  GtkCList *clist;

43
  gint notify_count;
44

45
  BonoboUIHandler *uih;
Elliot Lee's avatar
Elliot Lee committed
46
47
} HistoryView;

48
49
50
51
#define HISTORY_VIEW_COLUMN_ICON	0
#define HISTORY_VIEW_COLUMN_NAME	1
#define HISTORY_VIEW_COLUMN_COUNT	2

52
53
54
55
56
57
58
static const NautilusBookmark *
get_bookmark_from_row (GtkCList *clist, int row)
{
  g_assert (NAUTILUS_IS_BOOKMARK (gtk_clist_get_row_data (clist, row)));
  return NAUTILUS_BOOKMARK (gtk_clist_get_row_data (clist, row));  
}

59
60
61
static const char *
get_uri_from_row (GtkCList *clist, int row)
{
62
  return nautilus_bookmark_get_uri (get_bookmark_from_row (clist, row));
63
64
65
66
}


static void
67
install_icon (GtkCList *clist, gint row)
68
69
70
{
	GdkPixmap *pixmap;
	GdkBitmap *bitmap;
71
	const NautilusBookmark *bookmark;
72

73
	bookmark = get_bookmark_from_row (clist, row);
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
	if (!nautilus_bookmark_get_pixmap_and_mask (bookmark,
		  				    NAUTILUS_ICON_SIZE_SMALLER,
						    &pixmap,
						    &bitmap))
	{
		return;
	}

	gtk_clist_set_pixmap (clist,	
			      row,
			      HISTORY_VIEW_COLUMN_ICON,
			      pixmap,
			      bitmap);
}

89
static void
90
history_view_update_icons (GtkCList *clist)
91
92
93
94
95
96
97
98
99
{
  int row;

  for (row = 0; row < clist->rows; ++row) 
    {
      install_icon (clist, row);
    }
}

Elliot Lee's avatar
Elliot Lee committed
100
static void
101
hyperbola_navigation_history_notify_location_change (NautilusViewFrame *view,
Elliot Lee's avatar
Elliot Lee committed
102
103
104
						     Nautilus_NavigationInfo *loci,
						     HistoryView *hview)
{
105
  char *cols[HISTORY_VIEW_COLUMN_COUNT];
Elliot Lee's avatar
Elliot Lee committed
106
107
  int new_rownum;
  GtkCList *clist;
108
  NautilusBookmark *bookmark;
109
  int i;
110
111
  GnomeVFSURI *vfs_uri;
  char *short_name;
Elliot Lee's avatar
Elliot Lee committed
112
113
114
115

  hview->notify_count++;

  clist = hview->clist;
116
  gtk_clist_freeze(clist);
Elliot Lee's avatar
Elliot Lee committed
117

118
119
120
121
122
  /* FIXME bugzilla.eazel.com 206: 
   * Get the bookmark info from the Nautilus window instead of
   * keeping a parallel mechanism here. That will get us the right
   * short name for different locations.
   */
123
  vfs_uri = gnome_vfs_uri_new (loci->requested_uri);
124
125
126
127
128
129
130
131
132
133
  if (vfs_uri == NULL) {
    short_name = g_strdup (loci->requested_uri);
  } else {
    short_name = gnome_vfs_uri_extract_short_name (vfs_uri);
    gnome_vfs_uri_unref (vfs_uri);
  }
  bookmark = nautilus_bookmark_new (loci->requested_uri, short_name);
  g_free (short_name);

  
Elliot Lee's avatar
Elliot Lee committed
134

135
136
137
138
139
140
141
142
143
144
145
146
147
  /* If a bookmark for this location was already in list, remove it
   * (no duplicates in list, new one goes at top)
   */
  for (i = 0; i < clist->rows; ++i)
    {
      if (nautilus_bookmark_compare_with (get_bookmark_from_row (clist, i), 
      					  bookmark)
      		== 0)
        {
          gtk_clist_remove (clist, i);
          /* Since we check with each insertion, no need to check further */
          break;
        }
Elliot Lee's avatar
Elliot Lee committed
148
149
    }

150
151
152
  cols[HISTORY_VIEW_COLUMN_ICON] = NULL;
  /* Ugh. Gotta cast away the const */
  cols[HISTORY_VIEW_COLUMN_NAME] = (char *)nautilus_bookmark_get_name (bookmark);
153
  new_rownum = gtk_clist_prepend(clist, cols);
154
155
156
157
  gtk_clist_set_row_data_full (clist,
  			       new_rownum,
  			       bookmark,
  			       (GtkDestroyNotify)gtk_object_unref);
158
  install_icon (clist, new_rownum);
159

Elliot Lee's avatar
Elliot Lee committed
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
  gtk_clist_columns_autosize(clist);

  if(gtk_clist_row_is_visible(clist, new_rownum) != GTK_VISIBILITY_FULL)
    gtk_clist_moveto(clist, new_rownum, -1, 0.5, 0.0);

  gtk_clist_select_row(clist, new_rownum, 0);

  gtk_clist_thaw(clist);

  hview->notify_count--;
}

static void
hyperbola_navigation_history_select_row(GtkCList *clist, gint row, gint column, GdkEvent *event,
					HistoryView *hview)
{
  Nautilus_NavigationRequestInfo reqi;

  if(hview->notify_count > 0)
    return;

181
182
183
  /* First row is always current location, by definition, so don't activate */
  if (row == 0)
      return;
Elliot Lee's avatar
Elliot Lee committed
184

185
  /* FIXME bugzilla.eazel.com 702: There are bugs here if you drag up & down */
Elliot Lee's avatar
Elliot Lee committed
186

187
  gtk_clist_freeze(clist);
Elliot Lee's avatar
Elliot Lee committed
188
189
190
191

  if(gtk_clist_row_is_visible(clist, row) != GTK_VISIBILITY_FULL)
    gtk_clist_moveto(clist, row, -1, 0.5, 0.0);

192
193
  /* FIXME bugzilla.eazel.com 706:
   * gotta cast away const because requested_uri isn't defined correctly */
194
  reqi.requested_uri = (char *)get_uri_from_row (clist, row);
195
  reqi.new_window_requested = FALSE;
Elliot Lee's avatar
Elliot Lee committed
196

197
  nautilus_view_frame_request_location_change(hview->view, &reqi);
Elliot Lee's avatar
Elliot Lee committed
198
199
200
201

  gtk_clist_thaw(clist);
}

202
203
204
static int object_count = 0;

static void
205
do_destroy(GtkObject *obj, HistoryView *hview)
206
207
208
209
210
{
  object_count--;
  if(object_count <= 0)
    gtk_main_quit();
}
Elliot Lee's avatar
Elliot Lee committed
211

212
213
static BonoboObject *
make_obj(BonoboGenericFactory *Factory, const char *goad_id, gpointer closure)
Elliot Lee's avatar
Elliot Lee committed
214
{
215
  GtkWidget *wtmp;
216
  GtkCList *clist;
Elliot Lee's avatar
Elliot Lee committed
217
218
  HistoryView *hview;

219
  g_return_val_if_fail(!strcmp(goad_id, "OAFIID:ntl_history_view:a7a85bdd-2ecf-4bc1-be7c-ed328a29aacb"), NULL);
Elliot Lee's avatar
Elliot Lee committed
220
221
222
223

  hview = g_new0(HistoryView, 1);

  /* create interface */
224
225
226
227
228
229
230
  clist = GTK_CLIST (gtk_clist_new (HISTORY_VIEW_COLUMN_COUNT));
  gtk_clist_column_titles_hide (clist);
  gtk_clist_set_row_height (clist, NAUTILUS_ICON_SIZE_SMALLER);
  gtk_clist_set_selection_mode(clist, GTK_SELECTION_BROWSE);
  gtk_clist_columns_autosize(clist);
  wtmp = gtk_scrolled_window_new(gtk_clist_get_hadjustment(clist),
				 gtk_clist_get_vadjustment(clist));
Elliot Lee's avatar
Elliot Lee committed
231
232
233
  gtk_scrolled_window_set_policy(GTK_SCROLLED_WINDOW(wtmp),
				 GTK_POLICY_AUTOMATIC,
				 GTK_POLICY_AUTOMATIC);
234
  gtk_container_add(GTK_CONTAINER(wtmp), GTK_WIDGET (clist));
Elliot Lee's avatar
Elliot Lee committed
235

236
237
238
239
240
241
242
  gtk_widget_show_all(wtmp);

  /* create object */
  hview->view = NAUTILUS_VIEW_FRAME (nautilus_meta_view_frame_new (wtmp));
  gtk_signal_connect (GTK_OBJECT (hview->view), "destroy", do_destroy, hview);
  object_count++;

243
244
  hview->clist = (GtkCList *)clist;

245
246
247
248
  /* set description */
  nautilus_meta_view_frame_set_label(NAUTILUS_META_VIEW_FRAME(hview->view),
                                     _("History"));

Elliot Lee's avatar
Elliot Lee committed
249
  /* handle events */
250
  gtk_signal_connect(GTK_OBJECT(hview->view), "notify_location_change", hyperbola_navigation_history_notify_location_change, hview);
Elliot Lee's avatar
Elliot Lee committed
251
  gtk_signal_connect(GTK_OBJECT(clist), "select_row", hyperbola_navigation_history_select_row, hview);
Elliot Lee's avatar
Elliot Lee committed
252

253
  gtk_signal_connect_object_while_alive (nautilus_icon_factory_get (),
254
					 "icons_changed",
255
					 history_view_update_icons,
256
					 GTK_OBJECT (hview->clist));
257

Elliot Lee's avatar
Elliot Lee committed
258

259
  return BONOBO_OBJECT (hview->view);
Elliot Lee's avatar
Elliot Lee committed
260
261
262
263
}

int main(int argc, char *argv[])
{
264
  gboolean preferences_succeeded;
265
  BonoboGenericFactory *factory;
Elliot Lee's avatar
Elliot Lee committed
266
267
  CORBA_ORB orb;

268
269
270
271
  gnome_init_with_popt_table("ntl-history-view", VERSION, 
                             argc, argv,
                             oaf_popt_options, 0, NULL); 
  orb = oaf_init (argc, argv);
272

273
274
275
276
277
278
  /* FIXME bugzilla.eazel.com 672: Need better error reporting if this
   * fails. But is it too early to post a dialog here? Does every user
   * of NautilusPreferences have to deal with this;
   */
  preferences_succeeded = nautilus_preferences_initialize (argc, argv);
  g_assert (preferences_succeeded);
279
        
Elliot Lee's avatar
Elliot Lee committed
280
  bonobo_init(orb, CORBA_OBJECT_NIL, CORBA_OBJECT_NIL);
281
  gnome_vfs_init ();
Elliot Lee's avatar
Elliot Lee committed
282

283
  factory = bonobo_generic_factory_new_multi("OAFIID:ntl_history_view_factory:912d6634-d18f-40b6-bb83-bdfe16f1d15e", make_obj, NULL);
Elliot Lee's avatar
Elliot Lee committed
284

285
286
287
  do {
    bonobo_main();
  } while(object_count > 0);
Elliot Lee's avatar
Elliot Lee committed
288
289
290

  return 0;
}