From ffee0c08773a4a5c4c8848193b6992a9fad4c824 Mon Sep 17 00:00:00 2001
From: Mischa POSLAWSKY <perl@shiar.org>
Date: Sun, 5 Dec 2010 19:05:44 +0100
Subject: [PATCH] browser: recognise op_mini, ios

---
 tools/convert-stats-wikimedia.pl | 32 ++++++++++++++++++++++++--------
 1 file changed, 24 insertions(+), 8 deletions(-)

diff --git a/tools/convert-stats-wikimedia.pl b/tools/convert-stats-wikimedia.pl
index 8cbb416..42faf20 100644
--- a/tools/convert-stats-wikimedia.pl
+++ b/tools/convert-stats-wikimedia.pl
@@ -26,6 +26,11 @@ given ($browser) {
 	when ('Opera') {
 		$browser = $mobile ? 'op_mob' : 'presto';
 		for ($version) {
+			if (m{\(Mini(.*)\)$}) {
+				$browser = 'op_mini';
+				($_) = $1 =~ m{^/(\d+)};
+				continue;
+			}
 			s/\d\d\.\d\K.*// or do {
 				# major part only, except for ≥v9.6
 				$_ ge '9.6' ? ($_ = '9.6') : (s/\..*//);
@@ -36,16 +41,27 @@ given ($browser) {
 	when ('Safari') {
 		$browser = $mobile ? 'ios_saf' : 'webkit_saf';
 		my $numversion = join('.', map { sprintf '%03d', $_ } split /\./, $version);
-		$numversion =~ s/6(?=\d{3})//;  # erroneous(?) 6532.22 → 523
+		$numversion =~ s/6(?=\d{3})//;  # incomparable 6532.22 → 523
 		for (
 			# http://en.wikipedia.org/wiki/Safari_version_history
-			[ '413'     => '2'   ],
-			[ '522'     => '3'   ],
-			[ '525.013' => '3.1' ],
-			[ '525.026' => '3.2' ],
-			[ '526'     => '4'   ],
-			[ '533'     => '5'   ],
-			[ '534'     => '5x'  ],
+			$mobile ? (
+				[ '413'     => '1'   ],
+				[ '419'     => '1.1' ],
+				[ '525'     => '2'   ],
+				[ '528'     => '3'   ],
+				[ '531'     => '3.2' ],
+				[ '531.022' => '4.1' ],
+				[ '533'     => '4.2' ],
+				[ '534'     => '4x' ],
+			) : (
+				[ '413'     => '2'   ],
+				[ '522'     => '3'   ],
+				[ '525.013' => '3.1' ],
+				[ '525.026' => '3.2' ],
+				[ '526'     => '4'   ],
+				[ '533'     => '5'   ],
+				[ '534'     => '5x'  ],
+			)
 		) {
 			last if $numversion lt $_->[0];
 			$version = $_->[1];
-- 
2.30.0