Prepare for moving into monorepo

src/Bundle/ChillMain/Doctrine/DQL/GetJsonFieldByKey.php

@@ -0,0 +1,53 @@
+<?php
+/*
+ * Copyright (C) 2017 Champs Libres Cooperative <info@champs-libres.coop>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU Affero General Public License as published by
+ * the Free Software Foundation, either version 3 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU Affero General Public License for more details.
+ *
+ * You should have received a copy of the GNU Affero General Public License
+ * along with this program.  If not, see <http://www.gnu.org/licenses/>.
+ */
+namespace Chill\MainBundle\Doctrine\DQL;
+
+use Doctrine\ORM\Query\AST\Functions\FunctionNode;
+use Doctrine\ORM\Query\Lexer;
+use Doctrine\ORM\Query\Parser;
+use Doctrine\ORM\Query\SqlWalker;
+
+/**
+ * 
+ *
+ * @author Julien Fastré <julien.fastre@champs-libres.coop>
+ */
+class GetJsonFieldByKey extends FunctionNode
+{
+    private $expr1;
+    private $expr2;
+
+    public function parse(Parser $parser)
+    {
+        $parser->match(Lexer::T_IDENTIFIER);
+        $parser->match(Lexer::T_OPEN_PARENTHESIS);
+        $this->expr1 = $parser->StringPrimary();
+        $parser->match(Lexer::T_COMMA);
+        $this->expr2 = $parser->StringPrimary();
+        $parser->match(Lexer::T_CLOSE_PARENTHESIS);
+    }
+
+    public function getSql(SqlWalker $sqlWalker)
+    {
+        return sprintf(
+            '(%s->%s)',
+            $this->expr1->dispatch($sqlWalker),
+            $this->expr2->dispatch($sqlWalker)
+        );
+    }
+}

src/Bundle/ChillMain/Doctrine/DQL/JsonAggregate.php

@@ -0,0 +1,49 @@
+<?php
+/*
+ * Copyright (C) 2017 Champs Libres Cooperative <info@champs-libres.coop>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU Affero General Public License as published by
+ * the Free Software Foundation, either version 3 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU Affero General Public License for more details.
+ *
+ * You should have received a copy of the GNU Affero General Public License
+ * along with this program.  If not, see <http://www.gnu.org/licenses/>.
+ */
+namespace Chill\MainBundle\Doctrine\DQL;
+
+use Doctrine\ORM\Query\AST\Functions\FunctionNode;
+use Doctrine\ORM\Query\Lexer;
+use Doctrine\ORM\Query\Parser;
+use Doctrine\ORM\Query\SqlWalker;
+
+/**
+ * Return an aggregation of values in a json representation, as a string.
+ * 
+ * Internally, this function use the postgresql `jsonb_agg` function. Using
+ * json allow to aggregate data from different types without have to cast them.
+ *
+ * @author Julien Fastré <julien.fastre@champs-libres.coop>
+ */
+class JsonAggregate extends FunctionNode
+{
+    private $expr;
+    
+    public function getSql(SqlWalker $sqlWalker)
+    {
+        return sprintf('jsonb_agg(%s)', $this->expr->dispatch($sqlWalker));
+    }
+
+    public function parse(Parser $parser)
+    {
+        $parser->match(Lexer::T_IDENTIFIER);
+        $parser->match(Lexer::T_OPEN_PARENTHESIS);
+        $this->expr = $parser->StringPrimary();
+        $parser->match(Lexer::T_CLOSE_PARENTHESIS);
+    }
+}

src/Bundle/ChillMain/Doctrine/DQL/JsonbExistsInArray.php

@@ -0,0 +1,41 @@
+<?php
+/*
+ * 
+ * 
+ */
+namespace Chill\MainBundle\Doctrine\DQL;
+
+use Doctrine\ORM\Query\AST\Functions\FunctionNode;
+use Doctrine\ORM\Query\Lexer;
+use Doctrine\ORM\Query\Parser;
+use Doctrine\ORM\Query\SqlWalker;
+
+/**
+ * 
+ *
+ * @author Julien Fastré <julien.fastre@champs-libres.coop>
+ */
+class JsonbExistsInArray extends FunctionNode
+{
+    private $expr1;
+    private $expr2;
+    
+    public function getSql(SqlWalker $sqlWalker): string
+    {
+        return sprintf(
+            'jsonb_exists(%s, %s)',
+            $this->expr1->dispatch($sqlWalker),
+            $sqlWalker->walkInputParameter($this->expr2)
+        );
+    }
+
+    public function parse(Parser $parser): void
+    {
+        $parser->match(Lexer::T_IDENTIFIER);
+        $parser->match(Lexer::T_OPEN_PARENTHESIS);
+        $this->expr1 = $parser->StringPrimary();
+        $parser->match(Lexer::T_COMMA);
+        $this->expr2 = $parser->InputParameter();
+        $parser->match(Lexer::T_CLOSE_PARENTHESIS);
+    }
+}

