class FilterFormatAccessTest

class FilterFormatAccessTest extends BrowserTestBase {
    
    /**
     * {@inheritdoc}
     */
    protected static $modules = [
        'block',
        'filter',
        'node',
    ];
    
    /**
     * {@inheritdoc}
     */
    protected $defaultTheme = 'stark';
    
    /**
     * A user with administrative permissions.
     *
     * @var \Drupal\user\UserInterface
     */
    protected $adminUser;
    
    /**
     * A user with 'administer filters' permission.
     *
     * @var \Drupal\user\UserInterface
     */
    protected $filterAdminUser;
    
    /**
     * A user with permission to create and edit own content.
     *
     * @var \Drupal\user\UserInterface
     */
    protected $webUser;
    
    /**
     * An object representing an allowed text format.
     *
     * @var object
     */
    protected $allowedFormat;
    
    /**
     * An object representing a secondary allowed text format.
     *
     * @var object
     */
    protected $secondAllowedFormat;
    
    /**
     * An object representing a disallowed text format.
     *
     * @var object
     */
    protected $disallowedFormat;
    
    /**
     * {@inheritdoc}
     */
    protected function setUp() : void {
        parent::setUp();
        $this->drupalCreateContentType([
            'type' => 'page',
            'name' => 'Basic page',
        ]);
        // Create a user who can administer text formats, but does not have
        // specific permission to use any of them.
        $this->filterAdminUser = $this->drupalCreateUser([
            'administer filters',
            'create page content',
            'edit any page content',
        ]);
        // Create three text formats. Two text formats are created for all users so
        // that the drop-down list appears for all tests.
        $formats = [];
        for ($i = 0; $i < 3; $i++) {
            $format = FilterFormat::create([
                'format' => $this->randomMachineName(),
                'name' => $this->randomMachineName(),
            ]);
            $format->save();
            $formats[] = $format;
        }
        [
            $this->allowedFormat,
            $this->secondAllowedFormat,
            $this->disallowedFormat,
        ] = $formats;
        // Create a regular user with access to two of the formats.
        $this->webUser = $this->drupalCreateUser([
            'create page content',
            'edit any page content',
            $this->allowedFormat
                ->getPermissionName(),
            $this->secondAllowedFormat
                ->getPermissionName(),
        ]);
        // Create an administrative user who has access to use all three formats.
        $this->adminUser = $this->drupalCreateUser([
            'administer filters',
            'create page content',
            'edit any page content',
            $this->allowedFormat
                ->getPermissionName(),
            $this->secondAllowedFormat
                ->getPermissionName(),
            $this->disallowedFormat
                ->getPermissionName(),
        ]);
        $this->drupalPlaceBlock('local_tasks_block');
    }
    
    /**
     * Tests the Filter format access permissions functionality.
     */
    public function testFormatPermissions() : void {
        // Make sure that a regular user only has access to the text formats for
        // which they were granted access.
        $fallback_format = FilterFormat::load(filter_fallback_format());
        $disallowed_format_name = $this->disallowedFormat
            ->getPermissionName();
        $this->assertTrue($this->allowedFormat
            ->access('use', $this->webUser), 'A regular user has access to use a text format they were granted access to.');
        $this->assertEquals(AccessResult::allowed()->addCacheContexts([
            'user.permissions',
        ]), $this->allowedFormat
            ->access('use', $this->webUser, TRUE), 'A regular user has access to use a text format they were granted access to.');
        $this->assertFalse($this->disallowedFormat
            ->access('use', $this->webUser), 'A regular user does not have access to use a text format they were not granted access to.');
        $this->assertEquals(AccessResult::neutral("The '{$disallowed_format_name}' permission is required.")->cachePerPermissions(), $this->disallowedFormat
            ->access('use', $this->webUser, TRUE), 'A regular user does not have access to use a text format they were not granted access to.');
        $this->assertTrue($fallback_format->access('use', $this->webUser), 'A regular user has access to use the fallback format.');
        $this->assertEquals(AccessResult::allowed(), $fallback_format->access('use', $this->webUser, TRUE), 'A regular user has access to use the fallback format.');
        // Perform similar checks as above, but now against the entire list of
        // available formats for this user.
        $this->assertContains($this->allowedFormat
            ->id(), array_keys(filter_formats($this->webUser)), 'The allowed format appears in the list of available formats for a regular user.');
        $this->assertNotContains($this->disallowedFormat
            ->id(), array_keys(filter_formats($this->webUser)), 'The disallowed format does not appear in the list of available formats for a regular user.');
        $this->assertContains(filter_fallback_format(), array_keys(filter_formats($this->webUser)), 'The fallback format appears in the list of available formats for a regular user.');
        // Make sure that a regular user only has permission to use the format
        // they were granted access to.
        $this->assertTrue($this->webUser
            ->hasPermission($this->allowedFormat
            ->getPermissionName()), 'A regular user has permission to use the allowed text format.');
        $this->assertFalse($this->webUser
            ->hasPermission($this->disallowedFormat
            ->getPermissionName()), 'A regular user does not have permission to use the disallowed text format.');
        // Make sure that the allowed format appears on the node form and that
        // the disallowed format and fallback format do not.
        $this->drupalLogin($this->webUser);
        $this->drupalGet('node/add/page');
        $this->assertSession()
            ->optionExists('body[0][format]', $this->allowedFormat
            ->id());
        $this->assertSession()
            ->optionNotExists('body[0][format]', $this->disallowedFormat
            ->id());
        $this->assertSession()
            ->optionNotExists('body[0][format]', filter_fallback_format());
        // Check regular user access to the filter tips pages.
        $this->drupalGet('filter/tips/' . $this->allowedFormat
            ->id());
        $this->assertSession()
            ->statusCodeEquals(200);
        $this->drupalGet('filter/tips/' . $this->disallowedFormat
            ->id());
        $this->assertSession()
            ->statusCodeEquals(403);
        $this->drupalGet('filter/tips/' . filter_fallback_format());
        $this->assertSession()
            ->statusCodeEquals(200);
        $this->drupalGet('filter/tips/invalid-format');
        $this->assertSession()
            ->statusCodeEquals(404);
        // Check admin user access to the filter tips pages.
        $this->drupalLogin($this->adminUser);
        $this->drupalGet('filter/tips/' . $this->allowedFormat
            ->id());
        $this->assertSession()
            ->statusCodeEquals(200);
        $this->drupalGet('filter/tips/' . $this->disallowedFormat
            ->id());
        $this->assertSession()
            ->statusCodeEquals(200);
        $this->drupalGet('filter/tips/' . filter_fallback_format());
        $this->assertSession()
            ->statusCodeEquals(200);
        $this->drupalGet('filter/tips/invalid-format');
        $this->assertSession()
            ->statusCodeEquals(404);
    }
    
