class ConfigCRUDTest

class ConfigCRUDTest extends KernelTestBase {
  
  /**
   * Exempt from strict schema checking.
   *
   * @see \Drupal\Core\Config\Development\ConfigSchemaChecker
   */
  protected bool $strictConfigSchema = FALSE;
  
  /**
   * Tests CRUD operations.
   */
  public function testCRUD() : void {
    $event_dispatcher = $this->container
      ->get('event_dispatcher');
    $typed_config_manager = $this->container
      ->get('config.typed');
    $storage = $this->container
      ->get('config.storage');
    $collection_storage = $storage->createCollection('test_collection');
    $config_factory = $this->container
      ->get('config.factory');
    $name = 'config_test.crud';
    // Create a new configuration object in the default collection.
    $config = $this->config($name);
    $this->assertTrue($config->isNew());
    $config->set('value', 'initial');
    $config->save();
    $this->assertFalse($config->isNew());
    // Verify the active configuration contains the saved value.
    $actual_data = $storage->read($name);
    $this->assertSame([
      'value' => 'initial',
    ], $actual_data);
    // Verify the config factory contains the saved value.
    $actual_data = $config_factory->get($name)
      ->getRawData();
    $this->assertSame([
      'value' => 'initial',
    ], $actual_data);
    // Create another instance of the config object using a custom collection.
    $collection_config = new Config($name, $collection_storage, $event_dispatcher, $typed_config_manager);
    $collection_config->set('value', 'overridden');
    $collection_config->save();
    // Verify that the config factory still returns the right value, from the
    // config instance in the default collection.
    $actual_data = $config_factory->get($name)
      ->getRawData();
    $this->assertSame([
      'value' => 'initial',
    ], $actual_data);
    // Update the configuration object instance.
    $config->set('value', 'instance-update');
    $config->save();
    $this->assertFalse($config->isNew());
    // Verify the active configuration contains the updated value.
    $actual_data = $storage->read($name);
    $this->assertSame([
      'value' => 'instance-update',
    ], $actual_data);
    // Verify a call to $this->config() immediately returns the updated value.
    $new_config = $this->config($name);
    $this->assertSame($config->get(), $new_config->get());
    $this->assertFalse($config->isNew());
    // Pollute the config factory static cache.
    $config_factory->getEditable($name);
    // Delete the config object that uses a custom collection. This should not
    // affect the instance returned by the config factory which depends on the
    // default collection storage.
    $collection_config->delete();
    $actual_config = $config_factory->get($name);
    $this->assertFalse($actual_config->isNew());
    $this->assertSame([
      'value' => 'instance-update',
    ], $actual_config->getRawData());
    // Delete the configuration object.
    $config->delete();
    // Verify the configuration object is empty.
    $this->assertSame([], $config->get());
    $this->assertTrue($config->isNew());
    // Verify that all copies of the configuration has been removed from the
    // static cache.
    $this->assertTrue($config_factory->getEditable($name)
      ->isNew());
    // Verify the active configuration contains no value.
    $actual_data = $storage->read($name);
    $this->assertFalse($actual_data);
    // Verify $this->config() returns no data.
    $new_config = $this->config($name);
    $this->assertSame($config->get(), $new_config->get());
    $this->assertTrue($config->isNew());
    // Re-create the configuration object.
    $config->set('value', 're-created');
    $config->save();
    $this->assertFalse($config->isNew());
    // Verify the active configuration contains the updated value.
    $actual_data = $storage->read($name);
    $this->assertSame([
      'value' => 're-created',
    ], $actual_data);
    // Verify a call to $this->config() immediately returns the updated value.
    $new_config = $this->config($name);
    $this->assertSame($config->get(), $new_config->get());
    $this->assertFalse($config->isNew());
    // Rename the configuration object.
    $new_name = 'config_test.crud_rename';
    $this->container
      ->get('config.factory')
      ->rename($name, $new_name);
    $renamed_config = $this->config($new_name);
    $this->assertSame($config->get(), $renamed_config->get());
    $this->assertFalse($renamed_config->isNew());
    // Ensure that the old configuration object is removed from both the cache
    // and the configuration storage.
    $config = $this->config($name);
    $this->assertSame([], $config->get());
    $this->assertTrue($config->isNew());
    // Test renaming when config.factory does not have the object in its static
    // cache.
    $name = 'config_test.crud_rename';
    // Pollute the non-overrides static cache.
    $config_factory->getEditable($name);
    // Pollute the overrides static cache.
    $config = $config_factory->get($name);
    // Rename and ensure that happened properly.
    $new_name = 'config_test.crud_rename_no_cache';
    $config_factory->rename($name, $new_name);
    $renamed_config = $config_factory->get($new_name);
    $this->assertSame($config->get(), $renamed_config->get());
    $this->assertFalse($renamed_config->isNew());
    // Ensure the overrides static cache has been cleared.
    $this->assertTrue($config_factory->get($name)
      ->isNew());
    // Ensure the non-overrides static cache has been cleared.
    $this->assertTrue($config_factory->getEditable($name)
      ->isNew());
    // Merge data into the configuration object.
    $new_config = $this->config($new_name);
    $expected_values = [
      'value' => 'herp',
      '404' => 'foo',
    ];
    $new_config->merge($expected_values);
    $new_config->save();
    $this->assertSame($expected_values['value'], $new_config->get('value'));
    $this->assertSame($expected_values['404'], $new_config->get('404'));
    // Test that getMultiple() does not return new config objects that were
    // previously accessed with get()
    $new_config = $config_factory->get('non_existing_key');
    $this->assertTrue($new_config->isNew());
    $this->assertCount(0, $config_factory->loadMultiple([
      'non_existing_key',
    ]), 'loadMultiple() does not return new objects');
  }
  