src/Bundle/ChillMain/Doctrine/DQL/OverlapsI.php

@@ -0,0 +1,110 @@
+<?php
+/*
+ * Chill is a software for social workers
+ * Copyright (C) 2018 Champs-Libres Coopérative <info@champs-libres.coop>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU Affero General Public License as published by
+ * the Free Software Foundation, either version 3 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU Affero General Public License for more details.
+ *
+ * You should have received a copy of the GNU Affero General Public License
+ * along with this program.  If not, see <http://www.gnu.org/licenses/>.
+ */
+namespace Chill\MainBundle\Doctrine\DQL;
+
+use Doctrine\ORM\Query\AST\Functions\FunctionNode;
+use Doctrine\ORM\Query\Lexer;
+
+/**
+ * DQL function for OVERLAPS function in postgresql
+ * 
+ * If a value is null in period start, it will be replaced by -infinity. 
+ * If a value is null in period end, it will be replaced by infinity
+ * 
+ */
+class OverlapsI extends FunctionNode
+{
+    private $firstPeriodStart;
+    
+    private $firstPeriodEnd;
+    
+    private $secondPeriodStart;
+    
+    private $secondPeriodEnd;
+    
+    public function getSql(\Doctrine\ORM\Query\SqlWalker $sqlWalker)
+    {
+        return '('
+            .$this->makeCase($sqlWalker, $this->firstPeriodStart, 'start').', '
+            .$this->makeCase($sqlWalker, $this->firstPeriodEnd, 'end').
+            ') OVERLAPS ('
+            .$this->makeCase($sqlWalker, $this->secondPeriodStart, 'start').', '
+            .$this->makeCase($sqlWalker, $this->secondPeriodEnd, 'end').')'
+            ;
+    }
+    
+    protected function makeCase($sqlWalker, $part, $position)
+    {
+        //return $part->dispatch($sqlWalker);
+        
+        switch ($position) {
+            case 'start' :
+                $p = '-infinity';
+                break;
+            case 'end':
+                $p = 'infinity';
+                break;
+        }
+        
+        if ($part instanceof \Doctrine\ORM\Query\AST\PathExpression) {
+            return 'CASE WHEN '
+                .'  '.$part->dispatch($sqlWalker).' IS NOT NULL '
+                . 'THEN '.
+                $part->dispatch($sqlWalker)
+                . ' ELSE '.
+                "'".$p."'::date "
+                . 'END';
+        } else {
+            return 'CASE WHEN '
+                .'  '.$part->dispatch($sqlWalker).'::date IS NOT NULL '
+                . 'THEN '.
+                $part->dispatch($sqlWalker)
+                . '::date ELSE '.
+                "'".$p."'::date "
+                . 'END';
+        }
+    }
+
+    public function parse(\Doctrine\ORM\Query\Parser $parser)
+    {
+        $parser->match(Lexer::T_IDENTIFIER);
+        
+        $parser->match(Lexer::T_OPEN_PARENTHESIS);
+        
+        $this->firstPeriodStart = $parser->StringPrimary();
+        
+        $parser->match(Lexer::T_COMMA);
+        
+        $this->firstPeriodEnd = $parser->StringPrimary();
+        
+        $parser->match(Lexer::T_CLOSE_PARENTHESIS);
+        
+        $parser->match(Lexer::T_COMMA);
+        
+        $parser->match(Lexer::T_OPEN_PARENTHESIS);
+        
+        $this->secondPeriodStart = $parser->StringPrimary();
+        
+        $parser->match(Lexer::T_COMMA);
+        
+        $this->secondPeriodEnd = $parser->StringPrimary();
+        
+        $parser->match(Lexer::T_CLOSE_PARENTHESIS);
+    }
+}

src/Bundle/ChillMain/Doctrine/DQL/Replace.php

