pidgin2adium 3.3.0 → 4.0.0.beta1

data/config/website.yml

@@ -1,2 +0,0 @@
-host: gbw@rubyforge.org
-remote_dir: /var/www/gforge-projects/pidgin2adium/

data/ext/balance_tags_c/balance_tags_c.c

@@ -1,198 +0,0 @@
-/*
- * Balances tags of string using a modified stack. Returns a balanced string.
- *
- * From Wordpress's formatting.php and rewritten in C by
- * Gabe Berke-Williams, 2010.
- *
- * Original Author:: Leonard Lin <leonard@acm.org>
- * License:: GPL v2.0
- * Copyright:: November 4, 2001
- */
-
-#include <ruby.h>
-
-#ifndef RARRAY_PTR
-#define RARRAY_PTR(arr)  RARRAY(arr)->ptr
-#endif
-
-#ifndef RSTRING_LEN
-#define RSTRING_LEN(str) RSTRING(str)->len
-#endif
-
-VALUE balance_tags_c(VALUE, VALUE);
-static VALUE mP2A;
-
-/*
- * call-seq: Pidgin2Adium.balance_tags_c(text) => text with balanced HTML tags
- *
- * Balances tags of _text_. Returns modified text.
- */
-VALUE balance_tags_c(VALUE mod, VALUE text){
-  if( TYPE(text) != T_STRING ){
-    rb_raise(rb_eArgError, "bad argument to balance_tags_c, String only please.");
-  }
-  VALUE tagstack = rb_ary_new2(1);
-  int stacksize = 0;
-  VALUE tagqueue = rb_str_new2("");
-  VALUE ZERO = INT2FIX(0),
-        ONE = INT2FIX(1);
-  VALUE newtext = rb_str_new2("");
-  // Known single-entity/self-closing tags
-  VALUE single_tags = rb_ary_new3(5,
-      rb_str_new2("br"),
-      rb_str_new2("hr"),
-      rb_str_new2("img"),
-      rb_str_new2("input"),
-      rb_str_new2("meta"));
-  // Tags that can be immediately nested within themselves
-  VALUE nestable_tags = rb_ary_new3(4,
-      rb_str_new2("blockquote"),
-      rb_str_new2("div"),
-      rb_str_new2("span"),
-      rb_str_new2("font"));
-  // 1: tagname, with possible leading "/"
-  // 2: attributes
-  VALUE tag_regex = rb_eval_string("/<(\\/?\\w*)\\s*([^>]*)>/");
-  VALUE pos;  // position in text
-  VALUE match;
-  VALUE tag;
-  VALUE attributes;
-  VALUE t; // loop variable when iterating over tagstack at end of while loop
-  int matchlen;
-  int done = 0;
-  int j, k, i; // loop counters
-
-  // WP bug fix for comments - in case you REALLY meant to type '< !--'
-  rb_funcall(text, rb_intern("gsub!"), 2,
-      rb_str_new2("< !--"),
-      rb_str_new2("<    !--"));
-
-  // WP bug fix for LOVE <3 (and other situations with '<' before a number)
-  rb_funcall(text,rb_intern("gsub!"), 2,
-      rb_eval_string("/<([0-9]{1})/"),
-      rb_str_new2("&lt;\\1"));
-
-  pos = rb_funcall(text, rb_intern("=~"), 1, tag_regex);
-  done = (pos == Qnil);
-  while ( ! done ){
-    rb_str_concat(newtext, tagqueue);
-    match = rb_funcall(text, rb_intern("match"), 1, tag_regex);
-    tag = rb_funcall(rb_reg_nth_match(1, match), rb_intern("downcase"), 0);
-    attributes = rb_reg_nth_match(2, match);
-
-    matchlen = NUM2INT(rb_funcall(rb_reg_nth_match(0, match), rb_intern("size"), 0));
-
-    // clear the shifter
-    tagqueue = rb_str_new2("");
-    // Pop or Push
-    if (0 == rb_str_cmp(rb_str_substr(tag, 0, 1), rb_str_new2("/"))){ // End Tag
-      rb_funcall(tag, rb_intern("slice!"), 2, ZERO, ONE);
-      // if too many closing tags
-      if(stacksize <= 0){
-        tag = rb_str_new2("");
-        //or close to be safe: tag = '/' << tag
-      } else if (0 == rb_str_cmp(RARRAY_PTR(tagstack)[stacksize - 1], tag)){
-        // found closing tag
-        // if stacktop value == tag close value then pop
-        // Close Tag
-        tag = rb_str_append(rb_str_new2("</"), tag);
-        rb_str_concat(tag, rb_str_new2(">"));
-        // Pop
-        rb_ary_pop(tagstack);
-        stacksize--;
-      } else { // closing tag not at top, search for it
-        for(j=stacksize-1; j>=0; j--){
-          if(0 == rb_str_cmp(RARRAY_PTR(tagstack)[j], tag) ){
-            // add tag to tagqueue
-            for(k = stacksize-1;k>=j;k--){
-              rb_str_concat(tagqueue, rb_str_new2("</"));
-              rb_str_concat(tagqueue, rb_ary_pop(tagstack));
-              rb_str_concat(tagqueue, rb_str_new2(">"));
-              stacksize--;
-            }
-            break;
-          }
-        }
-        tag = rb_str_new2("");
-      }
-    } else {
-      // Begin Tag
-
-      // Tag Cleaning
-
-      if( ( RSTRING_LEN(attributes) > 0 && // test length before rb_str_substr
-            (0 == rb_str_cmp(rb_str_substr(attributes, -1, 1), rb_str_new2("/"))) ) ||
-          (0 == rb_str_cmp(tag, rb_str_new2(""))) ){
-        // If: self-closing or '', don't do anything.
-      } else if ( rb_ary_includes(single_tags, tag) ) {
-        // ElseIf: it's a known single-entity tag but it doesn't close itself, do so
-        rb_str_concat(attributes, rb_str_new2("/"));
-      } else {
-        // Push the tag onto the stack
-        // If the top of the stack is the same as the tag we want
-        // to push, close previous tag
-        if ( (stacksize > 0) &&
-            (Qfalse == rb_ary_includes(nestable_tags, tag)) &&
-            (0 == rb_str_cmp(rb_ary_entry(tagstack, stacksize - 1), tag))){
-          tagqueue = rb_str_new2("</");
-          rb_str_concat(tagqueue, rb_ary_pop(tagstack));
-          rb_str_concat(tagqueue, rb_str_new2(">"));
-          stacksize--;
-        }
-        rb_ary_push(tagstack, tag);
-        stacksize++;
-      }
-
-      // Attributes
-      if( 0 != rb_str_cmp(attributes, rb_str_new2("")) ){
-        attributes = rb_str_plus(rb_str_new2(" "), attributes);
-      }
-      tag = rb_str_plus(rb_str_new2("<"), tag);
-      rb_str_concat(tag, attributes);
-      rb_str_concat(tag, rb_str_new2(">"));
-      //If already queuing a close tag, then put this tag on, too
-      if( RSTRING_LEN(tagqueue) > 0 ){
-        rb_str_concat(tagqueue, tag);
-        tag = rb_str_new2("");
-      }
-    }
-    rb_str_concat(newtext,
-        rb_str_plus(rb_str_substr(text, 0, NUM2INT(pos)), tag));
-    text = rb_str_substr(text,
-        NUM2INT(pos)+matchlen,
-        RSTRING_LEN(text) - (NUM2INT(pos)+matchlen));
-    pos = rb_funcall(text, rb_intern("=~"), 1, tag_regex);
-    done = (pos == Qnil);
-  }
-
-  // Clear Tag Queue
-  rb_str_concat(newtext, tagqueue);
-
-  // Add Remaining text
-  rb_str_concat(newtext, text);
-
-  i = NUM2INT(rb_funcall(tagstack, rb_intern("length"), 0)) - 1;
-  // Empty Stack
-  for(; i >= 0; i--){
-    // Add remaining tags to close
-    t = RARRAY_PTR(tagstack)[i];
-    rb_str_concat(newtext, rb_str_new2("</"));
-    rb_str_concat(newtext, t);
-    rb_str_concat(newtext, rb_str_new2(">"));
-  }
-
-  // WP fix for the bug with HTML comments
-  rb_funcall(newtext, rb_intern("gsub!"), 2,
-      rb_str_new2("< !--"),
-      rb_str_new2("<!--"));
-  rb_funcall(newtext, rb_intern("gsub!"), 2,
-      rb_str_new2("<    !--"),
-      rb_str_new2("< !--"));
-
-  return newtext;
-}
-
-void Init_balance_tags_c(){
-  mP2A = rb_define_module("Pidgin2Adium");
-  rb_define_module_function(mP2A, "balance_tags_c", balance_tags_c, 1);
-}