  /**
   * Tests the validation of configuration object names.
   */
  public function testNameValidation() : void {
    // Verify that an object name without namespace causes an exception.
    $name = 'no_namespace';
    try {
      $this->config($name)
        ->save();
      $this->fail('Expected ConfigNameException was thrown for a name without a namespace.');
    } catch (\Exception $e) {
      $this->assertInstanceOf(ConfigNameException::class, $e);
    }
    // Verify that a name longer than the maximum length causes an exception.
    $name = 'config_test.herman_melville.dick_or_the_whale.harper_1851.now_small_fowls_flew_screaming_over_the_yet_yawning_gulf_a_sullen_white_surf_beat_against_its_steep_sides_then_all_collapsed_and_the_great_shroud_of_the_sea_rolled_on_as_it_rolled_five_thousand_years_ago';
    try {
      $this->config($name)
        ->save();
      $this->fail('Expected ConfigNameException was thrown for a name longer than Config::MAX_NAME_LENGTH.');
    } catch (\Exception $e) {
      $this->assertInstanceOf(ConfigNameException::class, $e);
    }
    // Verify that disallowed characters in the name cause an exception.
    $characters = $test_characters = [
      ':',
      '?',
      '*',
      '<',
      '>',
      '"',
      '\'',
      '/',
      '\\',
    ];
    foreach ($test_characters as $i => $c) {
      try {
        $name = 'namespace.object' . $c;
        $config = $this->config($name);
        $config->save();
      } catch (ConfigNameException) {
        unset($test_characters[$i]);
      }
    }
    $this->assertEmpty($test_characters, sprintf('Expected ConfigNameException was thrown for all invalid name characters: %s', implode(' ', $characters)));
    // Verify that a valid config object name can be saved.
    $name = 'namespace.object';
    try {
      $config = $this->config($name);
      $config->save();
    } catch (ConfigNameException) {
      $this->fail('ConfigNameException was not thrown for a valid object name.');
    }
  }
  
  /**
   * Tests the validation of configuration object values.
   */
  public function testValueValidation() : void {
    // Verify that setData() will catch dotted keys.
    try {
      $this->config('namespace.object')
        ->setData([
        'key.value' => 12,
      ])
        ->save();
      $this->fail('Expected ConfigValueException was thrown from setData() for value with dotted keys.');
    } catch (\Exception $e) {
      $this->assertInstanceOf(ConfigValueException::class, $e);
    }
    // Verify that set() will catch dotted keys.
    try {
      $this->config('namespace.object')
        ->set('foo', [
        'key.value' => 12,
      ])
        ->save();
      $this->fail('Expected ConfigValueException was thrown from set() for value with dotted keys.');
    } catch (\Exception $e) {
      $this->assertInstanceOf(ConfigValueException::class, $e);
    }
  }
  