@@ -0,0 +1,64 @@
+<?php
+/*
+ * Chill is a software for social workers
+ * Copyright (C) 2019 Champs-Libres Coopérative <info@champs-libres.coop>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU Affero General Public License as published by
+ * the Free Software Foundation, either version 3 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU Affero General Public License for more details.
+ *
+ * You should have received a copy of the GNU Affero General Public License
+ * along with this program.  If not, see <http://www.gnu.org/licenses/>.
+ */
+namespace Chill\MainBundle\Doctrine\DQL;
+
+use Doctrine\ORM\Query\AST\Functions\FunctionNode;
+use Doctrine\ORM\Query\Lexer;
+
+/**
+ * 
+ *
+ */
+class Replace extends FunctionNode
+{
+    protected $string;
+    
+    protected $from;
+    
+    protected $to;
+    
+    public function getSql(\Doctrine\ORM\Query\SqlWalker $sqlWalker): string
+    {
+        return 'REPLACE('.
+            $this->string->dispatch($sqlWalker).
+            ', '.
+            $this->from->dispatch($sqlWalker).
+            ', '.
+            $this->to->dispatch($sqlWalker).
+            ')';
+    }
+
+    public function parse(\Doctrine\ORM\Query\Parser $parser): void
+    {
+        $parser->match(Lexer::T_IDENTIFIER);
+        $parser->match(Lexer::T_OPEN_PARENTHESIS);
+        
+        $this->string = $parser->StringPrimary();
+        
+        $parser->match(Lexer::T_COMMA);
+        
+        $this->from = $parser->StringPrimary();
+        
+        $parser->match(Lexer::T_COMMA);
+        
+        $this->to = $parser->StringPrimary();
+        
+        $parser->match(Lexer::T_CLOSE_PARENTHESIS);
+    }
+}

src/Bundle/ChillMain/Doctrine/DQL/Similarity.php

@@ -0,0 +1,54 @@
+<?php
+/*
+ * Chill is a software for social workers
+ * Copyright (C) 2018 Champs-Libres Coopérative <info@champs-libres.coop>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU Affero General Public License as published by
+ * the Free Software Foundation, either version 3 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU Affero General Public License for more details.
+ *
+ * You should have received a copy of the GNU Affero General Public License
+ * along with this program.  If not, see <http://www.gnu.org/licenses/>.
+ */
+namespace Chill\MainBundle\Doctrine\DQL;
+
+use Doctrine\ORM\Query\AST\Functions\FunctionNode;
+use Doctrine\ORM\Query\Lexer;
+
+/**
+ * 
+ *
+ * 
+ */
+class Similarity extends FunctionNode
+{
+    private $firstPart;
+    
+    private $secondPart;
+    
+    public function getSql(\Doctrine\ORM\Query\SqlWalker $sqlWalker)
+    {
+        return 'SIMILARITY('.$this->firstPart->dispatch($sqlWalker). 
+            ', ' . $this->secondPart->dispatch($sqlWalker) .")";
+    }
+
+    public function parse(\Doctrine\ORM\Query\Parser $parser)
+    {
+        $parser->match(Lexer::T_IDENTIFIER);
+        $parser->match(Lexer::T_OPEN_PARENTHESIS);
+        
+        $this->firstPart = $parser->StringPrimary();
+        
+        $parser->match(Lexer::T_COMMA);
+        
+        $this->secondPart = $parser->StringPrimary();
+        
+        $parser->match(Lexer::T_CLOSE_PARENTHESIS);
+    }
+}

src/Bundle/ChillMain/Doctrine/DQL/Unaccent.php

@@ -0,0 +1,53 @@
+<?php
+
+/*
+ * Chill is a software for social workers
+ * Copyright (C) 2015 Champs-Libres Coopérative <info@champs-libres.coop>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU Affero General Public License as published by
+ * the Free Software Foundation, either version 3 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU Affero General Public License for more details.
+ *
+ * You should have received a copy of the GNU Affero General Public License
+ * along with this program.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+namespace Chill\MainBundle\Doctrine\DQL;
+
+use Doctrine\ORM\Query\AST\Functions\FunctionNode;
+use Doctrine\ORM\Query\Lexer;
+
+/**
+ * Unaccent string using postgresql extension unaccent : 
+ * http://www.postgresql.org/docs/current/static/unaccent.html
+ * 
+ * Usage : StringFunction UNACCENT(string)
+ *
+ * @author Julien Fastré <julien.fastre@champs-libres.coop>
+ */
+class Unaccent extends FunctionNode
+{
+    private $string;
+    
+    public function getSql(\Doctrine\ORM\Query\SqlWalker $sqlWalker)
+    {
+        return 'UNACCENT(' . $this->string->dispatch($sqlWalker) .")";
+    }
+
+    public function parse(\Doctrine\ORM\Query\Parser $parser)
+    {
+        $parser->match(Lexer::T_IDENTIFIER);
+        $parser->match(Lexer::T_OPEN_PARENTHESIS);
+        
+        $this->string = $parser->StringPrimary();
+        
+        $parser->match(Lexer::T_CLOSE_PARENTHESIS);
+    }
+
+}

