# Copyright 2017 Therp BV <http://therp.nl>
# License AGPL-3.0 or later (http://www.gnu.org/licenses/agpl.html).
# pylint: disable=consider-merging-classes-inherited
from odoo import api, models, fields
REASON_DUPLICATE = 1
REASON_DEFAULT = 2
REASON_DEFAULT_FALSE = 3
REASON_UNKNOWN_MODEL = 4


class CleanupPurgeLineProperty(models.TransientModel):
    _inherit = 'cleanup.purge.line'
    _name = 'cleanup.purge.line.property'
    _description = 'Purge properties'

    wizard_id = fields.Many2one(
        'cleanup.purge.wizard.property', 'Purge Wizard', readonly=True)
    property_id = fields.Many2one('ir.property')
    reason = fields.Selection([
        (REASON_DUPLICATE, 'Duplicated property'),
        (REASON_DEFAULT, 'Same value as default'),
        (REASON_DEFAULT_FALSE, 'Empty default property'),
        (REASON_UNKNOWN_MODEL, 'Unknown model'),
    ])

    @api.multi
    def purge(self):
        """Delete properties"""
        self.write({'purged': True})
        return self.mapped('property_id').unlink()


class CleanupPurgeWizardProperty(models.TransientModel):
    _inherit = 'cleanup.purge.wizard'
    _name = 'cleanup.purge.wizard.property'
    _description = 'Purge properties'

    @api.model
    def find(self):
        """
        Search property records which are duplicated or the same as the default
        """
        result = []
        default_properties = self.env['ir.property'].search([
            ('res_id', '=', False),
        ])
        handled_field_ids = []
        for prop in default_properties:
            value = None
            try:
                value = prop.get_by_record()
            except KeyError:
                result.append({
                    'name': '%s@%s: %s' % (
                        prop.name, prop.res_id, value,
                    ),
                    'property_id': prop.id,
                    'reason': REASON_UNKNOWN_MODEL,
                })
                continue
            if not value:
                result.append({
                    'name': '%s@%s: %s' % (
                        prop.name, prop.res_id, value,
                    ),
                    'property_id': prop.id,
                    'reason': REASON_DEFAULT_FALSE,
                })
                continue
            if prop.fields_id.id in handled_field_ids:
                continue
            domain = [
                ('id', '!=', prop.id),
                ('fields_id', '=', prop.fields_id.id),
                # =? explicitly tests for None or False, not falsyness
                ('value_float', '=?', prop.value_float or False),
                ('value_integer', '=?', prop.value_integer or False),
                ('value_text', '=?', prop.value_text or False),
                ('value_binary', '=?', prop.value_binary or False),
                ('value_reference', '=?', prop.value_reference or False),
                ('value_datetime', '=?', prop.value_datetime or False),
            ]
            if prop.company_id:
                domain.append(('company_id', '=', prop.company_id.id))
            else:
                domain.extend([
                    '|',
                    ('company_id', '=', False),
                    (
                        'company_id', 'in', self.env['res.company'].search([
                            (
                                'id', 'not in', default_properties.filtered(
                                    lambda x: x.company_id and
                                    x.fields_id == prop.fields_id
                                ).ids,
                            )
                        ]).ids
                    ),
                ])

            for redundant_property in self.env['ir.property'].search(domain):
                result.append({
                    'name': '%s@%s: %s' % (
                        prop.name, redundant_property.res_id,
                        prop.get_by_record()
                    ),
                    'property_id': redundant_property.id,
                    'reason': REASON_DEFAULT,
                })
            handled_field_ids.append(prop.fields_id.id)
        self.env.cr.execute(
            '''
            with grouped_properties(ids, cnt) as (
                select array_agg(id), count(*)
                from ir_property group by res_id, company_id, fields_id
            )
            select ids from grouped_properties where cnt > 1
            '''
        )
        for ids, in self.env.cr.fetchall():
            # odoo uses the first property found by search
            for prop in self.env['ir.property'].search([
                    ('id', 'in', ids)
            ])[1:]:
                result.append({
                    'name': '%s@%s: %s' % (
                        prop.name, prop.res_id, prop.get_by_record()
                    ),
                    'property_id': prop.id,
                    'reason': REASON_DUPLICATE,
                })

        return result

    purge_line_ids = fields.One2many(
        'cleanup.purge.line.property', 'wizard_id', 'Properties to purge')