@@ -17,454 +17,454 @@ |
||
| 17 | 17 | class Sentence |
| 18 | 18 | { |
| 19 | 19 | |
| 20 | - /** |
|
| 21 | - * Specify this flag with the split method to trim whitespace. |
|
| 22 | - */ |
|
| 23 | - const SPLIT_TRIM = 0x1; |
|
| 24 | - |
|
| 25 | - /** |
|
| 26 | - * List of characters used to terminate sentences. |
|
| 27 | - * |
|
| 28 | - * @var string[] |
|
| 29 | - */ |
|
| 30 | - private $terminals = ['.', '!', '?']; |
|
| 31 | - |
|
| 32 | - /** |
|
| 33 | - * List of characters used for abbreviations. |
|
| 34 | - * |
|
| 35 | - * @var string[] |
|
| 36 | - */ |
|
| 37 | - private $abbreviators = ['.']; |
|
| 38 | - |
|
| 39 | - /** |
|
| 40 | - * List of replacements in the text. |
|
| 41 | - * |
|
| 42 | - * @var string[] |
|
| 43 | - */ |
|
| 44 | - private $replacements = []; |
|
| 45 | - |
|
| 46 | - /** |
|
| 47 | - * Generate an in-text replacement code for the specified index |
|
| 48 | - * |
|
| 49 | - * @param int $index |
|
| 50 | - * |
|
| 51 | - * @return string |
|
| 52 | - */ |
|
| 53 | - private function getReplaceCode(int $index) |
|
| 54 | - { |
|
| 55 | - return 0x02 . $index . 0x03; |
|
| 56 | - } |
|
| 57 | - |
|
| 58 | - /** |
|
| 59 | - * Clean floating point numbers by replace them with an in-text index |
|
| 60 | - * |
|
| 61 | - * @param string $text |
|
| 62 | - * |
|
| 63 | - * @return string |
|
| 64 | - */ |
|
| 65 | - private function replaceFloatNumbers(string $text) |
|
| 66 | - { |
|
| 67 | - preg_match_all('!\d+(?:\.\d+)?!', $text, $matches, PREG_OFFSET_CAPTURE); |
|
| 68 | - |
|
| 69 | - $this->replacements = []; |
|
| 70 | - $index = 0; |
|
| 71 | - foreach (array_reverse($matches[0]) as $match) { |
|
| 72 | - $number = $match[0]; |
|
| 73 | - $offset = $match[1]; |
|
| 74 | - $code = $this->getReplaceCode($index); |
|
| 75 | - |
|
| 76 | - $this->replacements[$index] = $number; |
|
| 77 | - |
|
| 78 | - $text = (string)substr_replace($text, $code, $offset, mb_strlen($number)); |
|
| 79 | - |
|
| 80 | - ++$index; |
|
| 81 | - } |
|
| 82 | - |
|
| 83 | - return $text; |
|
| 84 | - } |
|
| 85 | - |
|
| 86 | - /** |
|
| 87 | - * Restore any stored replacements |
|
| 88 | - * |
|
| 89 | - * @param string[] $text |
|
| 90 | - * |
|
| 91 | - * @return string[] |
|
| 92 | - */ |
|
| 93 | - private function restoreReplacements($text) |
|
| 94 | - { |
|
| 95 | - return array_map(function ($value) { |
|
| 96 | - foreach ($this->replacements as $index => $number) { |
|
| 97 | - $code = $this->getReplaceCode($index); |
|
| 98 | - $value = str_replace($code, $number, $value); |
|
| 99 | - } |
|
| 100 | - |
|
| 101 | - return $value; |
|
| 102 | - }, $text); |
|
| 103 | - } |
|
| 104 | - |
|
| 105 | - /** |
|
| 106 | - * Breaks a piece of text into lines by linebreak. |
|
| 107 | - * Eats up any linebreak characters as if one. |
|
| 108 | - * |
|
| 109 | - * Multibyte.php safe |
|
| 110 | - * |
|
| 111 | - * @param string $text |
|
| 112 | - * |
|
| 113 | - * @return string[] |
|
| 114 | - */ |
|
| 115 | - private static function linebreakSplit($text) |
|
| 116 | - { |
|
| 117 | - $lines = []; |
|
| 118 | - $line = ''; |
|
| 119 | - |
|
| 120 | - foreach (Multibyte::split('([\r\n]+)', $text, -1, PREG_SPLIT_DELIM_CAPTURE) as $part) { |
|
| 121 | - $line .= $part; |
|
| 122 | - if (Multibyte::trim($part) === '') { |
|
| 123 | - $lines[] = $line; |
|
| 124 | - $line = ''; |
|
| 125 | - } |
|
| 126 | - } |
|
| 127 | - $lines[] = $line; |
|
| 128 | - |
|
| 129 | - return $lines; |
|
| 130 | - } |
|
| 131 | - |
|
| 132 | - /** |
|
| 133 | - * Splits an array of lines by (consecutive sequences of) |
|
| 134 | - * terminals, keeping terminals. |
|
| 135 | - * |
|
| 136 | - * Multibyte.php safe (atleast for UTF-8) |
|
| 137 | - * |
|
| 138 | - * For example: |
|
| 139 | - * "There ... is. More!" |
|
| 140 | - * ... becomes ... |
|
| 141 | - * [ "There ", "...", " is", ".", " More", "!" ] |
|
| 142 | - * |
|
| 143 | - * @param string $line |
|
| 144 | - * |
|
| 145 | - * @return string[] |
|
| 146 | - */ |
|
| 147 | - private function punctuationSplit($line) |
|
| 148 | - { |
|
| 149 | - $parts = []; |
|
| 150 | - |
|
| 151 | - $chars = preg_split('//u', $line, -1, PREG_SPLIT_NO_EMPTY); // This is UTF8 multibyte safe! |
|
| 152 | - $is_terminal = in_array($chars[0], $this->terminals); |
|
| 153 | - |
|
| 154 | - $part = ''; |
|
| 155 | - foreach ($chars as $char) { |
|
| 156 | - if (in_array($char, $this->terminals) !== $is_terminal) { |
|
| 157 | - $parts[] = $part; |
|
| 158 | - $part = ''; |
|
| 159 | - $is_terminal = !$is_terminal; |
|
| 160 | - } |
|
| 161 | - $part .= $char; |
|
| 162 | - } |
|
| 163 | - |
|
| 164 | - if (!empty($part)) { |
|
| 165 | - $parts[] = $part; |
|
| 166 | - } |
|
| 167 | - |
|
| 168 | - return $parts; |
|
| 169 | - } |
|
| 170 | - |
|
| 171 | - /** |
|
| 172 | - * Appends each terminal item after it's preceding |
|
| 173 | - * non-terminals. |
|
| 174 | - * |
|
| 175 | - * Multibyte.php safe (atleast for UTF-8) |
|
| 176 | - * |
|
| 177 | - * For example: |
|
| 178 | - * [ "There ", "...", " is", ".", " More", "!" ] |
|
| 179 | - * ... becomes ... |
|
| 180 | - * [ "There ... is.", "More!" ] |
|
| 181 | - * |
|
| 182 | - * @param string[] $punctuations |
|
| 183 | - * |
|
| 184 | - * @return string[] |
|
| 185 | - */ |
|
| 186 | - private function punctuationMerge($punctuations) |
|
| 187 | - { |
|
| 188 | - $definite_terminals = array_diff($this->terminals, $this->abbreviators); |
|
| 189 | - |
|
| 190 | - $merges = []; |
|
| 191 | - $merge = ''; |
|
| 192 | - |
|
| 193 | - $filtered = array_filter($punctuations, function ($p) { |
|
| 194 | - return $p !== ''; |
|
| 195 | - }); |
|
| 196 | - |
|
| 197 | - foreach ($filtered as $punctuation) { |
|
| 198 | - $merge .= $punctuation; |
|
| 199 | - if (mb_strlen($punctuation) === 1 |
|
| 200 | - && in_array($punctuation, $this->terminals)) { |
|
| 201 | - $merges[] = $merge; |
|
| 202 | - $merge = ''; |
|
| 203 | - } else { |
|
| 204 | - foreach ($definite_terminals as $terminal) { |
|
| 205 | - if (mb_strpos($punctuation, $terminal) !== false) { |
|
| 206 | - $merges[] = $merge; |
|
| 207 | - $merge = ''; |
|
| 208 | - break; |
|
| 209 | - } |
|
| 210 | - } |
|
| 211 | - } |
|
| 212 | - } |
|
| 213 | - if (!empty($merge)) { |
|
| 214 | - $merges[] = $merge; |
|
| 215 | - } |
|
| 216 | - |
|
| 217 | - return $merges; |
|
| 218 | - } |
|
| 219 | - |
|
| 220 | - /** |
|
| 221 | - * Looks for capitalized abbreviations & includes them with the following fragment. |
|
| 222 | - * |
|
| 223 | - * For example: |
|
| 224 | - * [ "Last week, former director of the F.B.I. James B. Comey was fired. Mr. Comey was not available for comment." ] |
|
| 225 | - * ... becomes ... |
|
| 226 | - * [ "Last week, former director of the F.B.I. James B. Comey was fired." ] |
|
| 227 | - * [ "Mr. Comey was not available for comment." ] |
|
| 228 | - * |
|
| 229 | - * @param string[] $fragments |
|
| 230 | - * |
|
| 231 | - * @return string[] |
|
| 232 | - */ |
|
| 233 | - private function abbreviationMerge($fragments) |
|
| 234 | - { |
|
| 235 | - $return_fragment = []; |
|
| 236 | - |
|
| 237 | - $previous_fragment = ''; |
|
| 238 | - $previous_is_abbreviation = false; |
|
| 239 | - $i = 0; |
|
| 240 | - foreach ($fragments as $fragment) { |
|
| 241 | - $is_abbreviation = self::isAbreviation($fragment); |
|
| 242 | - |
|
| 243 | - // merge previous fragment with this |
|
| 244 | - if ($previous_is_abbreviation) { |
|
| 245 | - $fragment = $previous_fragment . $fragment; |
|
| 246 | - } |
|
| 247 | - $return_fragment[$i] = $fragment; |
|
| 248 | - |
|
| 249 | - $previous_is_abbreviation = $is_abbreviation; |
|
| 250 | - $previous_fragment = $fragment; |
|
| 251 | - |
|
| 252 | - // only increment if this isn't an abbreviation |
|
| 253 | - if (!$is_abbreviation) { |
|
| 254 | - $i++; |
|
| 255 | - } |
|
| 256 | - } |
|
| 257 | - |
|
| 258 | - return $return_fragment; |
|
| 259 | - } |
|
| 260 | - |
|
| 261 | - /** |
|
| 262 | - * Check if the last word of fragment starts with a Capital, ends in "." & has less than 3 characters. |
|
| 263 | - * |
|
| 264 | - * @param $fragment |
|
| 265 | - * |
|
| 266 | - * @return bool |
|
| 267 | - */ |
|
| 268 | - private static function isAbreviation($fragment) |
|
| 269 | - { |
|
| 270 | - $words = mb_split('\s+', Multibyte::trim($fragment)); |
|
| 271 | - |
|
| 272 | - $word_count = count($words); |
|
| 273 | - |
|
| 274 | - $last_word = Multibyte::trim($words[$word_count - 1]); |
|
| 275 | - $last_is_capital = preg_match('#^\p{Lu}#u', $last_word); |
|
| 276 | - $last_is_abbreviation = mb_substr(Multibyte::trim($fragment), -1) === '.'; |
|
| 277 | - |
|
| 278 | - return $last_is_capital > 0 |
|
| 279 | - && $last_is_abbreviation > 0 |
|
| 280 | - && mb_strlen($last_word) <= 3; |
|
| 281 | - } |
|
| 282 | - |
|
| 283 | - /** |
|
| 284 | - * Merges any part starting with a closing parenthesis ')' to the previous |
|
| 285 | - * part. |
|
| 286 | - * |
|
| 287 | - * @param string[] $parts |
|
| 288 | - * |
|
| 289 | - * @return string[] |
|
| 290 | - */ |
|
| 291 | - private function parenthesesMerge($parts) |
|
| 292 | - { |
|
| 293 | - $subsentences = []; |
|
| 294 | - |
|
| 295 | - foreach ($parts as $part) { |
|
| 296 | - if ($part[0] === ')' && !empty($subsentences)) { |
|
| 297 | - $subsentences[count($subsentences) - 1] .= $part; |
|
| 298 | - } else { |
|
| 299 | - $subsentences[] = $part; |
|
| 300 | - } |
|
| 301 | - } |
|
| 302 | - |
|
| 303 | - return $subsentences; |
|
| 304 | - } |
|
| 305 | - |
|
| 306 | - /** |
|
| 307 | - * Looks for closing quotes to include them with the previous statement. |
|
| 308 | - * "That was very interesting," he said. |
|
| 309 | - * "That was very interesting." |
|
| 310 | - * |
|
| 311 | - * @param string[] $statements |
|
| 312 | - * |
|
| 313 | - * @return string[] |
|
| 314 | - */ |
|
| 315 | - private function closeQuotesMerge($statements) |
|
| 316 | - { |
|
| 317 | - $i = 0; |
|
| 318 | - $previous_statement = ''; |
|
| 319 | - $return = []; |
|
| 320 | - foreach ($statements as $statement) { |
|
| 321 | - if (self::isEndQuote($statement)) { |
|
| 322 | - $statement = $previous_statement . $statement; |
|
| 323 | - } else { |
|
| 324 | - $i++; |
|
| 325 | - } |
|
| 326 | - |
|
| 327 | - $return[$i] = $statement; |
|
| 328 | - $previous_statement = $statement; |
|
| 329 | - } |
|
| 330 | - |
|
| 331 | - return $return; |
|
| 332 | - } |
|
| 333 | - |
|
| 334 | - /** |
|
| 335 | - * Check if the entire string is a quotation mark or quote, then space, then lowercase. |
|
| 336 | - * |
|
| 337 | - * @param $statement |
|
| 338 | - * |
|
| 339 | - * @return bool |
|
| 340 | - */ |
|
| 341 | - private static function isEndQuote($statement) |
|
| 342 | - { |
|
| 343 | - $trimmed = Multibyte::trim($statement); |
|
| 344 | - $first = mb_substr($statement, 0, 1); |
|
| 345 | - |
|
| 346 | - return in_array($trimmed, ['"', '\'']) |
|
| 347 | - || ( |
|
| 348 | - in_array($first, ['"', '\'']) |
|
| 349 | - && mb_substr($statement, 1, 1) === ' ' |
|
| 350 | - && ctype_lower(mb_substr($statement, 2, 1)) === true |
|
| 351 | - ); |
|
| 352 | - } |
|
| 353 | - |
|
| 354 | - /** |
|
| 355 | - * Merges items into larger sentences. |
|
| 356 | - * Multibyte.php safe |
|
| 357 | - * |
|
| 358 | - * @param string[] $shorts |
|
| 359 | - * |
|
| 360 | - * @return string[] |
|
| 361 | - */ |
|
| 362 | - private function sentenceMerge($shorts) |
|
| 363 | - { |
|
| 364 | - $non_abbreviating_terminals = array_diff($this->terminals, $this->abbreviators); |
|
| 365 | - |
|
| 366 | - $sentences = []; |
|
| 367 | - |
|
| 368 | - $sentence = ''; |
|
| 369 | - $has_words = false; |
|
| 370 | - $previous_word_ending = null; |
|
| 371 | - foreach ($shorts as $short) { |
|
| 372 | - $word_count = count(mb_split('\s+', Multibyte::trim($short))); |
|
| 373 | - $after_non_abbreviating_terminal = in_array($previous_word_ending, $non_abbreviating_terminals); |
|
| 374 | - |
|
| 375 | - if ($after_non_abbreviating_terminal |
|
| 376 | - || ($has_words && $word_count > 1)) { |
|
| 377 | - |
|
| 378 | - $sentences[] = $sentence; |
|
| 379 | - |
|
| 380 | - $sentence = ''; |
|
| 381 | - $has_words = false; |
|
| 382 | - } |
|
| 383 | - |
|
| 384 | - $has_words = $has_words |
|
| 385 | - || $word_count > 1; |
|
| 386 | - |
|
| 387 | - $sentence .= $short; |
|
| 388 | - $previous_word_ending = mb_substr($short, -1); |
|
| 389 | - } |
|
| 390 | - |
|
| 391 | - if (!empty($sentence)) { |
|
| 392 | - $sentences[] = $sentence; |
|
| 393 | - } |
|
| 394 | - |
|
| 395 | - return $sentences; |
|
| 396 | - } |
|
| 397 | - |
|
| 398 | - /** |
|
| 399 | - * Return the sentences sentences detected in the provided text. |
|
| 400 | - * Set the Sentence::SPLIT_TRIM flag to trim whitespace. |
|
| 401 | - * |
|
| 402 | - * @param string $text |
|
| 403 | - * @param integer $flags |
|
| 404 | - * |
|
| 405 | - * @return string[] |
|
| 406 | - */ |
|
| 407 | - public function split($text, $flags = 0) |
|
| 408 | - { |
|
| 409 | - if (empty($pipeline)) { |
|
| 410 | - static $pipeline = [ |
|
| 411 | - 'replaceFloatNumbers', |
|
| 412 | - 'punctuationSplit', |
|
| 413 | - 'parenthesesMerge', // also works after punctuationMerge or abbreviationMerge |
|
| 414 | - 'punctuationMerge', |
|
| 415 | - 'abbreviationMerge', |
|
| 416 | - 'closeQuotesMerge', |
|
| 417 | - 'sentenceMerge', |
|
| 418 | - 'restoreReplacements', |
|
| 419 | - ]; |
|
| 420 | - } |
|
| 421 | - |
|
| 422 | - // clean funny quotes |
|
| 423 | - $text = Multibyte::cleanUnicode($text); |
|
| 424 | - |
|
| 425 | - // Split |
|
| 426 | - $sentences = []; |
|
| 427 | - foreach (self::linebreakSplit($text) as $input) { |
|
| 428 | - if (Multibyte::trim($input) !== '') { |
|
| 429 | - foreach ($pipeline as $method) { |
|
| 430 | - $input = $this->$method($input); |
|
| 431 | - } |
|
| 432 | - $sentences = array_merge($sentences, $input); |
|
| 433 | - } |
|
| 434 | - } |
|
| 435 | - |
|
| 436 | - // Post process |
|
| 437 | - if ($flags & self::SPLIT_TRIM) { |
|
| 438 | - return self::trimSentences($sentences); |
|
| 439 | - } |
|
| 440 | - |
|
| 441 | - return $sentences; |
|
| 442 | - } |
|
| 443 | - |
|
| 444 | - /** |
|
| 445 | - * Multibyte.php trim each string in an array. |
|
| 446 | - * |
|
| 447 | - * @param string[] $sentences |
|
| 448 | - * |
|
| 449 | - * @return string[] |
|
| 450 | - */ |
|
| 451 | - private static function trimSentences($sentences) |
|
| 452 | - { |
|
| 453 | - return array_map(function ($sentence) { |
|
| 454 | - return Multibyte::trim($sentence); |
|
| 455 | - }, $sentences); |
|
| 456 | - } |
|
| 457 | - |
|
| 458 | - /** |
|
| 459 | - * Return the number of sentences detected in the provided text. |
|
| 460 | - * |
|
| 461 | - * @param string $text |
|
| 462 | - * |
|
| 463 | - * @return integer |
|
| 464 | - */ |
|
| 465 | - public function count($text) |
|
| 466 | - { |
|
| 467 | - return count($this->split($text)); |
|
| 468 | - } |
|
| 20 | + /** |
|
| 21 | + * Specify this flag with the split method to trim whitespace. |
|
| 22 | + */ |
|
| 23 | + const SPLIT_TRIM = 0x1; |
|
| 24 | + |
|
| 25 | + /** |
|
| 26 | + * List of characters used to terminate sentences. |
|
| 27 | + * |
|
| 28 | + * @var string[] |
|
| 29 | + */ |
|
| 30 | + private $terminals = ['.', '!', '?']; |
|
| 31 | + |
|
| 32 | + /** |
|
| 33 | + * List of characters used for abbreviations. |
|
| 34 | + * |
|
| 35 | + * @var string[] |
|
| 36 | + */ |
|
| 37 | + private $abbreviators = ['.']; |
|
| 38 | + |
|
| 39 | + /** |
|
| 40 | + * List of replacements in the text. |
|
| 41 | + * |
|
| 42 | + * @var string[] |
|
| 43 | + */ |
|
| 44 | + private $replacements = []; |
|
| 45 | + |
|
| 46 | + /** |
|
| 47 | + * Generate an in-text replacement code for the specified index |
|
| 48 | + * |
|
| 49 | + * @param int $index |
|
| 50 | + * |
|
| 51 | + * @return string |
|
| 52 | + */ |
|
| 53 | + private function getReplaceCode(int $index) |
|
| 54 | + { |
|
| 55 | + return 0x02 . $index . 0x03; |
|
| 56 | + } |
|
| 57 | + |
|
| 58 | + /** |
|
| 59 | + * Clean floating point numbers by replace them with an in-text index |
|
| 60 | + * |
|
| 61 | + * @param string $text |
|
| 62 | + * |
|
| 63 | + * @return string |
|
| 64 | + */ |
|
| 65 | + private function replaceFloatNumbers(string $text) |
|
| 66 | + { |
|
| 67 | + preg_match_all('!\d+(?:\.\d+)?!', $text, $matches, PREG_OFFSET_CAPTURE); |
|
| 68 | + |
|
| 69 | + $this->replacements = []; |
|
| 70 | + $index = 0; |
|
| 71 | + foreach (array_reverse($matches[0]) as $match) { |
|
| 72 | + $number = $match[0]; |
|
| 73 | + $offset = $match[1]; |
|
| 74 | + $code = $this->getReplaceCode($index); |
|
| 75 | + |
|
| 76 | + $this->replacements[$index] = $number; |
|
| 77 | + |
|
| 78 | + $text = (string)substr_replace($text, $code, $offset, mb_strlen($number)); |
|
| 79 | + |
|
| 80 | + ++$index; |
|
| 81 | + } |
|
| 82 | + |
|
| 83 | + return $text; |
|
| 84 | + } |
|
| 85 | + |
|
| 86 | + /** |
|
| 87 | + * Restore any stored replacements |
|
| 88 | + * |
|
| 89 | + * @param string[] $text |
|
| 90 | + * |
|
| 91 | + * @return string[] |
|
| 92 | + */ |
|
| 93 | + private function restoreReplacements($text) |
|
| 94 | + { |
|
| 95 | + return array_map(function ($value) { |
|
| 96 | + foreach ($this->replacements as $index => $number) { |
|
| 97 | + $code = $this->getReplaceCode($index); |
|
| 98 | + $value = str_replace($code, $number, $value); |
|
| 99 | + } |
|
| 100 | + |
|
| 101 | + return $value; |
|
| 102 | + }, $text); |
|
| 103 | + } |
|
| 104 | + |
|
| 105 | + /** |
|
| 106 | + * Breaks a piece of text into lines by linebreak. |
|
| 107 | + * Eats up any linebreak characters as if one. |
|
| 108 | + * |
|
| 109 | + * Multibyte.php safe |
|
| 110 | + * |
|
| 111 | + * @param string $text |
|
| 112 | + * |
|
| 113 | + * @return string[] |
|
| 114 | + */ |
|
| 115 | + private static function linebreakSplit($text) |
|
| 116 | + { |
|
| 117 | + $lines = []; |
|
| 118 | + $line = ''; |
|
| 119 | + |
|
| 120 | + foreach (Multibyte::split('([\r\n]+)', $text, -1, PREG_SPLIT_DELIM_CAPTURE) as $part) { |
|
| 121 | + $line .= $part; |
|
| 122 | + if (Multibyte::trim($part) === '') { |
|
| 123 | + $lines[] = $line; |
|
| 124 | + $line = ''; |
|
| 125 | + } |
|
| 126 | + } |
|
| 127 | + $lines[] = $line; |
|
| 128 | + |
|
| 129 | + return $lines; |
|
| 130 | + } |
|
| 131 | + |
|
| 132 | + /** |
|
| 133 | + * Splits an array of lines by (consecutive sequences of) |
|
| 134 | + * terminals, keeping terminals. |
|
| 135 | + * |
|
| 136 | + * Multibyte.php safe (atleast for UTF-8) |
|
| 137 | + * |
|
| 138 | + * For example: |
|
| 139 | + * "There ... is. More!" |
|
| 140 | + * ... becomes ... |
|
| 141 | + * [ "There ", "...", " is", ".", " More", "!" ] |
|
| 142 | + * |
|
| 143 | + * @param string $line |
|
| 144 | + * |
|
| 145 | + * @return string[] |
|
| 146 | + */ |
|
| 147 | + private function punctuationSplit($line) |
|
| 148 | + { |
|
| 149 | + $parts = []; |
|
| 150 | + |
|
| 151 | + $chars = preg_split('//u', $line, -1, PREG_SPLIT_NO_EMPTY); // This is UTF8 multibyte safe! |
|
| 152 | + $is_terminal = in_array($chars[0], $this->terminals); |
|
| 153 | + |
|
| 154 | + $part = ''; |
|
| 155 | + foreach ($chars as $char) { |
|
| 156 | + if (in_array($char, $this->terminals) !== $is_terminal) { |
|
| 157 | + $parts[] = $part; |
|
| 158 | + $part = ''; |
|
| 159 | + $is_terminal = !$is_terminal; |
|
| 160 | + } |
|
| 161 | + $part .= $char; |
|
| 162 | + } |
|
| 163 | + |
|
| 164 | + if (!empty($part)) { |
|
| 165 | + $parts[] = $part; |
|
| 166 | + } |
|
| 167 | + |
|
| 168 | + return $parts; |
|
| 169 | + } |
|
| 170 | + |
|
| 171 | + /** |
|
| 172 | + * Appends each terminal item after it's preceding |
|
| 173 | + * non-terminals. |
|
| 174 | + * |
|
| 175 | + * Multibyte.php safe (atleast for UTF-8) |
|
| 176 | + * |
|
| 177 | + * For example: |
|
| 178 | + * [ "There ", "...", " is", ".", " More", "!" ] |
|
| 179 | + * ... becomes ... |
|
| 180 | + * [ "There ... is.", "More!" ] |
|
| 181 | + * |
|
| 182 | + * @param string[] $punctuations |
|
| 183 | + * |
|
| 184 | + * @return string[] |
|
| 185 | + */ |
|
| 186 | + private function punctuationMerge($punctuations) |
|
| 187 | + { |
|
| 188 | + $definite_terminals = array_diff($this->terminals, $this->abbreviators); |
|
| 189 | + |
|
| 190 | + $merges = []; |
|
| 191 | + $merge = ''; |
|
| 192 | + |
|
| 193 | + $filtered = array_filter($punctuations, function ($p) { |
|
| 194 | + return $p !== ''; |
|
| 195 | + }); |
|
| 196 | + |
|
| 197 | + foreach ($filtered as $punctuation) { |
|
| 198 | + $merge .= $punctuation; |
|
| 199 | + if (mb_strlen($punctuation) === 1 |
|
| 200 | + && in_array($punctuation, $this->terminals)) { |
|
| 201 | + $merges[] = $merge; |
|
| 202 | + $merge = ''; |
|
| 203 | + } else { |
|
| 204 | + foreach ($definite_terminals as $terminal) { |
|
| 205 | + if (mb_strpos($punctuation, $terminal) !== false) { |
|
| 206 | + $merges[] = $merge; |
|
| 207 | + $merge = ''; |
|
| 208 | + break; |
|
| 209 | + } |
|
| 210 | + } |
|
| 211 | + } |
|
| 212 | + } |
|
| 213 | + if (!empty($merge)) { |
|
| 214 | + $merges[] = $merge; |
|
| 215 | + } |
|
| 216 | + |
|
| 217 | + return $merges; |
|
| 218 | + } |
|
| 219 | + |
|
| 220 | + /** |
|
| 221 | + * Looks for capitalized abbreviations & includes them with the following fragment. |
|
| 222 | + * |
|
| 223 | + * For example: |
|
| 224 | + * [ "Last week, former director of the F.B.I. James B. Comey was fired. Mr. Comey was not available for comment." ] |
|
| 225 | + * ... becomes ... |
|
| 226 | + * [ "Last week, former director of the F.B.I. James B. Comey was fired." ] |
|
| 227 | + * [ "Mr. Comey was not available for comment." ] |
|
| 228 | + * |
|
| 229 | + * @param string[] $fragments |
|
| 230 | + * |
|
| 231 | + * @return string[] |
|
| 232 | + */ |
|
| 233 | + private function abbreviationMerge($fragments) |
|
| 234 | + { |
|
| 235 | + $return_fragment = []; |
|
| 236 | + |
|
| 237 | + $previous_fragment = ''; |
|
| 238 | + $previous_is_abbreviation = false; |
|
| 239 | + $i = 0; |
|
| 240 | + foreach ($fragments as $fragment) { |
|
| 241 | + $is_abbreviation = self::isAbreviation($fragment); |
|
| 242 | + |
|
| 243 | + // merge previous fragment with this |
|
| 244 | + if ($previous_is_abbreviation) { |
|
| 245 | + $fragment = $previous_fragment . $fragment; |
|
| 246 | + } |
|
| 247 | + $return_fragment[$i] = $fragment; |
|
| 248 | + |
|
| 249 | + $previous_is_abbreviation = $is_abbreviation; |
|
| 250 | + $previous_fragment = $fragment; |
|
| 251 | + |
|
| 252 | + // only increment if this isn't an abbreviation |
|
| 253 | + if (!$is_abbreviation) { |
|
| 254 | + $i++; |
|
| 255 | + } |
|
| 256 | + } |
|
| 257 | + |
|
| 258 | + return $return_fragment; |
|
| 259 | + } |
|
| 260 | + |
|
| 261 | + /** |
|
| 262 | + * Check if the last word of fragment starts with a Capital, ends in "." & has less than 3 characters. |
|
| 263 | + * |
|
| 264 | + * @param $fragment |
|
| 265 | + * |
|
| 266 | + * @return bool |
|
| 267 | + */ |
|
| 268 | + private static function isAbreviation($fragment) |
|
| 269 | + { |
|
| 270 | + $words = mb_split('\s+', Multibyte::trim($fragment)); |
|
| 271 | + |
|
| 272 | + $word_count = count($words); |
|
| 273 | + |
|
| 274 | + $last_word = Multibyte::trim($words[$word_count - 1]); |
|
| 275 | + $last_is_capital = preg_match('#^\p{Lu}#u', $last_word); |
|
| 276 | + $last_is_abbreviation = mb_substr(Multibyte::trim($fragment), -1) === '.'; |
|
| 277 | + |
|
| 278 | + return $last_is_capital > 0 |
|
| 279 | + && $last_is_abbreviation > 0 |
|
| 280 | + && mb_strlen($last_word) <= 3; |
|
| 281 | + } |
|
| 282 | + |
|
| 283 | + /** |
|
| 284 | + * Merges any part starting with a closing parenthesis ')' to the previous |
|
| 285 | + * part. |
|
| 286 | + * |
|
| 287 | + * @param string[] $parts |
|
| 288 | + * |
|
| 289 | + * @return string[] |
|
| 290 | + */ |
|
| 291 | + private function parenthesesMerge($parts) |
|
| 292 | + { |
|
| 293 | + $subsentences = []; |
|
| 294 | + |
|
| 295 | + foreach ($parts as $part) { |
|
| 296 | + if ($part[0] === ')' && !empty($subsentences)) { |
|
| 297 | + $subsentences[count($subsentences) - 1] .= $part; |
|
| 298 | + } else { |
|
| 299 | + $subsentences[] = $part; |
|
| 300 | + } |
|
| 301 | + } |
|
| 302 | + |
|
| 303 | + return $subsentences; |
|
| 304 | + } |
|
| 305 | + |
|
| 306 | + /** |
|
| 307 | + * Looks for closing quotes to include them with the previous statement. |
|
| 308 | + * "That was very interesting," he said. |
|
| 309 | + * "That was very interesting." |
|
| 310 | + * |
|
| 311 | + * @param string[] $statements |
|
| 312 | + * |
|
| 313 | + * @return string[] |
|
| 314 | + */ |
|
| 315 | + private function closeQuotesMerge($statements) |
|
| 316 | + { |
|
| 317 | + $i = 0; |
|
| 318 | + $previous_statement = ''; |
|
| 319 | + $return = []; |
|
| 320 | + foreach ($statements as $statement) { |
|
| 321 | + if (self::isEndQuote($statement)) { |
|
| 322 | + $statement = $previous_statement . $statement; |
|
| 323 | + } else { |
|
| 324 | + $i++; |
|
| 325 | + } |
|
| 326 | + |
|
| 327 | + $return[$i] = $statement; |
|
| 328 | + $previous_statement = $statement; |
|
| 329 | + } |
|
| 330 | + |
|
| 331 | + return $return; |
|
| 332 | + } |
|
| 333 | + |
|
| 334 | + /** |
|
| 335 | + * Check if the entire string is a quotation mark or quote, then space, then lowercase. |
|
| 336 | + * |
|
| 337 | + * @param $statement |
|
| 338 | + * |
|
| 339 | + * @return bool |
|
| 340 | + */ |
|
| 341 | + private static function isEndQuote($statement) |
|
| 342 | + { |
|
| 343 | + $trimmed = Multibyte::trim($statement); |
|
| 344 | + $first = mb_substr($statement, 0, 1); |
|
| 345 | + |
|
| 346 | + return in_array($trimmed, ['"', '\'']) |
|
| 347 | + || ( |
|
| 348 | + in_array($first, ['"', '\'']) |
|
| 349 | + && mb_substr($statement, 1, 1) === ' ' |
|
| 350 | + && ctype_lower(mb_substr($statement, 2, 1)) === true |
|
| 351 | + ); |
|
| 352 | + } |
|
| 353 | + |
|
| 354 | + /** |
|
| 355 | + * Merges items into larger sentences. |
|
| 356 | + * Multibyte.php safe |
|
| 357 | + * |
|
| 358 | + * @param string[] $shorts |
|
| 359 | + * |
|
| 360 | + * @return string[] |
|
| 361 | + */ |
|
| 362 | + private function sentenceMerge($shorts) |
|
| 363 | + { |
|
| 364 | + $non_abbreviating_terminals = array_diff($this->terminals, $this->abbreviators); |
|
| 365 | + |
|
| 366 | + $sentences = []; |
|
| 367 | + |
|
| 368 | + $sentence = ''; |
|
| 369 | + $has_words = false; |
|
| 370 | + $previous_word_ending = null; |
|
| 371 | + foreach ($shorts as $short) { |
|
| 372 | + $word_count = count(mb_split('\s+', Multibyte::trim($short))); |
|
| 373 | + $after_non_abbreviating_terminal = in_array($previous_word_ending, $non_abbreviating_terminals); |
|
| 374 | + |
|
| 375 | + if ($after_non_abbreviating_terminal |
|
| 376 | + || ($has_words && $word_count > 1)) { |
|
| 377 | + |
|
| 378 | + $sentences[] = $sentence; |
|
| 379 | + |
|
| 380 | + $sentence = ''; |
|
| 381 | + $has_words = false; |
|
| 382 | + } |
|
| 383 | + |
|
| 384 | + $has_words = $has_words |
|
| 385 | + || $word_count > 1; |
|
| 386 | + |
|
| 387 | + $sentence .= $short; |
|
| 388 | + $previous_word_ending = mb_substr($short, -1); |
|
| 389 | + } |
|
| 390 | + |
|
| 391 | + if (!empty($sentence)) { |
|
| 392 | + $sentences[] = $sentence; |
|
| 393 | + } |
|
| 394 | + |
|
| 395 | + return $sentences; |
|
| 396 | + } |
|
| 397 | + |
|
| 398 | + /** |
|
| 399 | + * Return the sentences sentences detected in the provided text. |
|
| 400 | + * Set the Sentence::SPLIT_TRIM flag to trim whitespace. |
|
| 401 | + * |
|
| 402 | + * @param string $text |
|
| 403 | + * @param integer $flags |
|
| 404 | + * |
|
| 405 | + * @return string[] |
|
| 406 | + */ |
|
| 407 | + public function split($text, $flags = 0) |
|
| 408 | + { |
|
| 409 | + if (empty($pipeline)) { |
|
| 410 | + static $pipeline = [ |
|
| 411 | + 'replaceFloatNumbers', |
|
| 412 | + 'punctuationSplit', |
|
| 413 | + 'parenthesesMerge', // also works after punctuationMerge or abbreviationMerge |
|
| 414 | + 'punctuationMerge', |
|
| 415 | + 'abbreviationMerge', |
|
| 416 | + 'closeQuotesMerge', |
|
| 417 | + 'sentenceMerge', |
|
| 418 | + 'restoreReplacements', |
|
| 419 | + ]; |
|
| 420 | + } |
|
| 421 | + |
|
| 422 | + // clean funny quotes |
|
| 423 | + $text = Multibyte::cleanUnicode($text); |
|
| 424 | + |
|
| 425 | + // Split |
|
| 426 | + $sentences = []; |
|
| 427 | + foreach (self::linebreakSplit($text) as $input) { |
|
| 428 | + if (Multibyte::trim($input) !== '') { |
|
| 429 | + foreach ($pipeline as $method) { |
|
| 430 | + $input = $this->$method($input); |
|
| 431 | + } |
|
| 432 | + $sentences = array_merge($sentences, $input); |
|
| 433 | + } |
|
| 434 | + } |
|
| 435 | + |
|
| 436 | + // Post process |
|
| 437 | + if ($flags & self::SPLIT_TRIM) { |
|
| 438 | + return self::trimSentences($sentences); |
|
| 439 | + } |
|
| 440 | + |
|
| 441 | + return $sentences; |
|
| 442 | + } |
|
| 443 | + |
|
| 444 | + /** |
|
| 445 | + * Multibyte.php trim each string in an array. |
|
| 446 | + * |
|
| 447 | + * @param string[] $sentences |
|
| 448 | + * |
|
| 449 | + * @return string[] |
|
| 450 | + */ |
|
| 451 | + private static function trimSentences($sentences) |
|
| 452 | + { |
|
| 453 | + return array_map(function ($sentence) { |
|
| 454 | + return Multibyte::trim($sentence); |
|
| 455 | + }, $sentences); |
|
| 456 | + } |
|
| 457 | + |
|
| 458 | + /** |
|
| 459 | + * Return the number of sentences detected in the provided text. |
|
| 460 | + * |
|
| 461 | + * @param string $text |
|
| 462 | + * |
|
| 463 | + * @return integer |
|
| 464 | + */ |
|
| 465 | + public function count($text) |
|
| 466 | + { |
|
| 467 | + return count($this->split($text)); |
|
| 468 | + } |
|
| 469 | 469 | |
| 470 | 470 | } |