attempt to fix #139

Author: tayloraswift

Assets/css/Admin.css

@@ -19,6 +19,9 @@ extension Swiftinit.ClientAnnotation
 
         /// Amazon CloudFront.
         case cloudfront
+
+        case discoursebot
+
         /// Crawler belonging to DuckDuckGo, an American search engine. Only the favicon
         /// bot is active today.
         case duckduckbot

Assets/css/Admin.css.map

@@ -36,6 +36,7 @@ extension Swiftinit.ClientAnnotation
         case .robot(.bingbot):          \.verifiedBingbot
         case .robot(.cloudfront):       \.tooling
         case .robot(.bytespider):       \.otherRobot
+        case .robot(.discoursebot):     \.likelyDiscoursebot
         case .robot(.duckduckbot):      \.likelyMinorSearchEngine
         case .robot(.google):           \.otherRobot
         case .robot(.googlebot):        \.verifiedGooglebot
@@ -63,7 +64,24 @@ extension Swiftinit.ClientAnnotation
         }
 
         guard
-        let agent:String = headers.userAgent,
+        let agent:String = headers.userAgent
+        else
+        {
+            return .robot(.tool)
+        }
+
+        if  case "*"? = headers.acceptLanguage,
+            agent == """
+            Mozilla/5.0 (Macintosh; Intel Mac OS X 10_15_7) \
+            AppleWebKit/605.1.15 (KHTML, like Gecko) \
+            Version/14.0 Safari/605.1.15
+            """
+        {
+            // This is *probably* the Swift Forums bot.
+            return .robot(.discoursebot)
+        }
+
+        guard
         let agent:UA = .init(agent)
         else
         {

Sources/SwiftinitServer/Server/Swiftinit.ClientAnnotation.Robot.swift

@@ -54,6 +54,7 @@ extension Swiftinit.IntegralRequest:HTTP.ServerIntegralRequest
         case .robot(.bingbot):      break
         case .robot(.bytespider):   return nil
         case .robot(.cloudfront):   break
+        case .robot(.discoursebot): break
         case .robot(.duckduckbot):  break
         case .robot(.google):       break
         case .robot(.googlebot):    break

Sources/SwiftinitServer/Server/Swiftinit.ClientAnnotation.swift

@@ -9,6 +9,7 @@ extension ServerProfile.ByClient
         case likelyYandexbot
         case likelyMinorSearchEngine
         case likelyAhrefsbot
+        case likelyDiscoursebot
         case otherRobot
         case tooling
         case barbie
@@ -28,6 +29,7 @@ extension ServerProfile.ByClient.SectorKey:Identifiable
         case .likelyYandexbot:              "yandexbot"
         case .likelyMinorSearchEngine:      "minor-search-engine"
         case .likelyAhrefsbot:              "ahrefsbot"
+        case .likelyDiscoursebot:           "discoursebot"
         case .otherRobot:                   "robot"
         case .tooling:                      "tooling"
         case .barbie:                       "barbie"
@@ -46,9 +48,10 @@ extension ServerProfile.ByClient.SectorKey:PieSectorKey
         case .verifiedBingbot:              "Bingbots (Verified)"
         case .likelyBaiduspider:            "Baiduspiders"
         case .likelyYandexbot:              "Yandexbots"
-        case .likelyMinorSearchEngine:      "Minor Search Engines"
+        case .likelyMinorSearchEngine:      "Minor search engines"
         case .likelyAhrefsbot:              "Ahrefsbots"
-        case .otherRobot:                   "Other Robots"
+        case .likelyDiscoursebot:           "Discourse forums"
+        case .otherRobot:                   "Other robots"
         case .tooling:                      "Tooling"
         case .barbie:                       "Barbies"
         case .bratz:                        "Bratz"

Sources/SwiftinitServer/Swiftinit.IntegralRequest.swift

@@ -18,6 +18,8 @@ extension ServerProfile
         public
         var likelyAhrefsbot:Int
         public
+        var likelyDiscoursebot:Int
+        public
         var otherRobot:Int
         public
         var tooling:Int
@@ -34,6 +36,7 @@ extension ServerProfile
             likelyYandexbot:Int = 0,
             likelyMinorSearchEngine:Int = 0,
             likelyAhrefsbot:Int = 0,
+            likelyDiscoursebot:Int = 0,
             otherRobot:Int = 0,
             tooling:Int = 0,
             barbie:Int = 0,
@@ -45,6 +48,7 @@ extension ServerProfile
             self.likelyYandexbot = likelyYandexbot
             self.likelyMinorSearchEngine = likelyMinorSearchEngine
             self.likelyAhrefsbot = likelyAhrefsbot
+            self.likelyDiscoursebot = likelyDiscoursebot
             self.otherRobot = otherRobot
             self.tooling = tooling
             self.barbie = barbie
@@ -72,6 +76,7 @@ extension ServerProfile.ByClient
             + self.likelyYandexbot
             + self.likelyMinorSearchEngine
             + self.likelyAhrefsbot
+            + self.likelyDiscoursebot
             + self.otherRobot
             + self.tooling
             + self.barbie
@@ -89,6 +94,7 @@ extension ServerProfile.ByClient:PieValues
             .likelyBaiduspider:            self.likelyBaiduspider,
             .likelyYandexbot:              self.likelyYandexbot,
             .likelyMinorSearchEngine:      self.likelyMinorSearchEngine,
+            .likelyDiscoursebot:           self.likelyDiscoursebot,
             .barbie:                       self.barbie,
             .bratz:                        self.bratz,
             .likelyAhrefsbot:              self.likelyAhrefsbot,

Sources/UnidocProfiling/Breakdowns/ServerProfile.ByClient.SectorKey.swift

@@ -30,7 +30,7 @@ nav.admin
     }
 }
 
-figure.client div.pie-color > svg g
+figure.client svg > g
 {
     > *.googlebot
     {
@@ -52,6 +52,10 @@ figure.client div.pie-color > svg g
     {
         fill: #ae6aff;
     }
+    > *.discoursebot
+    {
+        fill: #ff1e69;
+    }
     > *.barbie
     {
         fill: #ff73a1;