src/Bundle/ChillMain/Doctrine/Migrations/VersionComparator.php

@@ -0,0 +1,32 @@
+<?php
+
+namespace Chill\MainBundle\Doctrine\Migrations;
+
+use Doctrine\Migrations\Version\Comparator;
+use Doctrine\Migrations\Version\Version;
+
+use function strcmp;
+use function explode;
+
+/**
+ * Compare Version classes names from different namespaces and order them.
+ *
+ * Version are compared on the date's class.
+ */
+final class VersionComparator implements Comparator
+{
+    private function getNumber(Version $version): string
+    {
+        $names = explode("\\", (string) $version);
+
+        return end($names);
+    }
+
+    public function compare(Version $a, Version $b): int
+    {
+        $q = strcmp($this->getNumber($a), $this->getNumber($b));
+
+        return $q;
+    }
+}
+

src/Bundle/ChillMain/Doctrine/Type/NativeDateIntervalType.php

@@ -0,0 +1,111 @@
+<?php
+
+namespace Chill\MainBundle\Doctrine\Type;
+
+use Doctrine\DBAL\Types\DateIntervalType;
+use Doctrine\DBAL\Platforms\AbstractPlatform;
+use Doctrine\DBAL\Types\ConversionException;
+
+/**
+ * Re-declare the date interval to use the implementation of date interval in
+ * postgreql
+ *
+ * @author Julien Fastré <julien.fastre@champs-libres.coop>
+ */
+class NativeDateIntervalType extends DateIntervalType
+{
+    const FORMAT = '%rP%YY%MM%DDT%HH%IM%SS';
+    
+    public function getName(): string
+    {
+        return \Doctrine\DBAL\Types\Type::DATEINTERVAL;
+    }
+
+    public function getSQLDeclaration(array $fieldDeclaration, AbstractPlatform $platform): string
+    {
+        return 'INTERVAL';
+    }
+    
+    /**
+     * {@inheritdoc}
+     */
+    public function convertToDatabaseValue($value, AbstractPlatform $platform)
+    {
+        if (null === $value) {
+            return null;
+        }
+
+        if ($value instanceof \DateInterval) {
+            return $value->format(self::FORMAT);
+        }
+
+        throw ConversionException::conversionFailedInvalidType($value, $this->getName(), ['null', 'DateInterval']);
+    }
+    
+    public function convertToPHPValue($value, AbstractPlatform $platform)
+    {
+        if ($value === null || $value instanceof \DateInterval) {
+            return $value;
+        }
+        
+        try {
+            $strings = explode(' ', $value);
+            
+            if (count($strings) === 0) {
+                return null;
+            }
+            $intervalSpec = 'P';
+            \reset($strings);
+            
+            do {
+                $intervalSpec .= $this->convertEntry($strings);
+            } while (next($strings) !== FALSE);
+            
+            return new \DateInterval($intervalSpec);
+        } catch (\Exception $exception) {
+            throw $this->createConversionException($value, $exception);
+        }
+    }
+    
+    private function convertEntry(&$strings)
+    {
+        $current = \current($strings);
+        
+        if (is_numeric($current)) {
+            $next = \next($strings);
+            switch($next) {
+                case 'year':
+                case 'years':
+                    $unit = 'Y';
+                    break;
+                case 'mon':
+                case 'mons': 
+                    $unit = 'M';
+                    break;
+                case 'day':
+                case 'days':
+                    $unit = 'D';
+                    break;
+                default:
+                    throw $this->createConversionException(implode('', $strings));
+            }
+            
+            return $current.$unit;
+            
+        } elseif (\preg_match('/([0-9]{2}\:[0-9]{2}:[0-9]{2})/', $current) === 1) {
+            $tExploded = explode(':', $current);
+            $intervalSpec = 'T';
+            $intervalSpec.= $tExploded[0].'H';
+            $intervalSpec.= $tExploded[1].'M';
+            $intervalSpec.= $tExploded[2].'S';
+            
+            return $intervalSpec;
+        }
+    }
+    
+    protected function createConversionException($value, $exception = null)
+    {
+        return ConversionException::conversionFailedFormat($value, $this->getName(), 'xx year xx mons xx days 01:02:03', $exception);
+    }
+
+}