<?php

/*
 * Copyright (c) Alexandre Gomes Gaigalas <alganet@gmail.com>
 * SPDX-License-Identifier: MIT
 */

declare(strict_types=1);

test('one rule / one failed', expectAll(
    fn() => v::keySet(v::key('foo', v::intType()))->assert(['foo' => 'string']),
    'foo must be an integer',
    '- foo must be an integer',
    ['foo' => 'foo must be an integer']
));

test('one rule / one missing key', expectAll(
    fn() => v::keySet(v::keyExists('foo'))->assert([]),
    'foo must be present',
    '- foo must be present',
    ['foo' => 'foo must be present']
));

test('one rule / one extra key', expectAll(
    fn() => v::keySet(v::keyExists('foo'))->assert(['foo' => 42, 'bar' => 'string']),
    'bar must not be present',
    '- bar must not be present',
    ['bar' => 'bar must not be present']
));

test('one rule / one extra key / one missing key', expectAll(
    fn() => v::keySet(v::keyExists('foo'))->assert(['bar' => true]),
    'foo must be present',
    <<<'FULL_MESSAGE'
    - `["bar": true]` contains both missing and extra keys
      - foo must be present
      - bar must not be present
    FULL_MESSAGE,
    [
        '__root__' => '`["bar": true]` contains both missing and extra keys',
        'foo' => 'foo must be present',
        'bar' => 'bar must not be present',
    ]
));

test('one rule / two extra keys', expectAll(
    fn() => v::keySet(v::keyExists('foo'))->assert(['foo' => 42, 'bar' => 'string', 'baz' => true]),
    'bar must not be present',
    <<<'FULL_MESSAGE'
    - `["foo": 42, "bar": "string", "baz": true]` contains extra keys
      - bar must not be present
      - baz must not be present
    FULL_MESSAGE,
    [
        '__root__' => '`["foo": 42, "bar": "string", "baz": true]` contains extra keys',
        'bar' => 'bar must not be present',
        'baz' => 'baz must not be present',
    ]
));

test('one rule / more than ten extra keys', expectAll(
    fn() => v::keySet(v::keyExists('foo'))
        ->assert([
            'foo' => 42,
            'bar' => 'string',
            'baz' => true,
            'qux' => false,
            'quux' => 42,
            'corge' => 'string',
            'grault' => true,
            'garply' => false,
            'waldo' => 42,
            'fred' => 'string',
            'plugh' => true,
            'xyzzy' => false,
            'thud' => 42,
        ]),
    'bar must not be present',
    <<<'FULL_MESSAGE'
    - `["foo": 42, "bar": "string", "baz": true, "qux": false, "quux": 42, ...]` contains extra keys
      - bar must not be present
      - baz must not be present
      - qux must not be present
      - quux must not be present
      - corge must not be present
      - grault must not be present
      - garply must not be present
      - waldo must not be present
      - fred must not be present
      - plugh must not be present
    FULL_MESSAGE,
    [
        '__root__' => '`["foo": 42, "bar": "string", "baz": true, "qux": false, "quux": 42, ...]` contains extra keys',
        'bar' => 'bar must not be present',
        'baz' => 'baz must not be present',
        'qux' => 'qux must not be present',
        'quux' => 'quux must not be present',
        'corge' => 'corge must not be present',
        'grault' => 'grault must not be present',
        'garply' => 'garply must not be present',
        'waldo' => 'waldo must not be present',
        'fred' => 'fred must not be present',
        'plugh' => 'plugh must not be present',
    ]
));

test('multiple rules / one failed', expectAll(
    fn() => v::keySet(v::keyExists('foo'), v::keyExists('bar'))->assert(['foo' => 42]),
    'bar must be present',
    '- bar must be present',
    ['bar' => 'bar must be present']
));

test('multiple rules / all failed', expectAll(
    fn() => v::keySet(v::keyExists('foo'), v::keyExists('bar'))->assert([]),
    'foo must be present',
    <<<'FULL_MESSAGE'
    - `[]` contains missing keys
      - foo must be present
      - bar must be present
    FULL_MESSAGE,
    [
        '__root__' => '`[]` contains missing keys',
        'foo' => 'foo must be present',
        'bar' => 'bar must be present',
    ]
));

test('multiple rules / one extra key', expectAll(
    fn() => v::keySet(
        v::keyExists('foo'),
        v::keyExists('bar')
    )->assert(['foo' => 42, 'bar' => 'string', 'baz' => true]),
    'baz must not be present',
    '- baz must not be present',
    ['baz' => 'baz must not be present']
));

test('multiple rules / one extra key / one missing', expectAll(
    fn() => v::keySet(
        v::keyExists('foo'),
        v::keyExists('bar')
    )->assert(['bar' => 'string', 'baz' => true]),
    'foo must be present',
    <<<'FULL_MESSAGE'
    - `["bar": "string", "baz": true]` contains both missing and extra keys
      - foo must be present
      - baz must not be present
    FULL_MESSAGE,
    [
        '__root__' => '`["bar": "string", "baz": true]` contains both missing and extra keys',
        'foo' => 'foo must be present',
        'baz' => 'baz must not be present',
    ]
));

test('multiple rules / two extra keys', expectAll(
    fn() => v::keySet(
        v::keyExists('foo'),
        v::keyExists('bar'),
        v::keyOptional('qux', v::intType())
    )->assert(['foo' => 42, 'bar' => 'string', 'baz' => true, 'qux' => false]),
    'qux must be an integer',
    <<<'FULL_MESSAGE'
    - `["foo": 42, "bar": "string", "baz": true, "qux": false]` contains extra keys
      - qux must be an integer
      - baz must not be present
    FULL_MESSAGE,
    [
        '__root__' => '`["foo": 42, "bar": "string", "baz": true, "qux": false]` contains extra keys',
        'qux' => 'qux must be an integer',
        'baz' => 'baz must not be present',
    ]
));

test('multiple rules / all failed validation', expectAll(
    fn() => v::keySet(
        v::key('foo', v::intType()),
        v::key('bar', v::intType()),
        v::key('baz', v::intType())
    )
        ->assert(['foo' => 42, 'bar' => 'string', 'baz' => true]),
    'bar must be an integer',
    <<<'FULL_MESSAGE'
    - `["foo": 42, "bar": "string", "baz": true]` validation failed
      - bar must be an integer
      - baz must be an integer
    FULL_MESSAGE,
    [
        '__root__' => '`["foo": 42, "bar": "string", "baz": true]` validation failed',
        'bar' => 'bar must be an integer',
        'baz' => 'baz must be an integer',
    ]
));

test('multiple rules / single missing key / single failed validation', expectAll(
    fn() => v::keySet(
        v::create()
            ->key('foo', v::intType())
            ->key('bar', v::intType())
            ->key('baz', v::intType())
    )
        ->assert(['foo' => 42, 'bar' => 'string']),
    'bar must be an integer',
    <<<'FULL_MESSAGE'
    - `["foo": 42, "bar": "string"]` contains missing keys
      - bar must be an integer
      - baz must be present
    FULL_MESSAGE,
    [
        '__root__' => '`["foo": 42, "bar": "string"]` contains missing keys',
        'bar' => 'bar must be an integer',
        'baz' => 'baz must be present',
    ]
));