viewpoint 0.0.1

data/README

@@ -0,0 +1,60 @@
+--------------------------------------------------------------------------
+                   Viewpoint for Exchange Web Services
+--------------------------------------------------------------------------
+This program attempts to create a client access library for Exchange Web
+Services (EWS) in Ruby.
+--------------------------------------------------------------------------
+REQUIRED GEMS:
+
+# Current SOAP4R ( http://dev.ctor.org/soap4r )
+gem install -r soap4r
+
+# iCalendar
+gem install -r icalendar
+
+CONFIGURATION:
+Configure your user/pass and EWS endpoint in lib/soap/viewpoint.conf
+or $HOME/.viewpointrc.  If the file $HOME/.viewpointrc exists it takes
+presidence.  See the sample in lib/soap/viewpoint.conf for how this
+file should be configured.
+
+
+Running Examples:
+To run the FuseFS example you need the 'fusefs' gem
+
+
+******************** EXAMPLES *********************
+# In the following examples the following are used:
+# "item" is a type of Viewpoint::Item
+# "folder" is a type of Viewpoint::Folder
+# "new_folder" is a type of Viewpoint::Folder
+
+# === Convert your Exchange Calendar to a Icalendar::Calendar object ===
+require 'lib/exchwebserv'
+vp = Viewpoint::ExchWebServ.instance
+vp.authenticate
+vp.find_folders
+cal = vp.get_folder("Calendar")
+ical = cal.to_ical
+puts ical.to_ical
+
+# === Get a listing of todays messages ===
+# See test/test_client.rb
+
+# === Moving an item ===
+item.move_to!(new_folder)
+
+# === Deleting an item ===
+item.delete!
+item.recycle!   # Move to "Deleted Items"
+
+
+--------------------------------------------------------------------------
+DISCLAIMER:  I am by no means a Ruby or EWS expert.  There may be better
+means of doing what I am attempting to do.  If you see something that
+could be done better or would like to help out in the development of this
+code please feel free to clone the 'git' repository:
+git clone git://github.com/zenchild/Viewpoint-for-MS-Exchange.git
+or add an issue on GitHub:
+http://github.com/zenchild/Viewpoint-for-MS-Exchange/issues
+--------------------------------------------------------------------------

data/Rakefile

@@ -0,0 +1,39 @@
+require 'rubygems'
+require 'rake/clean'
+require 'rake/gempackagetask'
+
+CLEAN.include("pkg")
+CLEAN.include("doc")
+
+GEMSPEC = Gem::Specification.new do |gem|
+  gem.name = "viewpoint"
+  gem.version = File.open('VERSION').readline.chomp
+  gem.date		= Date.today.to_s
+  gem.platform = Gem::Platform::RUBY
+  gem.rubyforge_project  = nil
+
+  gem.author = "Dan Wanek"
+  gem.email = "dan.wanek@gmail.com"
+  gem.homepage = "http://github.com/zenchild/Viewpoint"
+
+  gem.summary = "A Ruby client access library for Microsoft Exchange Web Services (EWS)"
+  gem.description	= <<-EOF
+  	A Ruby client access library for Microsoft Exchange Web Services (EWS).  It is a work in progress.  Methods are still being added from the EWS API docs.  Please see them for further information: http://msdn.microsoft.com/en-us/library/bb204119.aspx
+  EOF
+
+  gem.files = `git ls-files`.split(/\n/)
+  gem.require_path = "lib"
+  gem.rdoc_options	= %w(-x wsdl/ -x test/ -x examples/)
+  gem.extra_rdoc_files = %w(README COPYING.txt)
+
+  gem.required_ruby_version	= '>= 1.8.7'
+  gem.requirements			= []
+  #gem.add_runtime_dependency  ''
+  gem.post_install_message	= "Don't forget to create .viewpointrc.  See README"
+end
+ 
+Rake::GemPackageTask.new(GEMSPEC) do |pkg|
+  pkg.need_tar = true
+end
+
+task :default => [:clean, :repackage]

data/examples/cal2ical.rb

@@ -0,0 +1,29 @@
+#############################################################################
+# Copyright © 2009 Dan Wanek <dan.wanek@gmail.com>
+#
+#
+# This file is part of Viewpoint.
+# 
+# Viewpoint 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.
+# 
+# Viewpoint 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 Viewpoint.  If not, see <http://www.gnu.org/licenses/>.
+#############################################################################
+require File.dirname(__FILE__) + '/../lib/exchwebserv'
+include Viewpoint
+
+vp = ExchWebServ.instance
+vp.authenticate
+vp.find_folders
+cal = vp.get_folder("Calendar")
+ical = cal.to_ical
+puts ical.to_ical
+

data/examples/ews_fusefs.rb