data/ext/balance_tags_c/extconf.rb

@@ -1,4 +0,0 @@
-require 'mkmf'
-
-dir_config("balance_tags_c")
-create_makefile("balance_tags_c")

data/lib/pidgin2adium/log_converter.rb

@@ -1,71 +0,0 @@
-require 'pidgin2adium'
-
-module Pidgin2Adium
-  # An easy way to batch-process a directory. Used by the pidgin2adium
-  # command-line script.
-  class LogConverter
-    include Pidgin2Adium
-    # You can add options using the _opts_ hash, which can have the
-    # following keys, all of which are optional:
-    # * *overwrite*: If true, then overwrite even if log is found.
-    #   Defaults to false.
-    # * *output_dir*: The top-level dir to put the logs in.
-    #   Logs under output_dir are still each in their own folders, etc.
-    #   Defaults to Pidgin2Adium::ADIUM_LOG_DIR
-    def initialize(pidgin_log_dir, aliases, opts = {})
-      # parse_and_generate will process it for us
-      @opts = opts
-
-      @pidgin_log_dir = File.expand_path(pidgin_log_dir)
-      @my_aliases = aliases
-
-      unless File.directory?(@pidgin_log_dir)
-        msg = "Source directory #{@pidgin_log_dir} does not exist or is not a directory."
-        error(msg)
-
-        # ENOENT automatically prepends "No such file or directory - " to
-        # its initializer's arguments
-        raise Errno::ENOENT.new("source directory #{@pidgin_log_dir}")
-      end
-    end
-
-    # Runs Pidgin2Adium::parse_and_generate on every log file in directory
-    # provided in new, then deletes Adium's search indexes to force
-    # it to rescan logs on startup.
-    def start
-      log_msg "Begin converting."
-      begin
-        files_path = get_all_chat_files()
-      rescue Errno::EACCES => bang
-        error("Sorry, permission denied for getting Pidgin chat files from #{@pidgin_log_dir}.")
-        error("Details: #{bang.message}")
-        raise bang
-      end
-
-      total_files = files_path.size
-      total_successes = 0
-      log_msg("#{total_files} files to convert.")
-      files_path.each_with_index do |fname, i|
-        log_msg(
-          sprintf("[%d/%d] Converting %s...",
-                  (i+1), total_files, fname)
-        )
-        result = parse_and_generate(fname, @my_aliases, @opts)
-        total_successes += 1 if result == true
-      end
-
-      delete_search_indexes()
-
-      Pidgin2Adium.log_msg "Finished converting! Converted #{total_successes} files of #{total_files} total."
-      puts "Minor error messages:"
-      puts @@oops_messages.join("\n")
-      puts "Major error messages:"
-      puts @@error_messages.join("\n")
-    end
-
-    def get_all_chat_files
-      # recurse into each subdir
-      Dir.glob("#{@pidgin_log_dir}/**/*.{htm,html,txt}") - BAD_DIRS
-    end
-  end
-end