  /**
   * Tests data type handling.
   */
  public function testDataTypes() : void {
    \Drupal::service('module_installer')->install([
      'config_test',
    ]);
    $storage = new DatabaseStorage($this->container
      ->get('database'), 'config');
    $name = 'config_test.types';
    $config = $this->config($name);
    // Verify variable data types are intact.
    $data = [
      'array' => [],
      'boolean' => TRUE,
      'exp' => 1.2E+34,
      'float' => 3.14159,
      'float_as_integer' => (double) 1,
      'hex' => 0xc,
      'int' => 99,
      // Symfony 5.1's YAML parser issues a deprecation when reading octal with
      // a leading zero, to comply with YAML 1.2. However PECL YAML is still
      // YAML 1.1 compliant.
      // @todo Revisit parsing of octal once PECL YAML supports YAML 1.2.
      //   https://www.drupal.org/project/drupal/issues/3205480
      //   'octal' => 0775,
'string' => 'string',
      'string_int' => '1',
      'nullable_array' => NULL,
      'nullable_boolean' => NULL,
      'nullable_exp' => NULL,
      'nullable_float' => NULL,
      'nullable_float_as_integer' => NULL,
      'nullable_hex' => NULL,
      'nullable_int' => NULL,
      'nullable_octal' => NULL,
      'nullable_string' => NULL,
      'nullable_string_int' => NULL,
      'mapping_with_only_required_keys' => [],
      'mapping_with_some_required_keys' => [],
      'mapping_with_only_optional_keys' => [],
    ];
    $data = [
      '_core' => [
        'default_config_hash' => Crypt::hashBase64(serialize($data)),
      ],
    ] + $data;
    $this->assertSame($data, $config->get());
    // Re-set each key using Config::set().
    foreach ($data as $key => $value) {
      $config->set($key, $value);
    }
    $config->save();
    $this->assertSame($data, $config->get());
    // Assert the data against the file storage.
    $this->assertSame($data, $storage->read($name));
    // Set data using config::setData().
    $config->setData($data)
      ->save();
    $this->assertSame($data, $config->get());
    $this->assertSame($data, $storage->read($name));
    // Test that setting an unsupported type for a config object with a schema
    // fails.
    try {
      $config->set('stream', fopen(__FILE__, 'r'))
        ->save();
      $this->fail('No Exception thrown upon saving invalid data type.');
    } catch (UnsupportedDataTypeConfigException) {
      // Expected exception; just continue testing.
    }
    // Test that setting an unsupported type for a config object with no schema
    // also fails.
    $typed_config_manager = $this->container
      ->get('config.typed');
    $config_name = 'config_test.no_schema';
    $config = $this->config($config_name);
    $this->assertFalse($typed_config_manager->hasConfigSchema($config_name));
    try {
      $config->set('stream', fopen(__FILE__, 'r'))
        ->save();
      $this->fail('No Exception thrown upon saving invalid data type.');
    } catch (UnsupportedDataTypeConfigException) {
      // Expected exception; just continue testing.
    }
  }
  
  /**
   * Tests deprecation of trusted data.
   *
   * @legacy-covers \Drupal\Core\Config\Config::save()
   */
  public function testTrustedDataDeprecation() : void {
    $this->expectUserDeprecationMessage('Calling Drupal\\Core\\Config\\Config::save() with the $has_trusted_data argument is deprecated in drupal:11.4.0 and is removed from drupal:13.0.0. There is no replacement. See https://www.drupal.org/node/3348180');
    \Drupal::service('module_installer')->install([
      'config_test',
    ]);
    $name = 'config_test.types';
    $config = $this->config($name);
    // Test that schema type enforcement can be overridden by trusting the data.
    $this->assertSame(99, $config->get('int'));
    $config->set('int', '99')
      ->save(TRUE);
    $this->assertSame('99', $config->get('int'));
    // Test that re-saving without testing the data enforces the schema type.
    $config->save();
    $this->assertSame(99, $config->get('int'));
  }

}