diff --git a/src/networks/bittorrent/bTGlobals.ml b/src/networks/bittorrent/bTGlobals.ml index f87d67b..a031cfa 100644 --- a/src/networks/bittorrent/bTGlobals.ml +++ b/src/networks/bittorrent/bTGlobals.ml @@ -467,6 +467,7 @@ let decode_az_style s = | "ZT" -> Brand_ziptorrent | "bk" -> Brand_bitkitten | "MP" -> Brand_moopolice + | "UM" -> Brand_utorrent_mac | "UT" -> Brand_utorrent | "KT" -> Brand_ktorrent | "LP" -> Brand_lphant @@ -484,9 +485,11 @@ let decode_az_style s = | "AX" -> Brand_bitpump | "DE" -> Brand_deluge | "TT" -> Brand_tuotu + | "SD" (* Thunder (aka XùnLéi) *) | "XL" -> Brand_xunlei | "FT" -> Brand_foxtorrent | "BF" -> Brand_bitflu + | "OS" -> Brand_oneswarm | _ -> Brand_unknown in if brand = Brand_unknown then None else @@ -495,12 +498,15 @@ let decode_az_style s = (* 4.56 *) | Brand_bitpump | Brand_bitcomet -> (String.sub s 4 1) ^ "." ^ (String.sub s 5 2) - (* 3.45 *) + (* 3.4.5 *) | Brand_tuotu + | Brand_utorrent_mac + | Brand_oneswarm | Brand_utorrent -> (String.sub s 3 1) ^ "." ^ (String.sub s 4 1) ^ "." ^ (String.sub s 5 1) + (* 3.45 *) + | Brand_transmission -> (String.sub s 3 1) ^ "." ^ (String.sub s 4 2) (* 34.56 *) - | Brand_ctorrent - | Brand_transmission -> (strip_leading_zeroes (String.sub s 3 2)) ^ "." ^ (strip_leading_zeroes(String.sub s 5 2)) + | Brand_ctorrent -> (strip_leading_zeroes (String.sub s 3 2)) ^ "." ^ (strip_leading_zeroes(String.sub s 5 2)) (* 3.4.5->[R=RC.6|D=Dev|''] *) | Brand_ktorrent -> let x = match s.[5] with @@ -596,6 +602,7 @@ let decode_simple_style s = (0, "btpd", Brand_btpd, (dot_string(String.sub s 5 3))); (0, "XBT", Brand_xbt, (dot_string(String.sub s 3 3))); (0, "-FG", Brand_flashget, (dot_string(String.sub s 4 3))); + (0, "-SP", Brand_bitspirit, (dot_string(String.sub s 3 3))); ] in let len = List.length !simple_list in diff --git a/src/networks/bittorrent/bTTypes.ml b/src/networks/bittorrent/bTTypes.ml index aa5af21..0932471 100644 --- a/src/networks/bittorrent/bTTypes.ml +++ b/src/networks/bittorrent/bTTypes.ml @@ -92,6 +92,7 @@ type brand = | Brand_xbt | Brand_ziptorrent | Brand_moopolice +| Brand_utorrent_mac | Brand_utorrent | Brand_opera | Brand_torrenttopia @@ -124,6 +125,7 @@ type brand = | Brand_xunlei | Brand_foxtorrent | Brand_bitflu +| Brand_oneswarm let brand_list = [ ( Brand_unknown , "unknown" , "unk" ) ; @@ -171,6 +173,7 @@ let brand_list = [ ( Brand_xbt , "XBT" , "xbt" ) ; ( Brand_ziptorrent , "ZipTorrent" , "zit" ) ; ( Brand_moopolice , "MooPolice" , "moo" ) ; + ( Brand_utorrent_mac , "uTorrent for Mac" , "uTm" ) ; ( Brand_utorrent , "uTorrent" , "uTo" ) ; ( Brand_opera , "Opera" , "opr" ) ; ( Brand_torrenttopia , "TorrentTopia" , "tt" ) ; @@ -203,6 +206,7 @@ let brand_list = [ ( Brand_xunlei , "XunLei" , "xun" ) ; ( Brand_foxtorrent , "FoxTorrent" , "fox" ) ; ( Brand_bitflu , "BitFlu" , "flu" ) ; + ( Brand_oneswarm , "OneSwarm" , "osw" ) ; ] let brand_count = List.length brand_list