data/lib/pidgin2adium/log_file.rb

@@ -1,100 +0,0 @@
-require 'fileutils'
-
-module Pidgin2Adium
-  # A holding object for the result of LogParser.parse.  It makes the
-  # instance variable @chat_lines available, which is an array of Message
-  # subclass instances (XMLMessage, Event, etc.)
-  # Here is a list of the instance variables for each class in @chat_lines:
-  #
-  # <b>All of these variables are read/write.</b>
-  # All::		 sender, time, buddy_alias
-  # XMLMessage::	 body
-  # AutoReplyMessage:: body
-  # Event::		 body, event_type
-  # StatusMessage::	 status
-  class LogFile
-    include Pidgin2Adium
-    include Enumerable
-    def initialize(chat_lines, service, user_SN, partner_SN, adium_chat_time_start)
-      @chat_lines = chat_lines
-      @user_SN = user_SN
-      @partner_SN = partner_SN
-      @adium_chat_time_start = adium_chat_time_start
-
-      # @chat_str is generated when to_s is called
-      @chat_str = nil
-
-      # key is for Pidgin, value is for Adium
-      # Just used for <service>.<screenname> in directory structure
-      service_name_map = {'aim' => 'AIM',
-        'jabber' =>'Jabber',
-        'gtalk'=> 'GTalk',
-        'icq' => 'ICQ',
-        'qq' => 'QQ',
-        'msn' => 'MSN',
-        'yahoo' => 'Yahoo!'}
-
-      @service = service_name_map[service.downcase]
-    end
-
-    attr_reader :chat_lines, :service, :user_SN, :partner_SN, :adium_chat_time_start
-
-    # Returns contents of log file
-    def to_s
-      # Faster than inject() or each()
-      @chat_str ||= @chat_lines.map{|l| l.to_s }.join
-    end
-
-    def each(&blk)
-      @chat_lines.each{|l| yield l }
-    end
-
-    # Set overwrite=true to create a logfile even if logfile already exists.
-    # Returns one of:
-    # * false (if an error occurred),
-    # * Pidgin2Adium::FILE_EXISTS if the file to be generated already exists and overwrite=false, or
-    # * the path to the new Adium log file.
-    def write_out(overwrite = false, output_dir_base = ADIUM_LOG_DIR)
-      # output_dir_base + "/buddyname (2009-08-04T18.38.50-0700).chatlog"
-      output_dir = File.join(output_dir_base, "#{@service}.#{@user_SN}", @partner_SN, "#{@partner_SN} (#{@adium_chat_time_start}).chatlog")
-      # output_dir + "/buddyname (2009-08-04T18.38.50-0700).chatlog/buddyname (2009-08-04T18.38.50-0700).xml"
-      output_path = output_dir + '/' + "#{@partner_SN} (#{@adium_chat_time_start}).xml"
-      begin
-        FileUtils.mkdir_p(output_dir)
-      rescue => bang
-        error "Could not create destination directory for log file. (Details: #{bang.class}: #{bang.message})"
-        return false
-      end
-      if overwrite
-        unless File.exist?(output_path)
-          # File doesn't exist, but maybe it does with a different
-          # time zone. Check for a file that differs only in time
-          # zone and, if found, change @output_path to target it.
-          maybe_matches = Dir.glob(output_dir_base + '/' << File.basename(output_path).sub(/-\d{4}\)\.chatlog$/, '') << '/*')
-          unless maybe_matches.empty?
-            output_path = maybe_matches[0]
-          end
-        end
-      else
-        if File.exist?(output_path)
-          return FILE_EXISTS
-        end
-      end
-
-      begin
-        outfile = File.new(output_path, 'w')
-      rescue => bang
-        error "Could not open log file for writing. (Details: #{bang.class}: #{bang.message})"
-        return false
-      end
-
-      # no \n before </chat> because @chat_str (from to_s) has it already
-      outfile.printf('<?xml version="1.0" encoding="UTF-8" ?>'<<"\n"+
-                     '<chat xmlns="http://purl.org/net/ulf/ns/0.4-02" account="%s" service="%s">'<<"\n"<<'%s</chat>',
-                     @user_SN, @service, self.to_s)
-      outfile.close
-
-      return output_path
-    end
-  end
-end

