fixed an issue with lowercase 'webobject name' tags

[sope] / sope-appserver / NGObjWeb / WEClientCapabilities.m

diff --git a/sope-appserver/NGObjWeb/WEClientCapabilities.m b/sope-appserver/NGObjWeb/WEClientCapabilities.m
index 57252e9f5f175becdd8c3077ed9a19986d6ae4b8..cdb6950bafd7bac5cab0b77709018b676ad8a2f3 100644 (file)
--- a/sope-appserver/NGObjWeb/WEClientCapabilities.m
+++ b/sope-appserver/NGObjWeb/WEClientCapabilities.m
@@ -72,6 +72,7 @@
 #define WEUA_PerlHTTPDAV      41
 #define WEUA_Google           42
 #define WEUA_WebDrive         43
+#define WEUA_Sunbird          44
 
 #define WEOS_UNKNOWN   0
 #define WEOS_WINDOWS   1
@@ -155,6 +156,17 @@
       self->browserMajorVersion = combinedVersion / 100;
     }
   }
+  else if ((tmp = strstr(ua, "Sunbird/"))) {
+    /* Sunbird says it is a Mozilla */
+    self->browser = WEUA_Sunbird;
+    tmp += 8; /* skip "Sunbird/" */
+    
+    self->browserMajorVersion = atoi(tmp);
+    if ((tmp = index(tmp, '.'))) {
+      tmp++;
+      self->browserMinorVersion = atoi(tmp);
+    }
+  }
   else if (strstr(ua, "Outlook-Express/")) {
     /* Outlook Express 5.5 mailbox access via http */
     self->browser = WEUA_MSOutlookExpress;
@@ -456,6 +468,7 @@
     case WEUA_PerlHTTPDAV:      return @"PerlHTTPDAV";
     case WEUA_Google:           return @"Google";
     case WEUA_WebDrive:         return @"WebDrive";
+    case WEUA_Sunbird:          return @"Sunbird";
     default:                    return @"unknown";
   }
 }
@@ -494,6 +507,7 @@
     case WEUA_Netscape:
     case WEUA_OmniWeb:
     case WEUA_Konqueror:
+    case WEUA_Safari:
       return YES;
       
     default:
@@ -614,6 +628,7 @@
   if (self->browser == WEUA_Goliath)          return YES;
   if (self->browser == WEUA_PerlHTTPDAV)      return YES;
   if (self->browser == WEUA_WebDrive)         return YES;
+  if (self->browser == WEUA_Sunbird)          return YES;
   return NO;
 }
 
@@ -671,6 +686,7 @@
   case WEUA_Evolution:
   case WEUA_SOUP:
   case WEUA_Morgul:
+  case WEUA_Sunbird:
     /* browser so new, that they always supported UTF-8 ... */
     return YES;
   case WEUA_IE:
@@ -776,7 +792,7 @@
                          NSStringFromClass([self class]), self];
   
   //[s appendFormat:@" ua='%@'", self->userAgent];
-  [s appendFormat:@" type=%@ v%i.%i>",
+  [s appendFormat:@" type=%@ v%i.%i",
        [self userAgentType],
        self->browserMajorVersion, self->browserMinorVersion];
   [s appendFormat:@" os=%@",   [self os]];