    /**
     * Tests if text format is available to a role.
     */
    public function testFormatRoles() : void {
        // Get the role ID assigned to the regular user.
        $roles = $this->webUser
            ->getRoles(TRUE);
        $rid = $roles[0];
        // Check that this role appears in the list of roles that have access to an
        // allowed text format, but does not appear in the list of roles that have
        // access to a disallowed text format.
        $this->assertContains($rid, array_keys(filter_get_roles_by_format($this->allowedFormat)), 'A role which has access to a text format appears in the list of roles that have access to that format.');
        $this->assertNotContains($rid, array_keys(filter_get_roles_by_format($this->disallowedFormat)), 'A role which does not have access to a text format does not appear in the list of roles that have access to that format.');
        // Check that the correct text format appears in the list of formats
        // available to that role.
        $this->assertContains($this->allowedFormat
            ->id(), array_keys(filter_get_formats_by_role($rid)), 'A text format which a role has access to appears in the list of formats available to that role.');
        $this->assertNotContains($this->disallowedFormat
            ->id(), array_keys(filter_get_formats_by_role($rid)), 'A text format which a role does not have access to does not appear in the list of formats available to that role.');
        // Check that the fallback format is always allowed.
        $roles = Role::loadMultiple();
        $names = array_map(fn(RoleInterface $role) => $role->label(), $roles);
        $this->assertEquals(filter_get_roles_by_format(FilterFormat::load(filter_fallback_format())), $names, 'All roles have access to the fallback format.');
        $this->assertContains(filter_fallback_format(), array_keys(filter_get_formats_by_role($rid)), 'The fallback format appears in the list of allowed formats for any role.');
    }
    