data/lib/pidgin2adium/log_parser.rb

@@ -1,2 +0,0 @@
-# For backwards compatibility with Pidgin2Adium < 3.1.1
-require 'pidgin2adium/parsers/all'

data/lib/pidgin2adium/message.rb

@@ -1,2 +0,0 @@
-# For backwards compatibility with Pidgin2Adium < 3.1.1
-require 'pidgin2adium/message/all'

data/lib/pidgin2adium/messages/all.rb

@@ -1,5 +0,0 @@
-require 'pidgin2adium/messages/message.rb'
-require 'pidgin2adium/messages/xml_message.rb'
-require 'pidgin2adium/messages/auto_reply_message.rb'
-require 'pidgin2adium/messages/event.rb'
-require 'pidgin2adium/messages/status_message.rb'

data/lib/pidgin2adium/messages/auto_reply_message.rb

@@ -1,11 +0,0 @@
-# The Message class's subclasses, each used for holding one line of a chat.
-
-module Pidgin2Adium
-  # An auto reply message.
-  class AutoReplyMessage < XMLMessage
-    def to_s
-      return sprintf('<message sender="%s" time="%s" auto="true" alias="%s">%s</message>' << "\n",
-                     @sender, @time, @buddy_alias, @styled_body)
-    end
-  end
-end

