/*      $NetBSD: ibm_machdep.c,v 1.16 2014/03/26 16:01:43 christos Exp $        */

/*-
 * Copyright (c) 2004 The NetBSD Foundation, Inc.
 * All rights reserved.
 *
 * This code is derived from software contributed to The NetBSD Foundation
 * by Klaus J. Klein.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 *
 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
 * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
 * POSSIBILITY OF SUCH DAMAGE.
 */

#include <sys/param.h>
#include <sys/systm.h>

#include <machine/intr.h>
#include <machine/platform.h>

extern struct genppc_pci_chipset *genppc_pct;

void pci_intr_fixup_ibm_6015(void);

void
pci_intr_fixup_ibm_6015(void)
{
        struct genppc_pci_chipset_businfo *pbi;
        prop_dictionary_t dict, sub;
        prop_number_t intr_num;
        int i, j;
        char key[20];

        /* this works because the 6015 has only 1 PCI bus native */
        pbi = SIMPLEQ_FIRST(&genppc_pct->pc_pbi);

        dict = prop_dictionary_create_with_capacity(16);
        KASSERT(dict != NULL);
        (void)prop_dictionary_set(pbi->pbi_properties, "prep-pci-intrmap",
            dict);
        sub = prop_dictionary_create_with_capacity(4);
        KASSERT(sub != NULL);

        intr_num = prop_number_create_integer(13);
        for (j = 0; j < 4; j++) {
                snprintf(key, sizeof(key), "pin-%c", 'A' + j);
                prop_dictionary_set(sub, key, intr_num);
        }
        prop_object_release(intr_num);
        prop_dictionary_set(dict, "devfunc-12", sub);
        prop_object_release(sub);

        /* devices 13-19 all share IRQ 15 */
        for (i = 13; i < 20; i++) {
                sub = prop_dictionary_create_with_capacity(4);
                intr_num = prop_number_create_integer(15);
                snprintf(key, sizeof(key), "devfunc-%d", i);
                for (j = 0; j < 4; j++) {
                        snprintf(key, sizeof(key), "pin-%c", 'A' + j);
                        prop_dictionary_set(sub, key, intr_num);
                }
                prop_dictionary_set(dict, key, sub);
                prop_object_release(intr_num);
                prop_object_release(sub);
        }
        prop_object_release(dict);
}