scope ipToCountry2021.

sS #dataSnippetID = #1400509;
static Map<Long, S> #cache = mruCache(100);
static Lock #lock = lock();

static File #dataDir() {
  ret javaxCachesDir("ipToCountry2021");
}

sS ipToCountry2021(S ip) { ret ipToCountry2021(ipToInt(ip)); }
sS ipToCountry2021_uncached(S ip) { ret ipToCountry2021_uncached(ipToInt(ip)); }

sS ipToCountry2021(long ipNum) {
  ret mapGetOrCreate(cache, ipNum, () -> ipToCountry2021_uncached(ipNum));
}
  
sS ipToCountry2021_uncached(long ipNum) {
  {
    lock lock;
    if (directoryEmpty(dataDir()))
      unzipSnippet(dataSnippetID, dataDir());
  }
  S line = pairB(binarySearchForLineInTextFile(newFile(dataDir(), "IP2LOCATION-LITE-DB1.CSV"), s -> {
    LS l = tok_splitAtComma_unquote(s);
    long a = parseLongOpt(first(l)), b = parseLongOpt(second(l));
    ifdef ipToCountry2021_debug
      printVars_str("ipToCountry2021: ", +a, +b, +ipNum);
    endifdef
    ret ipNum > b ? 1 : ipNum < a ? -1 : 0;
  }));
  ret get(tok_splitAtComma_unquote(line), 2);
}

Began life as a copy of #1028338