themactep-fliewr 2.0.0

data/.gitignore

@@ -0,0 +1 @@
+nbproject

data/LICENSE

@@ -0,0 +1,27 @@
+== Fliewr
+
+Copyright (c) 2008, Paul Philippov
+All rights reserved.
+
+Redistribution and use in source and binary forms, with or without modification,
+are permitted provided that the following conditions are met:
+
+* Redistributions of source code must retain the above copyright notice,
+  this list of conditions and the following disclaimer.
+* Redistributions in binary form must reproduce the above copyright notice,
+  this list of conditions and the following disclaimer in the documentation
+  and/or other materials provided with the distribution.
+* Neither the name of the PPDS.WS nor the names of its contributors may be used
+  to endorse or promote products derived from this software without specific
+  prior written permission.
+
+THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
+ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
+WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
+DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR
+ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
+(INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
+LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON
+ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
+(INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
+SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.

data/README

@@ -0,0 +1,52 @@
+== Fliewr (Flickr Viewr) ==
+
+  Flickr friends photostream viewer.
+
+
+=== Licence ===
+
+  New BSD License
+
+
+=== Requirements: ===
+
+  * Ruby
+    http://www.ruby-lang.org/
+
+  * GTK+
+    http://www.mozilla.org/
+
+  * Gecko engine from Mozilla
+    http://www.mozilla.org/
+
+  * Ruby Gtk2 bindings and Ruby/GTK bindings for Mozilla
+    from Ruby-GNOME2 Project
+    http://ruby-gnome2.sourceforge.jp/
+
+  * Ruby XML library
+    http://libxml.rubyforge.org/
+
+  Say Gentoo Linux users could run following command:
+
+  $ sudo emerge -uva \
+        dev-lang/ruby \
+        dev-ruby/ruby-gconf2 \
+        dev-ruby/ruby-gtk2 \
+        dev-ruby/ruby-gtkmozembed \
+        dev-ruby/libxml
+
+
+=== Installation ===
+
+  $ sudo gem source -a http://gems.github.com/
+  $ sudo gem install themactep-fliewr
+
+
+=== Homepage ===
+
+  http://github.com/themactep/fliewr
+
+
+=== Authors ===
+
+  Paul Philippov <themactep@gmail.com>

data/Rakefile

@@ -0,0 +1,20 @@
+require 'rubygems'
+require 'rake'
+require 'rake/clean'
+
+begin
+  require 'jeweler'
+  Jeweler::Tasks.new do |gemspec|
+    gemspec.name = "fliewr"
+    gemspec.summary = "Flickr Viewr for GNOME"
+    gemspec.description = "fliewr is a GNOME application to watch updates from Flickr contacts."
+    gemspec.email = "themactep@gmail.com"
+    gemspec.homepage = "http://github.com/themactep/fliewr"
+    gemspec.description = "TODO"
+    gemspec.authors = ["Paul Philippov"]
+    gemspec.add_dependency "libxml"
+    gemspec.add_dependency "rest-client"
+  end
+rescue LoadError
+  puts "Jeweler not available. Install it with: sudo gem install technicalpickles-jeweler -s http://gems.github.com"
+end

data/VERSION

@@ -0,0 +1 @@
+2.0.0

data/bin/fliewr

@@ -0,0 +1,27 @@
+#!/usr/bin/env ruby 
+# $Id: fliewr.rb 2009/02/08 21:48:53 EET paul Exp $ 
+# 
+=begin
+  Flickr Viewr - Flicker Friends Photostream Viewer.
+
+  Copyright (c) 2008, Paul Philippov <paul@ppds.ws>
+
+  This software is released under the BSD License.
+  http://creativecommons.org/licenses/BSD/
+=end
+
+app_file = File.symlink?(__FILE__) ? File.readlink(__FILE__) : __FILE__
+APP_ROOT = File.expand_path(File.dirname(app_file))
+Dir.glob(APP_ROOT + '/../**/').reverse.each { |d| $:.unshift d }
+
+begin
+  require 'rubygems'
+rescue LoadError
+  nil
+end
+
+require 'fliewr/core'
+
+Fliewr::Core.new
+Thread.new { Fliewr::StatusIcon.new }
+$app.main

data/data/api.url

@@ -0,0 +1 @@
+http://api.flickr.com/services/rest?method=flickr.photos.getContactsPublicPhotos&api_key=0282f93eb6da0425310bd5791f4c2fc0&extras=date_upload,icon_server,license&user_id=%s&count=%d&single_photo=%d&just_friends=%d&include_self=%d

data/data/fliewr.desktop

@@ -0,0 +1,9 @@
+[Desktop Entry]
+Name=Fliewr
+Comment=Flickr Viewr
+Exec=fliewr
+Icon=fliewr
+StartupNotify=true
+Terminal=false
+Type=Application
+Categories=Network;

data/data/fliewr.svg

@@ -0,0 +1,4 @@
+<svg xmlns="http://www.w3.org/2000/svg" width="128" height="128">
+<path fill="#0063dc" stroke="none" d="M 64.504461,16.817487 C 38.168536,17.488304 16.999778,39.17825 16.999778,65.787131 C 16.999778,84.014679 26.943418,99.898404 41.666404,108.32951 C 37.617837,101.19225 35.285462,92.947102 35.285462,84.150747 C 35.285462,57.119498 57.130753,35.181103 84.047286,35.181103 C 92.813625,35.181103 101.03145,37.517116 108.14248,41.589241 C 99.748559,26.798284 83.915678,16.817487 65.761602,16.817487 C 65.341032,16.817487 64.922491,16.806836 64.504461,16.817487 z" />
+<path fill="#ff0084" stroke="none" d="M 94.809723,47.321192 C 97.715396,52.419557 99.386031,58.317585 99.386031,64.60187 C 99.386031,83.90596 83.71894,99.573047 64.414849,99.573047 C 58.127778,99.573047 52.234085,97.891152 47.134167,94.98308 C 53.153275,105.54919 64.506779,112.68725 77.529041,112.68725 C 96.833137,112.68725 112.50022,97.020162 112.50022,77.716061 C 112.50022,64.699042 105.36882,53.342179 94.809723,47.321192 z" />
+</svg>

data/data/themes/default/error.html

@@ -0,0 +1 @@
+<div class="error"> <h1>Error</h1> %s</div>

data/data/themes/default/item.html

@@ -0,0 +1,10 @@
+<div class="message">
+  <a class="image" href="%s" style="background-image:url(%s);"></a>
+  <div class="popup">
+    <div class="userpic">
+      <a href="%s" title="%s"><img src="%s" alt="" /></a>
+    </div>
+    <h1>%s</h1>
+    <p class="time">%s</p>
+  </div>
+</div>

data/data/themes/default/style.css

@@ -0,0 +1,72 @@
+body {
+  padding : 0;
+  color : #999;
+  color : #fff;
+  background : #333;
+  line-height : 1.250;
+  font : 12px "NokiaSansCn", "LucidaGrande", sans-serif;
+}
+body, img {
+  margin : 0;
+}
+img {
+  border : none;
+}
+div, h1, p, a {
+  margin-bottom : 0;
+}
+a {
+  color : #fff;
+  text-decoration : none;
+}
+div.error {
+  padding : 10px;
+}
+div.message {
+  clear : both;
+  position : relative;
+  padding : 7px;
+  margin : 5px;
+  color : #bbb;
+  background-color : #444;
+  -moz-border-radius : 7px;
+}
+a.image {
+  display : block;
+  height : 130px;
+  background-position : center;
+}
+div.userpic {
+  width : 55px;
+  height : 100%;
+  float : left;
+}
+div.imgbox {
+  width : 48px;
+  height : 48px;
+  margin-bottom : 5px;
+  background-repeat : no-repeat;
+}
+div.popup {
+  position : absolute;
+  left : 7px;
+  right : 7px;
+  bottom : 7px;
+  background-color : #000;
+  padding : 5px;
+  display : none;
+}
+div.message:hover div.popup {
+  display : inherit;
+}
+h1 {
+  font : bold 11px "NokiaSans", "LucidaGrande", sans-serif;
+  margin-top : 0;
+  height : 2.500em;
+  overflow : hidden;
+  color : #ff0;
+}
+p.time {
+  font-size : 10px;
+  text-align : right;
+}

data/data/themes/default/theme.html

@@ -0,0 +1,16 @@
+<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
+  "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
+<html xml:lang="en" xmlns="http://www.w3.org/1999/xhtml" lang="en">
+<head>
+<title>Flickr Viewr</title>
+<meta http-equiv="Content-Type" content="text/html;charset=utf-8" />
+<style type="text/css">
+/*<![CDATA[*/
+%s
+/*]]>*/
+</style>
+</head>
+<body>
+%s
+</body>
+</html>

data/fliewr.gemspec

@@ -0,0 +1,60 @@
+# Generated by jeweler
+# DO NOT EDIT THIS FILE
+# Instead, edit Jeweler::Tasks in Rakefile, and run `rake gemspec`
+# -*- encoding: utf-8 -*-
+
+Gem::Specification.new do |s|
+  s.name = %q{fliewr}
+  s.version = "2.0.0"
+
+  s.required_rubygems_version = Gem::Requirement.new(">= 0") if s.respond_to? :required_rubygems_version=
+  s.authors = ["Paul Philippov"]
+  s.date = %q{2009-08-22}
+  s.default_executable = %q{fliewr}
+  s.description = %q{TODO}
+  s.email = %q{themactep@gmail.com}
+  s.executables = ["fliewr"]
+  s.extra_rdoc_files = [
+    "LICENSE",
+     "README"
+  ]
+  s.files = [
+    ".gitignore",
+     "LICENSE",
+     "README",
+     "Rakefile",
+     "VERSION",
+     "bin/fliewr",
+     "data/api.url",
+     "data/fliewr.desktop",
+     "data/fliewr.svg",
+     "data/themes/default/error.html",
+     "data/themes/default/item.html",
+     "data/themes/default/style.css",
+     "data/themes/default/theme.html",
+     "fliewr.gemspec",
+     "lib/fliewr/core.rb",
+     "lib/fliewr/ui.rb",
+     "lib/ppds/class_factory.rb",
+     "lib/ppds/config.rb",
+     "lib/ppds/flickr.rb"
+  ]
+  s.homepage = %q{http://github.com/themactep/fliewr}
+  s.rdoc_options = ["--charset=UTF-8"]
+  s.require_paths = ["lib"]
+  s.rubygems_version = %q{1.3.5}
+  s.summary = %q{Flickr Viewr for GNOME}
+
+  if s.respond_to? :specification_version then
+    current_version = Gem::Specification::CURRENT_SPECIFICATION_VERSION
+    s.specification_version = 3
+
+    if Gem::Version.new(Gem::RubyGemsVersion) >= Gem::Version.new('1.2.0') then
+      s.add_runtime_dependency(%q<libxml>, [">= 0"])
+    else
+      s.add_dependency(%q<libxml>, [">= 0"])
+    end
+  else
+    s.add_dependency(%q<libxml>, [">= 0"])
+  end
+end

data/lib/fliewr/core.rb

@@ -0,0 +1,71 @@
+require 'ppds/config'
+require 'ppds/flickr'
+require 'fliewr/ui'
+require 'gtk2'
+
+module Fliewr
+  class Core
+
+    def initialize
+      $app = self
+      $cfg = Ppds::Config.new 'fliewr'
+
+      $gui = Fliewr::UI.new
+      $gui.show_all
+
+      $api = Ppds::Flickr.new
+
+      start_timer
+    end
+
+    def update
+      Gtk.timeout_remove(@@timeout) if @@timeout
+      $gui.statusbar.push 0, "updating..."
+      
+      Thread.new do
+        ask_update $cfg.get(:update_interval) * 60
+        photos = $api.update $cfg.get(:max_photos)
+        $gui.refresh_with photos
+        @last_updated_at = timestamp
+      end
+      start_timer
+    rescue Exception => e
+      Alert.new @nsid, e.message, e.backtrace
+    end
+
+    def timestamp
+      Time.now.to_i
+    end
+
+    def ask_update(time_ahead = 0)
+      @requires_update_at = timestamp + time_ahead
+    end
+
+    def start_timer
+      @@timeout = Gtk::timeout_add(1000) do
+        sec_to_next_update = @requires_update_at.to_i - timestamp
+        if sec_to_next_update < 0
+          update
+        else
+          $gui.statusbar.push 0, "%s to update" % human_time(sec_to_next_update)
+        end
+      end
+    end
+
+    def human_time(time)
+      seconds = time.modulo(SECONDS_PER_MINUTE)
+      minutes = (time - seconds) / SECONDS_PER_MINUTE
+      "%d:%02d" % [minutes, seconds]
+    end
+
+    def main
+      Gtk::main
+    end
+
+    def quit
+      Gtk::main_quit
+    ensure
+      $cfg.save
+    end
+  end
+end

data/lib/fliewr/ui.rb

@@ -0,0 +1,370 @@
+require 'gtk2'
+require 'gtkmozembed'
+
+Gtk::MozEmbed.set_profile_path ENV['HOME'] + '/.mozilla', 'fliewr'
+
+module Fliewr
+
+  SECONDS_PER_MINUTE = 60
+  IMAGE_ROOT = File.expand_path(File.join(APP_ROOT, '..', 'data'))
+
+  class UI < Gtk::Window
+
+    attr_accessor :logo, :statusbar, :theme_base, :theme_item, :theme_error, :theme_style
+
+    def initialize
+      super Gtk::Window::TOPLEVEL
+
+      filename = File.join(Fliewr::IMAGE_ROOT, 'fliewr.svg')
+      self.logo = Gdk::Pixbuf.new filename, 128, 128
+
+      self.set_title 'Fliewr'
+      self.set_icon self.logo
+      self.set_width_request 278
+      self.set_height_request 400
+      self.set_allow_shrink false
+      self.set_default_width $cfg.get(:window_width).to_i
+      self.set_default_height $cfg.get(:window_height).to_i
+      self.move $cfg.get(:window_x_pos).to_i, $cfg.get(:window_y_pos).to_i
+
+      theme = $cfg.get(:theme) || 'default'
+      self.theme_base  = File.open(File.join('../data/themes/',theme,'theme.html'), "r") { |f| f.read }
+      self.theme_item  = File.open(File.join('../data/themes/',theme,'item.html'), "r") { |f| f.read }
+      self.theme_error = File.open(File.join('../data/themes/',theme,'error.html'), "r") { |f| f.read }
+      self.theme_style = File.open(File.join('../data/themes/',theme,'style.css'), "r") { |f| f.read }
+
+      self.signal_connect(:destroy) { quit }
+      self.signal_connect(:delete_event) { minimize }
+      self.signal_connect(:check_resize) { remember_size_position }
+      self.signal_connect(:window_state_event) do |widget, event|
+        case event.event_type
+        when Gdk::Event::WINDOW_STATE
+          minimize if event.changed_mask.iconified? and event.new_window_state.iconified?
+        end
+      end
+
+      self.statusbar = Gtk::Statusbar.new
+      self.statusbar.set_has_resize_grip false
+
+      toolbar = Gtk::Toolbar.new
+      toolbar.icon_size = Gtk::IconSize::MENU
+
+      icon = Gtk::Image.new Gtk::Stock::HOME, Gtk::IconSize::MENU
+      button = Gtk::ToolButton.new icon, 'Flickr'
+      button.set_important true
+      button.signal_connect(:clicked) do |widget|
+        visit_user_profile
+      end
+      toolbar.insert 0, button
+
+      icon = Gtk::Image.new Gtk::Stock::REFRESH, Gtk::IconSize::MENU
+      button = Gtk::ToolButton.new icon, 'Refresh'
+      button.set_important true
+      button.set_can_default true
+      button.set_can_focus true
+      button.signal_connect(:clicked) do |widget|
+        $app.ask_update
+      end
+      toolbar.insert 1, button
+      self.set_default button
+      self.set_focus button
+
+      icon = Gtk::Image.new Gtk::Stock::PREFERENCES, Gtk::IconSize::MENU
+      button = Gtk::ToolButton.new icon, 'Settings'
+      button.signal_connect(:clicked) do |widget|
+        Fliewr::SettingsDialog.new
+      end
+      toolbar.insert 2, button
+
+      separator = Gtk::SeparatorToolItem.new
+      separator.set_draw false
+      separator.set_expand true
+      toolbar.insert 3, separator
+
+      icon = Gtk::Image.new Gtk::Stock::QUIT, Gtk::IconSize::MENU
+      button = Gtk::ToolButton.new icon, 'Quit'
+      button.signal_connect(:clicked) do |widget|
+        $app.quit
+      end
+      toolbar.insert 4, button
+
+      @browser = Gtk::MozEmbed.new
+      @browser.signal_connect(:open_uri) do |widget, uri|
+        open_in_external_browser(uri)
+      end
+
+      vbox = Gtk::VBox.new false, 4
+      vbox.pack_start toolbar, false
+      vbox.pack_start @browser
+      vbox.pack_start self.statusbar, false
+      self.add vbox
+    end
+
+    def remember_size_position
+      x, y = self.position
+      w, h = self.size
+      $cfg.set :window_x_pos, x
+      $cfg.set :window_y_pos, y
+      $cfg.set :window_width, w
+      $cfg.set :window_height, h
+    end
+
+    def minimize
+      remember_size_position
+      hide
+    end
+
+    def maximize
+      self.show
+      self.present
+    end
+
+    def open_in_gecko(html)
+      @browser.open_stream "file:///", "text/html"
+      @browser.append_data self.theme_base % [ self.theme_style, html ]
+      @browser.close_stream
+    end
+
+    def refresh_with(data)
+      html = data.map { |d| templatize(d) }.join
+      open_in_gecko html
+    end
+
+    def templatize(data)
+      self.theme_item % [
+        photolink(data.owner,  data.id),
+        photopreview(data.farm, data.server, data.id, data.secret),
+        user_profile_link(data.owner),
+        data.username,
+        userpic(data.iconfarm, data.iconserver, data.owner),
+        data.title,
+        dateupload(data.dateupload)
+      ]
+    end
+
+    def photopreview(*args)
+      'http://farm%s.static.flickr.com/%s/%s_%s_m.jpg' % args
+    end
+
+    def photolink(*args)
+      'http://www.flickr.com/photos/%s/%s' % args
+    end
+
+    def user_profile_link(id = @nsid)
+      'http://www.flickr.com/people/%s' % id
+    end
+
+    def userpic(farm, server, owner)
+      return 'http://www.flickr.com/images/buddyicon.jpg' if farm.to_i == 0
+      'http://farm%s.static.flickr.com/%s/buddyicons/%s.jpg' % [ farm, server, owner ]
+    end
+
+    def dateupload(date_and_time)
+      Time.at(date_and_time.to_i)
+    end
+
+    def visit_user_profile
+      open_in_external_browser user_profile_link
+    end
+
+    def open_in_external_browser(uri)
+      Thread.new { system('xdg-open "%s"' % uri) }
+    end
+
+    def quit
+      $app.quit
+    end
+  end
+
+
+  class StatusIcon < Gtk::StatusIcon
+    def initialize
+      super
+      self.file = File.join(Fliewr::IMAGE_ROOT, 'fliewr.svg')
+      self.set_tooltip 'Flickr Viewr'
+      self.signal_connect(:activate) do
+        if $gui.visible?
+          $gui.minimize
+        else
+          $gui.move $cfg.get(:window_x_pos), $cfg.get(:window_y_pos)
+          $gui.show.present
+        end
+      end
+
+      self.signal_connect(:popup_menu) do |icon, button, time|
+        menu.popup nil, nil, button, time
+      end
+
+      separator = Gtk::SeparatorMenuItem.new
+
+      menu = Gtk::Menu.new
+
+      item = Gtk::ImageMenuItem.new Gtk::Stock::HOME
+      item.signal_connect(:activate) do
+        $app.visit_user_profile
+      end
+      menu.append item
+
+      item = Gtk::ImageMenuItem.new Gtk::Stock::REFRESH
+      item.signal_connect(:activate) do
+        $app.update
+      end
+      menu.append item
+
+      item = Gtk::CheckMenuItem.new 'Always on top'
+      item.signal_connect(:toggled) do |widget|
+        $gui.keep_above = widget.active?
+      end
+      menu.append item
+
+      item = Gtk::ImageMenuItem.new Gtk::Stock::PREFERENCES
+      item.signal_connect(:activate) do
+        Fliewr::SettingsDialog.new
+      end
+      menu.append item
+
+      item = Gtk::ImageMenuItem.new Gtk::Stock::ABOUT
+      item.signal_connect(:activate) do
+        AboutDialog.new
+      end
+      menu.append item
+      menu.append separator
+
+      item = Gtk::ImageMenuItem.new Gtk::Stock::QUIT
+      item.signal_connect(:activate) do
+        $app.quit
+      end
+      menu.append item
+      menu.show_all
+    end
+  end
+
+  class AboutDialog < Gtk::AboutDialog
+    def initialize
+      Gtk::AboutDialog.set_email_hook do |widget, email|
+        system("xdg-email #{email}")
+      end
+      Gtk::AboutDialog.set_url_hook do |widget, link|
+        system("xdg-open #{link}")
+      end
+      super
+      self.name         = 'Flickr Viewr'
+      self.program_name = 'Flickr Viewr'
+      self.comments     = "Flickr photostream viewer"
+      self.version      = '2.0'
+      self.copyright    = "Copyright (c)2008 Paul Philippov"
+      self.license      = "This software is released under the BSD License.\nhttp://creativecommons.org/licenses/BSD/"
+      self.authors      = ['Paul Philippov <paul@ppds.ws>']
+      self.documenters  = ['Paul Philippov <paul@ppds.ws>']
+      self.website      = "http://fliewr.googlecode.com/"
+      self.logo         = $gui.logo
+      self.run
+      self.destroy
+    end
+  end
+
+  class SettingsDialog < Gtk::Dialog
+    def initialize
+      super "Settings", nil, Gtk::Dialog::MODAL,
+        [Gtk::Stock::SAVE, Gtk::Dialog::RESPONSE_ACCEPT],
+        [Gtk::Stock::CANCEL, Gtk::Dialog::RESPONSE_CANCEL]
+
+      self.set_default_response Gtk::Dialog::RESPONSE_ACCEPT
+      self.signal_connect :response do |dialog, response|
+        case response
+        when Gtk::Dialog::RESPONSE_ACCEPT
+          if /\d\d\d\d\d\d\d\d@N\d\d/ =~ @nsid_entry.text
+            $cfg.set :nsid, @nsid_entry.text
+            $cfg.set :update_interval, @update_interval_spin.value
+            $cfg.set :max_photos, @max_photos_spin.value
+            $cfg.set :one_per_contact, @one_per_contact_toggle.active?
+            $cfg.set :only_from_friends, @only_from_friends_toggle.active?
+            $cfg.set :include_self, @include_self_toggle.active?
+            $app.update
+          else
+            Alert.new "User ID has incorrect format"
+          end
+        when Gtk::Dialog::RESPONSE_CANCEL
+          true
+        end
+      end
+      hbox = Gtk::HBox.new false, 8
+      hbox.set_border_width 8
+      self.vbox.pack_start hbox, false, false, 0
+
+      stock = Gtk::Image.new Gtk::Stock::PREFERENCES, Gtk::IconSize::DIALOG
+      hbox.pack_start stock, false, false, 0
+
+      table = Gtk::Table.new 3, 6
+      table.set_row_spacings 4
+      table.set_column_spacings 8
+      hbox.pack_start table, true, true, 0
+
+      @nsid_entry = Gtk::Entry.new
+      @nsid_entry.width_chars = 13
+      @nsid_entry.max_length = 12
+      @nsid_entry.text = $cfg.get(:nsid)
+      table.attach_defaults label('Your Flickr user ID'), 0, 1, 0, 1
+      table.attach_defaults @nsid_entry, 1, 2, 0, 1
+      table.attach_defaults button_with_click(:find, :find_nsid), 2, 3, 0, 1
+
+      @update_interval_spin = Gtk::SpinButton.new(1, 100, 1)
+      @update_interval_spin.value = $cfg.get(:update_interval).to_i
+      table.attach_defaults label('Check new photos every'), 0, 1, 1, 2
+      table.attach_defaults @update_interval_spin, 1, 2, 1, 2
+      table.attach_defaults label('minutes'), 2, 3, 1, 2
+
+      @max_photos_spin = Gtk::SpinButton.new(1, 50, 1)
+      @max_photos_spin.value = $cfg.get(:max_photos).to_i
+      table.attach_defaults label('Maximum photos to display'), 0, 1, 2, 3
+      table.attach_defaults @max_photos_spin, 1, 2, 2, 3
+
+      @one_per_contact_toggle = Gtk::CheckButton.new
+      @one_per_contact_toggle.active = $cfg.get(:one_per_contact)
+      table.attach_defaults label('Only one photo per contact'), 0, 1, 3, 4
+      table.attach_defaults @one_per_contact_toggle, 1, 2, 3, 4
+
+      @only_from_friends_toggle = Gtk::CheckButton.new
+      @only_from_friends_toggle.active = $cfg.get(:only_from_friend)
+      table.attach_defaults label('Only from friends and family'), 0, 1, 4, 5
+      table.attach_defaults @only_from_friends_toggle, 1, 2, 4, 5
+
+      @include_self_toggle = Gtk::CheckButton.new
+      @include_self_toggle.active = $cfg.get(:include_self)
+      table.attach_defaults label('Include your own photos'), 0, 1, 5, 6
+      table.attach_defaults @include_self_toggle, 1, 2, 5, 6
+
+      self.show_all
+      self.run
+      self.destroy
+    end
+
+    def button_with_click(stock_id, method_name)
+      button = Gtk::Button.new icon(stock_id)
+      button.signal_connect(:clicked) do |widget|
+        self.method(method_name).call
+      end
+      button.show_all
+    end
+
+    def find_nsid
+      $gui.open_in_external_browser 'http://www.flickr.com/services/api/explore/?method=flickr.people.getInfo'
+    end
+
+    def icon(stock_id)
+      Gtk::Stock.const_get stock_id.to_s.upcase
+    end
+
+    def label(text)
+      Gtk::Label.new(text).set_alignment(0, 0.5)
+    end
+  end
+
+  class Alert
+    def initialize(*args)
+      html = $gui.theme_error % [args].flatten.map { |e| "<li>#{e}</li>" }.join
+      $gui.open_in_gecko(html)
+      false
+    end
+  end
+end

data/lib/ppds/class_factory.rb

@@ -0,0 +1,17 @@
+module Ppds
+  class ClassFactory
+    def initialize(data=[])
+      for att in data
+        set(att.name.gsub(/-/,'_'), att.value)
+      end
+    end
+
+    def get(name)
+      instance_variable_get("@#{name}")
+    end
+
+    def set(name, value)
+      instance_variable_set("@#{name}", value)
+    end
+  end
+end

data/lib/ppds/config.rb

@@ -0,0 +1,47 @@
+require 'gconf2'
+
+module Ppds
+  class Config
+    @@gconf = GConf::Client.default
+
+    def gconf
+      @@gconf
+    end
+
+    def initialize(app)
+      @root = '/apps/%s' % app
+      gconf.add_dir(@root)
+    end
+
+    def name_from_key(key)
+      key.split('/').last
+    end
+
+    def key_from_name(name)
+      [ @root, name ].join("/")
+    end
+
+    def all
+      gconf.all_entries(@root)
+    end
+
+    def get(name)
+      gconf[key_from_name(name)]
+    end
+
+    def set(name, value)
+      gconf[key_from_name(name)] = value
+    end
+
+    def save
+      gconf.suggest_sync
+    end
+
+    def destroy
+      for one in all
+        gconf.unset(one.key)
+      end
+      save
+    end
+  end
+end

data/lib/ppds/flickr.rb

@@ -0,0 +1,51 @@
+require 'ppds/class_factory'
+require 'rest_client'
+require 'xml'
+
+module Ppds
+  class Photo < ClassFactory
+    attr_accessor :id, :secret, :server, :farm, :title, :owner, :username,
+                  :ispublic, :isfriend, :isfamily, :dateupload, :iconserver,
+                  :iconfarm, :license
+  end
+
+  class Flickr
+    API_URL = 'http://api.flickr.com/services/rest'
+    API_KEY = '0282f93eb6da0425310bd5791f4c2fc0'
+
+    attr_accessor :photos
+
+    def initialize
+    end
+
+    def query(action, data)
+      data.update({
+        :api_key => API_KEY,
+        :method  => action
+      })
+      RestClient.post(API_URL, data)
+    rescue RestClient::RequestFailed
+      raise 'Query failed: %s' % $!
+    rescue RestClient::RequestTimeout
+      raise 'Timeout occured'
+    rescue Exception
+      raise $!
+    end
+
+    def update(qty)
+      data = {
+        :extras       => 'date_upload,icon_server,license',
+        :count        => qty,
+        :user_id      => $cfg.get(:nsid).to_s,
+        :single_photo => $cfg.get(:one_per_contact) ? 1 : 0,
+        :just_friends => $cfg.get(:only_from_friends) ? 1 : 0,
+        :include_self => $cfg.get(:include_self) ? 1 : 0
+      }
+      xml = query('flickr.photos.getContactsPublicPhotos', data)
+      @xml = XML::Parser.string(xml).parse
+      self.photos = @xml.find('//photos/photo').map do |node|
+        Photo.new(node.attributes)
+      end
+    end
+  end
+end

metadata

@@ -0,0 +1,82 @@
+--- !ruby/object:Gem::Specification 
+name: themactep-fliewr
+version: !ruby/object:Gem::Version 
+  version: 2.0.0
+platform: ruby
+authors: 
+- Paul Philippov
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2009-08-22 00:00:00 -07:00
+default_executable: fliewr
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: libxml
+  type: :runtime
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: "0"
+    version: 
+description: TODO
+email: themactep@gmail.com
+executables: 
+- fliewr
+extensions: []
+
+extra_rdoc_files: 
+- LICENSE
+- README
+files: 
+- .gitignore
+- LICENSE
+- README
+- Rakefile
+- VERSION
+- bin/fliewr
+- data/api.url
+- data/fliewr.desktop
+- data/fliewr.svg
+- data/themes/default/error.html
+- data/themes/default/item.html
+- data/themes/default/style.css
+- data/themes/default/theme.html
+- fliewr.gemspec
+- lib/fliewr/core.rb
+- lib/fliewr/ui.rb
+- lib/ppds/class_factory.rb
+- lib/ppds/config.rb
+- lib/ppds/flickr.rb
+has_rdoc: false
+homepage: http://github.com/themactep/fliewr
+licenses: 
+post_install_message: 
+rdoc_options: 
+- --charset=UTF-8
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.3.5
+signing_key: 
+specification_version: 3
+summary: Flickr Viewr for GNOME
+test_files: []
+