inetmgr 0.6.0 → 0.7.0

data/Gemfile

@@ -0,0 +1,2 @@
+source :rubygems
+gemspec

data/RELEASE-NOTES.rdoc

@@ -1,6 +1,10 @@
 = inetmgr Release Notes
 
-== Latest Version (0.6.0)
+== Latest Version (0.7.0)
+
+- Merged changes from Maxim-Filimonov (https://github.com/Maxim-Filimonov/inetmgr) who was so kind to make adding sites safer and namespacing the configuration classes to avoid conflicts with other libraries.
+
+== 0.6.0
 
 - Merged pull request from Scott Baldwin (https://github.com/scottsbaldwin) who was so kind to add support for configuring site log files.
 

data/inetmgr.gemspec

@@ -4,7 +4,7 @@ require 'rake/gempackagetask'
 spec = Gem::Specification.new do |s|
 
     s.name       = "inetmgr"
-    s.version    = "0.6.0"
+    s.version    = "0.7.0"
     s.summary    = "A library for managing IIS configuration settings."
     s.description = "inetmgr allows you to inspect/configure IIS configuration sections and elements."
 
@@ -18,4 +18,7 @@ spec = Gem::Specification.new do |s|
     s.files      = FileList["**/**/*"].to_a
     s.require_path      = "lib"
 
+    s.add_development_dependency 'uuid'
+    s.add_development_dependency 'rspec'
+
 end

data/lib/inetmgr/configuration.rb

@@ -1,21 +1,24 @@
-
-class Configuration 
-
-	def initialize(path, server = nil)
-		@admin_manager = WIN32OLE.new "Microsoft.ApplicationHost.WritableAdminManager", server
-		@admin_manager.CommitPath = path;
-	end
-
-	# applies/commits all changes made since the creation of the
-	# IisConfiguration instance or the last time this method was called.
-	def apply_changes
-		@admin_manager.CommitChanges
-	end
-
-private
-
-	def get_admin_section(section_name)
-		@admin_manager.GetAdminSection(section_name, @admin_manager.CommitPath)
-	end
-
-end
+module Inetmgr
+
+class Configuration
+
+	def initialize(path, server = nil)
+		@admin_manager = WIN32OLE.new "Microsoft.ApplicationHost.WritableAdminManager", server
+		@admin_manager.CommitPath = path;
+	end
+
+	# applies/commits all changes made since the creation of the
+	# IisConfiguration instance or the last time this method was called.
+	def apply_changes
+		@admin_manager.CommitChanges
+	end
+
+private
+
+	def get_admin_section(section_name)
+		@admin_manager.GetAdminSection(section_name, @admin_manager.CommitPath)
+	end
+
+end
+
+end

data/lib/inetmgr/iis_configuration.rb

@@ -1,7 +1,8 @@
-require File.join(File.expand_path(File.dirname(__FILE__)), 'iis_object/site.rb')
-require File.join(File.expand_path(File.dirname(__FILE__)), 'iis_object/application_pool.rb')
-require File.join(File.expand_path(File.dirname(__FILE__)), 'iis_object/auto_start_provider.rb')
+require 'inetmgr/iis_object/site.rb'
+require 'inetmgr/iis_object/application_pool.rb'
+require 'inetmgr/iis_object/auto_start_provider.rb'
 
+module Inetmgr
 # Represents the local IIS configuration settings (meta base).
 class IisConfiguration < Configuration
 
@@ -14,11 +15,17 @@ class IisConfiguration < Configuration
 		yield cfg
 		cfg.apply_changes
 	end
-	
-	# Gets all configured web sites.
+
+  def generate_id(collection)
+    count = collection.Count
+    arr = (0...count).map {|index| collection.Item(index).Properties.Item('Id').Value }
+    (arr.max) ? (arr.max + 1) : 1
+  end
+
+  # Gets all configured web sites.
     def get_sites
-		s = get_admin_section "system.applicationHost/sites"
-	    IisObjectCollection.new s.Collection, :site, Site, lambda { |site| site.id = s.Collection.Count + 1 }
+      s = get_admin_section "system.applicationHost/sites"
+      IisObjectCollection.new s.Collection, :site, Site, lambda { |site| site.id = generate_id(s.Collection) }
     end
 
 	# Gets all configure application pools.
@@ -33,4 +40,7 @@ class IisConfiguration < Configuration
 		IisObjectCollection.new s.Collection, :add, AutoStartProvider
 	end
 
-end
+end
+end
+
+IisConfiguration = Inetmgr::IisConfiguration

data/lib/inetmgr/iis_object.rb

@@ -1,4 +1,5 @@
-# Represents an IIS configuration element. Serves as the base class for all
+module Inetmgr
+  # Represents an IIS configuration element. Serves as the base class for all
 # IIS artifacts like Site, Application and VirtualDirectory.
 class IisObject
 
@@ -57,7 +58,7 @@ class IisObject
 
 	def invoke_method name
 		method = @element.Methods.Item(name.to_s).CreateInstance()
-		
+
 		# TODO: if block_given? change method_missing to change this:
 		# method.Input.Properties.Item("key").Value = value
 		# in to this:
@@ -72,7 +73,7 @@ private
 	def method_missing(symbol, *args)
 		name = symbol.to_s.to_camel_case
 		if (/=$/.match(name))
-			
+
 			@element.Properties.Item(name.sub(/=$/, '')).Value = args[0]
 		else
 			@element.Properties.Item(name).Value
@@ -83,3 +84,5 @@ private
 
 end
 
+
+end

data/lib/inetmgr/iis_object/application.rb

@@ -1,11 +1,13 @@
 require File.join(File.expand_path(File.dirname(__FILE__)), 'virtual_directory.rb')
 
-class Application  < IisObject
+module Inetmgr
+  class Application  < IisObject
 
   prop :auto_start, "serviceAutoStartEnabled"
   prop :auto_start_provider, "serviceAutoStartProvider"
   prop :application_pool, :applicationPool
-  
+
   collection :virtual_directories, :virtualDirectory, VirtualDirectory
- 
+
+end
 end

data/lib/inetmgr/iis_object/application_pool.rb

@@ -1,7 +1,8 @@
 require File.join(File.expand_path(File.dirname(__FILE__)), 'process_model.rb')
 require File.join(File.expand_path(File.dirname(__FILE__)), 'recycling.rb')
 
-class ApplicationPool < IisObject
+module Inetmgr
+  class ApplicationPool < IisObject
 
 	# prop :managed_runtime_version,   :managedRuntimeVersion
 	# prop :pass_anonymous_token, :passAnonymousToken
@@ -12,9 +13,10 @@ class ApplicationPool < IisObject
 	prop :classic_pipeline,  :managedPipelineMode,    lambda { |a| a == true ? 1 : 0 },                       lambda {|value| value.to_i == 1 }
 	prop :enable_32bit,      :enable32BitAppOnWin64
 	prop :always_running,    :startMode,              lambda { |a| a == true ? "AlwaysRunning" : "OnDemand" },lambda {|value| value.to_i == 1 }
-	
+
     child :process_model, :processModel, ProcessModel
-    child :recycling, :recycling, Recycling 
+    child :recycling, :recycling, Recycling
 
 end
 
+end

data/lib/inetmgr/iis_object/auto_start_provider.rb

@@ -1,3 +1,5 @@
-class AutoStartProvider < IisObject
+module Inetmgr
+  class AutoStartProvider < IisObject
 
+end
 end

data/lib/inetmgr/iis_object/binding_information.rb

@@ -1,3 +1,4 @@
+module Inetmgr
 
 class BindingInformation < IisObject
 
@@ -23,4 +24,5 @@ class BindingInformation < IisObject
 	def disable_ds_mapper
 		invoke_method("DisableDsMapper")
 	end
+end
 end

data/lib/inetmgr/iis_object/periodic_restart.rb

@@ -1,3 +1,6 @@
-class PeriodicRestart < IisObject
-	children :schedule, :schedule, IisObject
-end
+module Inetmgr
+  class PeriodicRestart < IisObject
+	children :schedule, :schedule, IisObject
+end
+
+end

data/lib/inetmgr/iis_object/process_model.rb

@@ -1,18 +1,21 @@
-# Specifies security, performance, health, and reliability features of application pools.
-class ProcessModel < IisObject
-
-	Identity_type_map = [:system, :local_service, :network_service, :specific_user, :application_pool_identity]
-
-	##
-	# Specifies the logon type for the process identity.
-	# - :batch indicates that the application pool identity should logon as a batch user.
-	# - :service indicates that the application pool identity should logon as a service.
-
-	prop :logon_type, :logonType, lambda {|value| value == :batch ? 0 : 1 }, lambda { |a| a == 0 ? :batch : :service }
-
-	prop :identity_type, :identityType, lambda {|value| Identity_type_map.index(value)}, lambda { |a| Identity_type_map[a] }
-	prop :user_name, :userName
-	#prop :password
-	prop :load_user_profile, :loadUserProfile
-
-end
+module Inetmgr
+  # Specifies security, performance, health, and reliability features of application pools.
+class ProcessModel < IisObject
+
+	Identity_type_map = [:system, :local_service, :network_service, :specific_user, :application_pool_identity]
+
+	##
+	# Specifies the logon type for the process identity.
+	# - :batch indicates that the application pool identity should logon as a batch user.
+	# - :service indicates that the application pool identity should logon as a service.
+
+	prop :logon_type, :logonType, lambda {|value| value == :batch ? 0 : 1 }, lambda { |a| a == 0 ? :batch : :service }
+
+	prop :identity_type, :identityType, lambda {|value| Identity_type_map.index(value)}, lambda { |a| Identity_type_map[a] }
+	prop :user_name, :userName
+	#prop :password
+	prop :load_user_profile, :loadUserProfile
+
+end
+
+end

data/lib/inetmgr/iis_object/recycling.rb

@@ -1,5 +1,8 @@
-require File.join(File.expand_path(File.dirname(__FILE__)), 'periodic_restart.rb')
-
-class Recycling < IisObject
-	child :periodic_restart, :periodicRestart, PeriodicRestart
-end
+require File.join(File.expand_path(File.dirname(__FILE__)), 'periodic_restart.rb')
+
+module Inetmgr
+  class Recycling < IisObject
+	child :periodic_restart, :periodicRestart, PeriodicRestart
+end
+  
+end

data/lib/inetmgr/iis_object/site.rb

@@ -3,7 +3,8 @@ require File.join(File.expand_path(File.dirname(__FILE__)), 'site_logfile.rb')
 require File.join(File.expand_path(File.dirname(__FILE__)), 'binding_information.rb')
 require File.join(File.expand_path(File.dirname(__FILE__)), 'application.rb')
 
-class Site < IisObject
+module Inetmgr
+  class Site < IisObject
 
 	# name
 	# id
@@ -25,3 +26,4 @@ class Site < IisObject
 	end
 
 end
+end

data/lib/inetmgr/iis_object/site_limit.rb

@@ -1,7 +1,10 @@
-class SiteLimit < IisObject
-
-	prop :max_bandwidth, :maxBandwidth
-	prop :max_connections, :maxConnections
-	prop :connection_timeout, :connectionTimeout
-
-end
+module Inetmgr
+  class SiteLimit < IisObject
+
+  	prop :max_bandwidth, :maxBandwidth
+  	prop :max_connections, :maxConnections
+  	prop :connection_timeout, :connectionTimeout
+
+  end
+
+end

data/lib/inetmgr/iis_object/site_logfile.rb

@@ -1,4 +1,5 @@
-class SiteLogFile < IisObject
+module Inetmgr
+  class SiteLogFile < IisObject
 
 	prop :directory, :directory
 	prop :log_ext_file_flags, :logExtFileFlags
@@ -6,3 +7,5 @@ class SiteLogFile < IisObject
 	prop :period, :period
 
 end
+
+end

data/lib/inetmgr/iis_object/virtual_directory.rb

@@ -1,5 +1,7 @@
-class VirtualDirectory < IisObject
+module Inetmgr
+  class VirtualDirectory < IisObject
 
 	prop :path, "path"
 	prop :physical_path, :physicalPath
+end
 end

data/lib/inetmgr/iis_object_collection.rb

@@ -1,6 +1,8 @@
+module Inetmgr
+
 # Represents a collection of IIS configuration objects.
 class IisObjectCollection
-
+  include Enumerable
 	def initialize element, item_name, type, add_callback = nil
 		@collection_element = element
 		@item_name = item_name
@@ -15,7 +17,7 @@ class IisObjectCollection
 	def count
 		size
 	end
-	
+
     def [](index)
 		return @type.new @collection_element.Item index
     end
@@ -33,14 +35,14 @@ class IisObjectCollection
 		added
     end
 
-	def find 
+	def find
 		size.times do |i|
 			instance = self[i]
 			return instance if yield(instance)
 		end
 		nil
 	end
-	
+
 	def exists(name)
 		!(find {|s| s.name == name}).nil?
 	end
@@ -48,4 +50,5 @@ class IisObjectCollection
     def remove(index)
 	    @collection_element.DeleteElement index
     end
+end
 end

data/lib/inetmgr/site_configuration.rb

@@ -1,34 +1,37 @@
-
-class SiteConfiguration < Configuration
-
-	def initialize(name, server = nil)
-		super "MACHINE/WEBROOT/APPHOST/#{name}", server
-	end
-
-	def get_app_settings
-		get_collection "appSettings"
-	end
-
-	def get_connection_strings
-		get_collection "connectionStrings"
-	end
-
-	def get_validation_settings
-		IisObject.new get_admin_section("system.webServer/validation")
-	end
-
-	def get_static_content_settings
-		IisObject.new get_admin_section("system.webServer/staticContent")
-	end
-
-	def get_service_model_settings
-		IisObject.new get_admin_section("system.serviceModel")
-	end
-	
-private
-
-	def get_collection(name)
-		IisObjectCollection.new get_admin_section(name).Collection, :add, IisObject
-	end
-
-end
+module Inetmgr
+
+class SiteConfiguration < Configuration
+
+	def initialize(name, server = nil)
+		super "MACHINE/WEBROOT/APPHOST/#{name}", server
+	end
+
+	def get_app_settings
+		get_collection "appSettings"
+	end
+
+	def get_connection_strings
+		get_collection "connectionStrings"
+	end
+
+	def get_validation_settings
+		IisObject.new get_admin_section("system.webServer/validation")
+	end
+
+	def get_static_content_settings
+		IisObject.new get_admin_section("system.webServer/staticContent")
+	end
+
+	def get_service_model_settings
+		IisObject.new get_admin_section("system.serviceModel")
+	end
+
+private
+
+	def get_collection(name)
+		IisObjectCollection.new get_admin_section(name).Collection, :add, IisObject
+	end
+
+end
+
+end