@@ -0,0 +1,364 @@
+#############################################################################
+# Copyright © 2009 Dan Wanek <dan.wanek@gmail.com>
+#
+#
+# This file is part of Viewpoint.
+# 
+# Viewpoint 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.
+# 
+# Viewpoint 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 Viewpoint.  If not, see <http://www.gnu.org/licenses/>.
+#############################################################################
+require 'fusefs'
+require 'time'
+include FuseFS
+require File.dirname(__FILE__) + '/../lib/exchwebserv'
+require File.dirname(__FILE__) + '/../lib/folder'
+include Viewpoint
+
+
+class EWSFuse < FuseDir
+
+	@@maildir_dirs = ['cur','new', 'tmp']
+	@@ewsfuse_dir = "#{ENV['HOME']}/.ewsfuse"
+
+	def initialize(mountpoint)
+		@vp = ExchWebServ.instance
+		@vp.authenticate
+		@vp.find_folders
+		@mf = (@vp.get_mail_folders)
+		puts "MF: #{@mf.class.to_s}"
+		@messages = {}    # Message objects
+		@open_files = {}  # Files open for RAW IO
+		@mountpoint = mountpoint
+
+		#File::umask(0077)
+		if( !File.directory?(@@ewsfuse_dir) )
+			Dir.mkdir(@@ewsfuse_dir)
+		end
+	end
+
+	# ----- FuserFS Methods ----- #
+	def contents(path)
+		puts "--- IN: contents ---"
+		if (local_path?(path))
+			puts "--- IN: contents: if ---"
+			Dir.entries(local_path(path))
+		else
+			puts "--- IN: contents: else ---"
+			parts = scan_path(path)
+			case parts.pop
+			when nil
+				puts "--- IN: contents: else --- while 'nil'"
+				output = @mf.keys do |folder_name|
+					folder_name
+				end
+				output + Dir.entries(local_path(path))
+			when 'cur'
+				np = parts.pop
+				puts "folder: #{np}"
+				mdir = @mf[np]
+				if( mdir == nil )
+					[]
+				else
+					mdir = @vp.get_folder(mdir.display_name)
+					puts "Fetching todays messages for #{mdir.display_name} of type #{mdir.class.to_s}"
+					mdir.get_todays_messages.map do |msg|
+						puts "Got message of type: #{msg.class.to_s}"
+						msg_hash = msg.item_id.hash.abs
+						@messages[msg_hash.to_s] = msg
+						"#{msg.date_time_recieved.strftime('%s')}_#{msg_hash}"
+					end
+				end
+			when 'new','tmp'
+				[]
+			else
+				['cur','new','tmp']
+			end
+		end
+	end
+
+	def directory?(path)
+		if( local_path?(path) )
+			puts "Checking for Local_dir?"
+			File.directory?( local_path(path) )
+		else
+			parts = scan_path(path)
+			part = parts.pop
+			case part
+			when /^[0-9]{10,}_/
+				puts "NOT DIR: #{path}"
+				return false
+			when nil, 'cur','new','tmp'
+				puts "IS DIR: #{path}"
+				return true
+			else
+				if( (@mf[part] ) != nil )
+					puts "IS DIR: #{path}"
+					return true
+				else
+					puts "NOT DIR: #{path}"
+					return false
+				end
+			end
+		end
+	end
+	
+	def file?(path)
+		if( local_path?(path) )
+			if(File.exists?(local_path(path)))
+				ans = !directory?(path)
+			else
+				ans = false
+			end
+		else
+			ans = !directory?(path)
+		end
+		puts "=> file?(#{path}) ... " + (ans ? "yes" : "no")
+		return ans
+	end
+
+	def executable?(path)
+		if( local_path?(path) )
+			return File.executable?(local_path(path))
+		else
+			return directory?(path)
+		end
+	end
+	
+	def read_file(path)
+		if( local_path?(path) )
+			IO.read(local_path(path))
+		else
+			parts = scan_path(path)
+			msg_hash = parts.last.split('_').last
+			@messages[msg_hash.to_s].to_rfc822
+		end
+	end
+	
+    def can_write?(path)
+		return false if path =~ /folders.db/
+		parts = scan_path(path)
+
+		ans = local_path?(path) || path == '/' #||
+			#parts.last =~ /^[0-9]{10,}_/
+
+		puts "=> can_write?(#{path}) ... " + (ans ? "yes" : "no")
+		return ans
+	end
+
+	def write_to(path, str)
+		puts "=> write_to(#{path}, str...)"
+		io = File.open(local_path(path),'w+')
+		io.write(str)
+		io.close
+	end
+
+    def can_delete?(path)
+		parts = scan_path(path)
+
+		ans = local_path?(path) ||
+			parts.last =~ /^[0-9]{10,}_/
+
+		puts "=> can_delete?(#{path}) ... " + (ans ? "yes" : "no")
+		ans
+	end
+
+    def delete(path)
+		puts "=> delete(#{path})"
+		if( local_path?(path) )
+			puts "In LOCAL DELETE"
+			lpath = local_path(path)
+			if( File.directory?(lpath) )
+				puts "Removing local directory #{lpath}"
+			else
+				puts "Removing local file #{lpath}"
+				File.unlink(lpath)
+			end
+		else
+			puts "In NON LOCAL DELETE"
+			parts = scan_path(path)
+			msg_hash = parts.last.split('_').last
+			puts "In NON LOCAL DELETE 2: #{msg_hash}"
+			puts "In NON LOCAL DELETE 3: #{parts[-3]}"
+			#mdir = @vp.get_folder(parts[-3])
+			if ( (msg = @messages[msg_hash.to_s]) == nil)
+				npath = parts
+				npath.pop
+				contents(npath.join('/'))
+				msg = @messages[msg_hash.to_s]
+			end
+			puts "In NON LOCAL DELETE 4: #{msg.class.to_s}"
+			puts "MESG: #{msg.class.to_s}, ID: #{msg.item_id}, PARENT: #{msg.parent_folder.class.to_s}"
+			#puts "MESG: #{mdir.class.to_s}"
+			msg.parent_folder.recycle_item(msg.item_id)
+			true
+		end
+	end
+	
+    def can_mkdir?(path)
+		ans = local_path?(path)
+		puts "=> can_mkdir?(#{path}) ... " + (ans ? "yes" : "no")
+		ans
+	end
+
+	def mkdir(path)
+		puts "=> mkdir(#{path})"
+		lpath = local_path(path)
+		Dir.mkdir lpath
+	end
+
+    def can_rmdir?(path)
+		puts "=> can_rmdir?(#{path})"
+		local_path?(path)
+	end
+	
+	def rmdir(path)
+		lpath = local_path(path)
+		puts "=> rmdir(#{lpath})"
+		Dir.rmdir(lpath)
+	end
+	
+	def size(path)
+		if(local_path?(path))
+			File.size(local_path(path))
+		end
+	end
+
+	# --- RAW FuserFS Methods --- #
+    def raw_open(path,mode)   # mode is "r" "w" or "rw", with "a" if the file
+		puts "** => raw_open(#{path}, '#{mode}')"
+
+		if( !local_path?(path) )
+			return false
+		end
+
+		lpath = local_path(path)
+
+		case mode
+		when /^r$/
+			mode = 'r'
+		when /^w$/
+			mode = 'a'
+		when /^[wr]{2}$/, /a/
+			if(File.exists?(lpath))
+				mode = 'r+'
+			else
+				mode = 'w+'
+			end
+		else
+			raise "Unknown mode error #{mode}"
+		end
+
+		puts "Setting mode to '#{mode}'"
+
+		return true if @open_files.has_key?(path)
+		begin
+			puts "Raw opening.... File.open(#{lpath}, #{mode})" 
+			@open_files[path] = File.open(lpath, mode)
+			return true
+		rescue => error
+			puts "Error opening raw file: #{error}"
+			return false
+		end
+	end
+
+    def raw_read(path,offset,size)
+		begin
+			puts "** => raw_read(#{path}, #{offset}, #{size})"
+			file = @open_files[path]
+			return unless file
+			#file.sysseek(offset,IO::SEEK_SET)
+			#file.sysread(size)
+			file.seek(offset, File::SEEK_SET)
+			file.read(size)
+		rescue => error
+			puts "Error reading raw file: #{error}"
+			nil
+		end
+	end
+
+    def raw_write(path,offset,size,buf)
+		begin
+			puts "** => raw_write(#{path}, #{offset}, #{size}, ... buf)"
+			file = @open_files[path]
+			return unless file
+			file.seek(offset, File::SEEK_CUR)
+			file.write(buf[0, size])
+			#file.sysseek(offset,IO::SEEK_CUR)
+			#file.syswrite(buf[0, size])
+		rescue => error
+			puts "Error writing to raw file: #{error}"
+		end
+	end
+
+    def raw_close(path)
+		begin
+			puts "** => raw_close(#{path})"
+			file = @open_files[path]
+			return unless file
+			file.close
+			@open_files.delete path
+		rescue => error
+			puts "Error closing raw file: #{error}"
+		end
+	end
+
+
+	# --- End FuserFS Methods --- #
+	
+	# Is this a virtual dir/file or a local file
+	def local_path?(path)
+		parts = scan_path(path)
+
+		if parts.empty?
+			ans = false
+		else
+			ans = ((!@@maildir_dirs.include? parts.last) &&
+					parts.last !~ /^[0-9]{10,}_/ &&
+					((@mf[parts.last]) == nil)
+					)
+		end
+
+		puts "==> local_path?(#{path}) ... " + (ans ? "yes" : "no")
+		return ans
+	end
+
+	# Return local path as a string
+	def local_path(path)
+		puts "==> local_path(#{path})"
+		#lpath = path.gsub(/#{@mountpoint}\/?/,'')
+		lpath = path.gsub(/^\/?/,'')
+		return "#{@@ewsfuse_dir}/#{lpath}"
+	end
+end
+
+# FuserFS set-up
+if (File.basename($0) == File.basename(__FILE__))
+	if (ARGV.size != 1)
+		puts "Usage: #{$0} <directory>"
+		exit
+	end
+	
+	dirname = ARGV.shift
+	
+	unless File.directory?(dirname)
+		puts "Usage: #{dirname} is not a directory."
+		exit
+	end
+	
+	root = EWSFuse.new(dirname)
+
+	# Set the root FuseFS
+	FuseFS.set_root(root)
+	FuseFS.mount_under(dirname)
+	FuseFS.run # This doesn't return until we're unmounted.
+end