Enable establishing exclusive oci8 connections

Author: morozov

src/Driver/OCI8/Driver.php

@@ -4,6 +4,7 @@
 
 use Doctrine\DBAL\Driver\AbstractOracleDriver;
 use Doctrine\DBAL\Driver\OCI8\Exception\ConnectionFailed;
+use Doctrine\DBAL\Driver\OCI8\Exception\InvalidConfiguration;
 use SensitiveParameter;
 
 use function oci_connect;
@@ -32,8 +33,17 @@ public function connect(
 
         $connectionString = $this->getEasyConnectString($params);
 
-        if (! empty($params['persistent'])) {
+        $persistent = ! empty($params['persistent']);
+        $exclusive  = ! empty($params['driverOptions']['exclusive']);
+
+        if ($persistent && $exclusive) {
+            throw InvalidConfiguration::forPersistentAndExclusive();
+        }
+
+        if ($persistent) {
             $connection = @oci_pconnect($username, $password, $connectionString, $charset, $sessionMode);
+        } elseif ($exclusive) {
+            $connection = @oci_new_connect($username, $password, $connectionString, $charset, $sessionMode);
         } else {
             $connection = @oci_connect($username, $password, $connectionString, $charset, $sessionMode);
         }

src/Driver/OCI8/Exception/InvalidConfiguration.php

@@ -0,0 +1,20 @@
+<?php
+
+declare(strict_types=1);
+
+namespace Doctrine\DBAL\Driver\OCI8\Exception;
+
+use Doctrine\DBAL\Driver\AbstractException;
+
+/**
+ * @internal
+ *
+ * @psalm-immutable
+ */
+final class InvalidConfiguration extends AbstractException
+{
+    public static function forPersistentAndExclusive(): self
+    {
+        return new self('The "persistent" parameter and the "exclusive" driver option are mutually exclusive');
+    }
+}

tests/Functional/LockMode/NoneTest.php

@@ -5,6 +5,7 @@
 namespace Doctrine\DBAL\Tests\Functional\LockMode;
 
 use Doctrine\DBAL\Connection;
+use Doctrine\DBAL\DriverManager;
 use Doctrine\DBAL\Exception;
 use Doctrine\DBAL\LockMode;
 use Doctrine\DBAL\Platforms\SqlitePlatform;
@@ -21,11 +22,6 @@ class NoneTest extends FunctionalTestCase
 
     public function setUp(): void
     {
-        if (TestUtil::isDriverOneOf('oci8')) {
-            // https://github.com/doctrine/dbal/issues/4417
-            self::markTestSkipped('This test fails on OCI8 for a currently unknown reason');
-        }
-
         if ($this->connection->getDatabasePlatform() instanceof SQLServerPlatform) {
             // Use row versioning instead of locking on SQL Server (if we don't, the second connection will block when
             // attempting to read the row created by the first connection, instead of reading the previous version);
@@ -43,7 +39,13 @@ public function setUp(): void
 
         $this->dropAndCreateTable($table);
 
-        $this->connection2 = TestUtil::getConnection();
+        $params = TestUtil::getConnectionParams();
+
+        if (TestUtil::isDriverOneOf('oci8')) {
+            $params['driverOptions']['exclusive'] = true;
+        }
+
+        $this->connection2 = DriverManager::getConnection($params);
 
         if ($this->connection2->getSchemaManager()->tablesExist('users')) {
             return;