small changes and fixes for jobrunner

Modules.Interfaces/ActiveDirectoryInterface.vb

@@ -52,8 +52,8 @@ Public Class ActiveDirectoryInterface
         Dim oSyncedUsers As New List(Of ADUser)
         Dim oGroupId As Int64 = Nothing
 
-        Dim oFirebirdSync As New SyncUsers.Firebird(_logConfig, _firebird)
-        Dim oSQLSync As New SyncUsers.MSSQL(_logConfig, _mssql)
+        Dim oFirebirdSync As New SyncUsers.FirebirdSync(_logConfig, _firebird)
+        Dim oSQLSync As New SyncUsers.MSSQLSync(_logConfig, _mssql)
         Dim oSyncedUsersFirebird, oSyncedUsersMSSQL As List(Of ADUser)
 
         Try
@@ -73,13 +73,17 @@ Public Class ActiveDirectoryInterface
         ' Do the actual sync into firebird
         If _firebird IsNot Nothing Then
             oSyncedUsersFirebird = oFirebirdSync.SyncUsers(GroupName, oUsers, AttributeMappings)
-            _logger.Info("Synced {0} users to Firebird", oSyncedUsersFirebird.Count)
+            If oSyncedUsersFirebird.Count > 0 Then
+                _logger.Info("Synced {0} users to Firebird", oSyncedUsersFirebird.Count)
+            End If
         End If
 
         ' Do the actual sync into MSSQL
         If _mssql IsNot Nothing Then
             oSyncedUsersMSSQL = oSQLSync.SyncUsers(GroupName, oUsers, AttributeMappings)
-            _logger.Info("Synced {0} users to MSSQLServer", oSyncedUsersMSSQL.Count)
+            If oSyncedUsersMSSQL.Count > 0 Then
+                _logger.Info("Synced {0} users to MSSQLServer", oSyncedUsersMSSQL.Count)
+            End If
         End If
 
         Return oUsers
@@ -180,7 +184,7 @@ Public Class ActiveDirectoryInterface
                                         _logger.Warn("Could not fetch CustomAttributes for user {0}", oUser)
                                     End If
 
-                                    _logger.Info("Trying to add User {0} to user list", oUser)
+                                    _logger.Debug("Trying to add User {0} to user list", oUser)
 
                                     Dim oNewUser As New ADUser With {
                                         .SId = oUser.Sid,

Modules.Interfaces/ActiveDirectoryInterface/SyncUsers.Firebird.vb

@@ -3,7 +3,7 @@ Imports DigitalData.Modules.Interfaces
 Imports DigitalData.Modules.Logging
 
 Namespace SyncUsers
-    Public Class Firebird
+    Public Class FirebirdSync
         Implements ISyncUsers
 
         Private ReadOnly _logConfig As LogConfig
@@ -25,7 +25,7 @@ Namespace SyncUsers
                 oGroupId = GetGroupId(GroupName)
 
                 If oGroupId = 0 Then
-                    _logger.Warn("Group {0} does not exist in database. Exiting", GroupName)
+                    _logger.Debug("Group {0} does not exist in database or is not enabled for sync.", GroupName)
                     Return oSyncedUsers
                 End If
 

Modules.Interfaces/ActiveDirectoryInterface/SyncUsers.MSSQL.vb

@@ -2,7 +2,7 @@
 Imports DigitalData.Modules.Logging
 
 Namespace SyncUsers
-    Public Class MSSQL
+    Public Class MSSQLSync
         Implements ISyncUsers
 
         Private _logConfig As LogConfig