1: <?php
 2: /**
 3:  * Sastrawi (https://github.com/sastrawi/sastrawi)
 4:  *
 5:  * @link      http://github.com/sastrawi/sastrawi for the canonical source repository
 6:  * @license   https://github.com/sastrawi/sastrawi/blob/master/LICENSE The MIT License (MIT)
 7:  */
 8: 
 9: namespace Sastrawi\Stemmer\Context\Visitor;
10: 
11: use Sastrawi\Stemmer\Context\ContextInterface;
12: use Sastrawi\Stemmer\Context\Removal;
13: 
14: /**
15:  * Remove Plain Prefix.
16:  *
17:  * Asian J. (2007) “Effective Techniques for Indonesian Text Retrieval”. page 61
18:  * @link http://researchbank.rmit.edu.au/eserv/rmit:6312/Asian.pdf
19:  */
20: class RemovePlainPrefix implements VisitorInterface
21: {
22:     public function visit(ContextInterface $context)
23:     {
24:         $result = $this->remove($context->getCurrentWord());
25: 
26:         if ($result != $context->getCurrentWord()) {
27:             $removedPart = preg_replace("/$result/", '', $context->getCurrentWord(), 1);
28: 
29:             $removal = new Removal(
30:                 $this,
31:                 $context->getCurrentWord(),
32:                 $result,
33:                 $removedPart,
34:                 'DP'
35:             );
36: 
37:             $context->addRemoval($removal);
38:             $context->setCurrentWord($result);
39:         }
40:     }
41: 
42:     /**
43:      * Remove plain prefix : di|ke|se
44:      *
45:      * @param  string $word
46:      * @return string
47:      */
48:     public function remove($word)
49:     {
50:         return preg_replace('/^(di|ke|se)/', '', $word, 1);
51:     }
52: }
53: