fliewr 2.0.0

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,46 @@
+== 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/
+
+  * LibXml Ruby
+    http://libxml.rubyforge.org/
+
+  * REST Client
+    http://github.com/adamwiggins/rest-client/
+
+
+=== Installation ===
+
+  $ sudo gem source -a http://gems.github.com/
+  $ sudo gem install themactep-fliewr
+
+
+=== Homepage ===
+
+  http://themactep.com/fliewr
+
+
+=== Authors ===
+
+  Paul Philippov <themactep@gmail.com>

data/Rakefile

@@ -0,0 +1,50 @@
+require 'rubygems'
+require 'rake'
+require 'rake/clean'
+require 'rake/gempackagetask'
+require 'rake/rdoctask'
+require 'rake/testtask'
+require 'spec/rake/spectask'
+
+spec = Gem::Specification.new do |s|
+  s.name = 'fliewr'
+  s.version = '2.0.0'
+  s.has_rdoc = false
+  s.extra_rdoc_files = ['README', 'LICENSE']
+  s.summary = 'Flickr Viewr for GNOME'
+  s.description = 'fliewr a GNOME application to monitor updates from Flickr contacts'
+  s.author = 'Paul Philippov'
+  s.email = 'themactep@gmail.com'
+  s.homepage = 'http://themactep.com/fliewr'
+  s.rubyforge_project = 'fliewr'
+  s.executables = ['fliewr']
+  s.files = %w(LICENSE README Rakefile) + Dir.glob("{bin,data,lib,spec}/**/*")
+  s.require_path = "lib"
+  s.bindir = "bin"
+  s.add_dependency "ppds-libs"
+  s.add_dependency "libxml-ruby"
+  s.add_dependency "rest-client"
+end
+
+Rake::GemPackageTask.new(spec) do |p|
+  p.gem_spec = spec
+  p.need_tar = true
+  p.need_zip = true
+end
+
+Rake::RDocTask.new do |rdoc|
+  files =['README', 'LICENSE', 'lib/**/*.rb']
+  rdoc.rdoc_files.add(files)
+  rdoc.main = "README" # page to start on
+  rdoc.title = "fliewr Docs"
+  rdoc.rdoc_dir = 'doc/rdoc' # rdoc output folder
+  rdoc.options << '--line-numbers'
+end
+
+Rake::TestTask.new do |t|
+  t.test_files = FileList['test/**/*.rb']
+end
+
+Spec::Rake::SpecTask.new do |t|
+  t.spec_files = FileList['spec/**/*.rb']
+end

data/bin/fliewr

@@ -0,0 +1,23 @@
+#!/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
+
+begin
+  require 'rubygems'
+rescue LoadError
+  nil
+end
+
+require 'fliewr/core'
+
+Fliewr::Core.new
+Thread.new { Fliewr::StatusIcon.new }
+$app.main

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/pixmaps/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,4 @@
+<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/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,372 @@
+require 'gtk2'
+require 'gtkmozembed'
+
+Gtk::MozEmbed.set_profile_path ENV['HOME'] + '/.mozilla', 'fliewr'
+
+module Fliewr
+
+  SECONDS_PER_MINUTE = 60
+
+  DATA_ROOT = File.expand_path(File.join(File.dirname(__FILE__), '..', '..', '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::DATA_ROOT, 'pixmaps', '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'
+      theme_root = File.join(DATA_ROOT,'themes',theme)
+      self.theme_base  = File.open(File.join(theme_root,'theme.html'), "r") { |f| f.read }
+      self.theme_item  = File.open(File.join(theme_root,'item.html'), "r") { |f| f.read }
+      self.theme_error = File.open(File.join(theme_root,'error.html'), "r") { |f| f.read }
+      self.theme_style = File.open(File.join(theme_root,'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::DATA_ROOT, 'pixmaps', '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
+
+      menu = Gtk::Menu.new
+
+      self.signal_connect(:popup_menu) do |icon, button, time|
+        menu.popup nil, nil, button, time
+      end
+
+      separator = Gtk::SeparatorMenuItem.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/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,97 @@
+--- !ruby/object:Gem::Specification 
+name: fliewr
+version: !ruby/object:Gem::Version 
+  version: 2.0.0
+platform: ruby
+authors: 
+- Paul Philippov
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2009-08-24 00:00:00 +07:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: ppds-libs
+  type: :runtime
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: "0"
+    version: 
+- !ruby/object:Gem::Dependency 
+  name: libxml-ruby
+  type: :runtime
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: "0"
+    version: 
+- !ruby/object:Gem::Dependency 
+  name: rest-client
+  type: :runtime
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: "0"
+    version: 
+description: fliewr a GNOME application to monitor updates from Flickr contacts
+email: themactep@gmail.com
+executables: 
+- fliewr
+extensions: []
+
+extra_rdoc_files: 
+- README
+- LICENSE
+files: 
+- LICENSE
+- README
+- Rakefile
+- bin/fliewr
+- data/themes/default/item.html
+- data/themes/default/error.html
+- data/themes/default/style.css
+- data/themes/default/theme.html
+- data/fliewr.desktop
+- data/pixmaps/fliewr.svg
+- lib/ppds/flickr.rb
+- lib/fliewr/core.rb
+- lib/fliewr/ui.rb
+has_rdoc: true
+homepage: http://themactep.com/fliewr
+licenses: []
+
+post_install_message: 
+rdoc_options: []
+
+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: fliewr
+rubygems_version: 1.3.5
+signing_key: 
+specification_version: 3
+summary: Flickr Viewr for GNOME
+test_files: []
+