/*
 * Copyright 2019 Emmanuel Vadot <manu@freebsd.org>
 * Copyright (c) 2017 Ian Lepore <ian@freebsd.org> All rights reserved.
 *
 * 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 AUTHOR 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 AUTHOR 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/cdefs.h>
#include <sys/param.h>
#include <sys/bus.h>
#include <sys/kernel.h>
#include <sys/gpio.h>
#include <sys/taskqueue.h>

#include <dev/mmc/bridge.h>
#include <dev/mmc/mmc_helpers.h>

static inline void
mmc_parse_sd_speed(device_t dev, struct mmc_host *host)
{
	bool no_18v = false;

	/*
	 * Parse SD supported modes
	 * All UHS-I modes requires 1.8V signaling.
	 */
	if (device_has_property(dev, "no-1-8-v"))
		no_18v = true;
	if (device_has_property(dev, "cap-sd-highspeed"))
		host->caps |= MMC_CAP_HSPEED;
	if (device_has_property(dev, "sd-uhs-sdr12") && !no_18v)
		host->caps |= MMC_CAP_UHS_SDR12 | MMC_CAP_SIGNALING_180;
	if (device_has_property(dev, "sd-uhs-sdr25") && !no_18v)
		host->caps |= MMC_CAP_UHS_SDR25 | MMC_CAP_SIGNALING_180;
	if (device_has_property(dev, "sd-uhs-sdr50") && !no_18v)
		host->caps |= MMC_CAP_UHS_SDR50 | MMC_CAP_SIGNALING_180;
	if (device_has_property(dev, "sd-uhs-sdr104") && !no_18v)
		host->caps |= MMC_CAP_UHS_SDR104 | MMC_CAP_SIGNALING_180;
	if (device_has_property(dev, "sd-uhs-ddr50") && !no_18v)
		host->caps |= MMC_CAP_UHS_DDR50 | MMC_CAP_SIGNALING_180;
}

static inline void
mmc_parse_mmc_speed(device_t dev, struct mmc_host *host)
{
	/* Parse eMMC supported modes */
	if (device_has_property(dev, "cap-mmc-highspeed"))
		host->caps |= MMC_CAP_HSPEED;
	if (device_has_property(dev, "mmc-ddr-1_2v"))
		host->caps |= MMC_CAP_MMC_DDR52_120 | MMC_CAP_SIGNALING_120;
	if (device_has_property(dev, "mmc-ddr-1_8v"))
		host->caps |= MMC_CAP_MMC_DDR52_180 | MMC_CAP_SIGNALING_180;
	if (device_has_property(dev, "mmc-ddr-3_3v"))
		host->caps |= MMC_CAP_SIGNALING_330;
	if (device_has_property(dev, "mmc-hs200-1_2v"))
		host->caps |= MMC_CAP_MMC_HS200_120 | MMC_CAP_SIGNALING_120;
	if (device_has_property(dev, "mmc-hs200-1_8v"))
		host->caps |= MMC_CAP_MMC_HS200_180 | MMC_CAP_SIGNALING_180;
	if (device_has_property(dev, "mmc-hs400-1_2v"))
		host->caps |= MMC_CAP_MMC_HS400_120 | MMC_CAP_SIGNALING_120;
	if (device_has_property(dev, "mmc-hs400-1_8v"))
		host->caps |= MMC_CAP_MMC_HS400_180 | MMC_CAP_SIGNALING_180;
	if (device_has_property(dev, "mmc-hs400-enhanced-strobe"))
		host->caps |= MMC_CAP_MMC_ENH_STROBE;
}

int
mmc_parse(device_t dev, struct mmc_helper *helper, struct mmc_host *host)
{
	uint32_t bus_width, max_freq;

	bus_width = 0;
	if (device_get_property(dev, "bus-width", &bus_width,
	    sizeof(bus_width), DEVICE_PROP_UINT32) <= 0)
		bus_width = 1;

	if (bus_width >= 4)
		host->caps |= MMC_CAP_4_BIT_DATA;
	if (bus_width >= 8)
		host->caps |= MMC_CAP_8_BIT_DATA;

	/*
	 * max-frequency is optional, drivers should tweak this value
	 * if it's not present based on the clock that the mmc controller
	 * operates on
	 */
	if (device_get_property(dev, "max-frequency", &max_freq,
	    sizeof(max_freq), DEVICE_PROP_UINT32) > 0)
		host->f_max = max_freq;

	if (device_has_property(dev, "broken-cd"))
		helper->props |= MMC_PROP_BROKEN_CD;
	if (device_has_property(dev, "non-removable"))
		helper->props |= MMC_PROP_NON_REMOVABLE;
	if (device_has_property(dev, "wp-inverted"))
		helper->props |= MMC_PROP_WP_INVERTED;
	if (device_has_property(dev, "cd-inverted"))
		helper->props |= MMC_PROP_CD_INVERTED;
	if (device_has_property(dev, "no-sdio"))
		helper->props |= MMC_PROP_NO_SDIO;
	if (device_has_property(dev, "no-sd"))
		helper->props |= MMC_PROP_NO_SD;
	if (device_has_property(dev, "no-mmc"))
		helper->props |= MMC_PROP_NO_MMC;

	if (!(helper->props & MMC_PROP_NO_SD))
		mmc_parse_sd_speed(dev, host);

	if (!(helper->props & MMC_PROP_NO_MMC))
		mmc_parse_mmc_speed(dev, host);

	return (0);
}