data/lib/pidgin2adium/messages/event.rb

@@ -1,17 +0,0 @@
-module Pidgin2Adium
-  # Pidgin does not have Events, but Adium does. Pidgin mostly uses system
-  # messages to display what Adium calls events. These include sending a file,
-  # starting a Direct IM connection, or an error in chat.
-  class Event < XMLMessage
-    def initialize(sender, time, buddy_alias, body, event_type)
-      super(sender, time, buddy_alias, body)
-      @event_type = event_type
-    end
-    attr_accessor :event_type
-
-    def to_s
-      return sprintf('<event type="%s" sender="%s" time="%s" alias="%s">%s</event>',
-                     @event_type, @sender, @time, @buddy_alias, @styled_body)
-    end
-  end
-end

data/lib/pidgin2adium/messages/message.rb

@@ -1,39 +0,0 @@
-# The Message class and its subclasses, each used for holding one line of a
-# chat.
-
-module Pidgin2Adium
-  # A holding object for each line of the chat. It is subclassed as
-  # appropriate (eg AutoReplyMessage). Each subclass (but not Message
-  # itself) has its own to_s which prints out its information in a format
-  # appropriate for putting in an Adium log file.
-  # Subclasses: XMLMessage, AutoReplyMessage, StatusMessage, Event.
-  class Message
-    include Comparable
-    def initialize(sender, time, buddy_alias)
-      # The sender's screen name
-      @sender = sender
-      # The time the message was sent, in Adium format (e.g.
-      # "2008-10-05T22:26:20-0800")
-      @time = time
-      @time_object = Time.parse(@time)
-      # The receiver's alias (NOT screen name)
-      @buddy_alias = buddy_alias
-    end
-    attr_accessor :sender, :time, :buddy_alias
-
-    # Compare this Message to +other_message+, based on their timestamps.
-    # Returns a number < 0 if this message was sent before +other_message+,
-    # 0 if they were sent at the same time, and a number > 0 if this message
-    # was sent after +other_message+.
-    def <=>(other_message)
-      return @time_object - other_message.time_object
-    end
-
-    protected
-      # Protected because Time.parse doesn't have exactly the right time
-      # zone. It works fine for <=>, though.
-      def time_object
-        return @time_object
-      end
-  end
-end