/*
 * Copyright (C) 2017  Intel Corporation. All rights reserved.
 *
 * This file is free software: you can redistribute it and/or modify it
 * under the terms of the GNU General Public License as published by the
 * Free Software Foundation, either version 3 of the License, or
 * (at your option) any later version.
 *
 * This file is distributed in the hope that it will be useful, but
 * WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 * See the GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License along
 * with this program.  If not, see <http://www.gnu.org/licenses/>.
 */
#include <AP_HAL/AP_HAL.h>
#if CONFIG_HAL_BOARD == HAL_BOARD_SITL

#include "UARTDriver.h"

#if defined(__CYGWIN__) || defined(__CYGWIN64__) || defined(__APPLE__) || defined(__OpenBSD__)
#define USE_TERMIOS
#endif

#ifdef USE_TERMIOS
#include <termios.h>
#else
#include <asm/ioctls.h>
#include <asm/termbits.h>
#endif

#include <string.h>
#include <sys/ioctl.h>
#include <sys/stat.h>
#include <sys/types.h>

bool HALSITL::UARTDriver::set_speed(int speed) const
{
    if (_fd < 0) {
        return false;
    }
#ifdef USE_TERMIOS
    struct termios t;
    tcgetattr(_fd, &t);
    cfsetspeed(&t, speed);
    tcsetattr(_fd, TCSANOW, &t);
#else
    struct termios2 tc;
    memset(&tc, 0, sizeof(tc));
    if (ioctl(_fd, TCGETS2, &tc) == -1) {
        return false;
    }
    
    /* speed is configured by c_[io]speed */
    tc.c_cflag &= ~CBAUD;
    tc.c_cflag |= BOTHER;
    tc.c_ispeed = speed;
    tc.c_ospeed = speed;
    if (ioctl(_fd, TCSETS2, &tc) == -1) {
        return false;
    }
    if (ioctl(_fd, TCFLSH, TCIOFLUSH) == -1) {
        return false;
    }
#endif

    return true;
}

void HALSITL::UARTDriver::configure_parity(uint8_t v)
{
    if (_fd < 0) {
        return;
    }
    UARTDriver::parity = v;
#ifdef USE_TERMIOS
    struct termios t;

    tcgetattr(_fd, &t);
#else
    struct termios2 t;
    memset(&t, 0, sizeof(t));
    if (ioctl(_fd, TCGETS2, &t) == -1) {
        return;
    }
#endif
    if (v != 0) {
        // enable parity
        t.c_cflag |= PARENB;
        if (v == 1) {
            t.c_cflag |= PARODD;
        } else {
            t.c_cflag &= ~PARODD;
        }
    }
    else {
        // disable parity
        t.c_cflag &= ~PARENB;
    }

#ifdef USE_TERMIOS
    tcsetattr(_fd, TCSANOW, &t);
#else
    ioctl(_fd, TCSETS2, &t);
#endif
}

void HALSITL::UARTDriver::set_stop_bits(int n)
{
    if (_fd < 0) {
        return;
    }
#ifdef USE_TERMIOS
    struct termios t;

    tcgetattr(_fd, &t);
#else
    struct termios2 t;
    memset(&t, 0, sizeof(t));
    if (ioctl(_fd, TCGETS2, &t) == -1) {
        return;
    }
#endif

    if (n > 1) {
        t.c_cflag |= CSTOPB;
    } else {
        t.c_cflag &= ~CSTOPB;
    }

#ifdef USE_TERMIOS
    tcsetattr(_fd, TCSANOW, &t);
#else
    ioctl(_fd, TCSETS2, &t);
#endif
}

#endif