Litmus Test

gistfile1.php

$lang = language_default('language');
$rows = db_query("select * from url_alias where source like '%taxonomy%'")->fetchAll();

$tids = db_select("taxonomy_term_data", "ttd")
          ->fields("ttd", array("tid", "language"))
          ->condition("ttd.language",$lang)->execute()->fetchAllKeyed();
$bads = array('-0','-1','-2','-3','/' . $lang);
foreach ($rows as $row) {
  $flag = 1;
  foreach($bads as $bad) {
    $tid = explode('/',$row->source);
    if (strpos($row->alias,$bad) !== false && $flag==1) {
      dsm($row->alias);
      $flag = 0;
    }
    else if ($tids[$tid[2]]=='ko' && strpos($row->alias,$lang) !== false && $flag==1) {
      dsm('DEFINITE ' . $row->alias);
      $flag = 0;
    }
  }
}