    /**
     * Tests editing a page using a disallowed text format.
     *
     * Verifies that regular users and administrators are able to edit a page, but
     * not allowed to change the fields which use an inaccessible text format.
     * Also verifies that fields which use a text format that does not exist can
     * be edited by administrators only, but that the administrator is forced to
     * choose a new format before saving the page.
     */
    public function testFormatWidgetPermissions() : void {
        $body_value_key = 'body[0][value]';
        $body_format_key = 'body[0][format]';
        // Create node to edit.
        $this->drupalLogin($this->adminUser);
        $edit = [];
        $edit['title[0][value]'] = $this->randomMachineName(8);
        $edit[$body_value_key] = $this->randomMachineName(16);
        $edit[$body_format_key] = $this->disallowedFormat
            ->id();
        $this->drupalGet('node/add/page');
        $this->submitForm($edit, 'Save');
        $node = $this->drupalGetNodeByTitle($edit['title[0][value]']);
        // Try to edit with a less privileged user.
        $this->drupalLogin($this->webUser);
        $this->drupalGet('node/' . $node->id());
        $this->clickLink('Edit');
        // Verify that body field is read-only and contains replacement value.
        $this->assertSession()
            ->fieldDisabled($body_value_key);
        $this->assertSession()
            ->fieldValueEquals($body_value_key, 'This field has been disabled because you do not have sufficient permissions to edit it.');
        // Verify that title can be changed, but preview displays original body.
        $new_edit = [];
        $new_edit['title[0][value]'] = $this->randomMachineName(8);
        $this->submitForm($new_edit, 'Preview');
        $this->assertSession()
            ->pageTextContains($edit[$body_value_key]);
        // Save and verify that only the title was changed.
        $this->drupalGet('node/' . $node->id() . '/edit');
        $this->submitForm($new_edit, 'Save');
        $this->assertSession()
            ->pageTextNotContains($edit['title[0][value]']);
        $this->assertSession()
            ->pageTextContains($new_edit['title[0][value]']);
        $this->assertSession()
            ->pageTextContains($edit[$body_value_key]);
        // Check that even an administrator with "administer filters" permission
        // cannot edit the body field if they do not have specific permission to
        // use its stored format. (This must be disallowed so that the
        // administrator is never forced to switch the text format to something
        // else.)
        $this->drupalLogin($this->filterAdminUser);
        $this->drupalGet('node/' . $node->id() . '/edit');
        $this->assertSession()
            ->fieldDisabled($body_value_key);
        $this->assertSession()
            ->fieldValueEquals($body_value_key, 'This field has been disabled because you do not have sufficient permissions to edit it.');
        // Disable the text format used above.
        $this->disallowedFormat
            ->disable()
            ->save();
        $this->resetFilterCaches();
        // Log back in as the less privileged user and verify that the body field
        // is still disabled, since the less privileged user should not be able to
        // edit content that does not have an assigned format.
        $this->drupalLogin($this->webUser);
        $this->drupalGet('node/' . $node->id() . '/edit');
        $this->assertSession()
            ->fieldDisabled($body_value_key);
        $this->assertSession()
            ->fieldValueEquals($body_value_key, 'This field has been disabled because you do not have sufficient permissions to edit it.');
        // Log back in as the filter administrator and verify that the body field
        // can be edited.
        $this->drupalLogin($this->filterAdminUser);
        $this->drupalGet('node/' . $node->id() . '/edit');
        $this->assertSession()
            ->fieldEnabled($body_value_key);
        $this->assertSession()
            ->fieldExists($body_format_key);
        // Verify that trying to save the node without selecting a new text format
        // produces an error message, and does not result in the node being saved.
        $old_title = $new_edit['title[0][value]'];
        $new_title = $this->randomMachineName(8);
        $edit = [];
        $edit['title[0][value]'] = $new_title;
        $this->drupalGet('node/' . $node->id() . '/edit');
        $this->submitForm($edit, 'Save');
        $this->assertSession()
            ->statusMessageContains('Text format field is required.', 'error');
        $this->drupalGet('node/' . $node->id());
        $this->assertSession()
            ->pageTextContains($old_title);
        $this->assertSession()
            ->pageTextNotContains($new_title);
        // Now select a new text format and make sure the node can be saved.
        $edit[$body_format_key] = filter_fallback_format();
        $this->drupalGet('node/' . $node->id() . '/edit');
        $this->submitForm($edit, 'Save');
        $this->assertSession()
            ->addressEquals('node/' . $node->id());
        $this->assertSession()
            ->pageTextContains($new_title);
        $this->assertSession()
            ->pageTextNotContains($old_title);
        // Switch the text format to a new one, then disable that format and all
        // other formats on the site (leaving only the fallback format).
        $this->drupalLogin($this->adminUser);
        $edit = [
            $body_format_key => $this->allowedFormat
                ->id(),
        ];
        $this->drupalGet('node/' . $node->id() . '/edit');
        $this->submitForm($edit, 'Save');
        $this->assertSession()
            ->addressEquals('node/' . $node->id());
        foreach (filter_formats() as $format) {
            if (!$format->isFallbackFormat()) {
                $format->disable()
                    ->save();
            }
        }
        // Since there is now only one available text format, the widget for
        // selecting a text format would normally not display when the content is
        // edited. However, we need to verify that the filter administrator still
        // is forced to make a conscious choice to reassign the text to a different
        // format.
        $this->drupalLogin($this->filterAdminUser);
        $old_title = $new_title;
        $new_title = $this->randomMachineName(8);
        $edit = [];
        $edit['title[0][value]'] = $new_title;
        $this->drupalGet('node/' . $node->id() . '/edit');
        $this->submitForm($edit, 'Save');
        $this->assertSession()
            ->statusMessageContains('Text format field is required.', 'error');
        $this->drupalGet('node/' . $node->id());
        $this->assertSession()
            ->pageTextContains($old_title);
        $this->assertSession()
            ->pageTextNotContains($new_title);
        $edit[$body_format_key] = filter_fallback_format();
        $this->drupalGet('node/' . $node->id() . '/edit');
        $this->submitForm($edit, 'Save');
        $this->assertSession()
            ->addressEquals('node/' . $node->id());
        $this->assertSession()
            ->pageTextContains($new_title);
        $this->assertSession()
            ->pageTextNotContains($old_title);
    }
    
    /**
     * Rebuilds text format and permission caches in the thread running the tests.
     */
    protected function resetFilterCaches() : void {
        filter_formats_reset();
    }

}