/* mbed Microcontroller Library
 * Copyright (c) 2006-2013 ARM Limited
 *
 * Licensed under the Apache License, Version 2.0 (the "License");
 * you may not use this file except in compliance with the License.
 * You may obtain a copy of the License at
 *
 *     http://www.apache.org/licenses/LICENSE-2.0
 *
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS,
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 * See the License for the specific language governing permissions and
 * limitations under the License.
 */
#include "drivers/BusOut.h"
#include "platform/mbed_assert.h"

namespace mbed {

BusOut::BusOut(PinName p0, PinName p1, PinName p2, PinName p3, PinName p4, PinName p5, PinName p6, PinName p7, PinName p8, PinName p9, PinName p10, PinName p11, PinName p12, PinName p13, PinName p14, PinName p15)
{
    PinName pins[16] = {p0, p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15};

    // No lock needed in the constructor
    _nc_mask = 0;
    for (int i = 0; i < 16; i++) {
        _pin[i] = (pins[i] != NC) ? new DigitalOut(pins[i]) : 0;
        if (pins[i] != NC) {
            _nc_mask |= (1 << i);
        }
    }
}

BusOut::BusOut(PinName pins[16])
{
    // No lock needed in the constructor
    _nc_mask = 0;
    for (int i = 0; i < 16; i++) {
        _pin[i] = (pins[i] != NC) ? new DigitalOut(pins[i]) : 0;
        if (pins[i] != NC) {
            _nc_mask |= (1 << i);
        }
    }
}

BusOut::~BusOut()
{
    // No lock needed in the destructor
    for (int i = 0; i < 16; i++) {
        if (_pin[i] != 0) {
            delete _pin[i];
        }
    }
}

void BusOut::write(int value)
{
    lock();
    for (int i = 0; i < 16; i++) {
        if (_pin[i] != 0) {
            _pin[i]->write((value >> i) & 1);
        }
    }
    unlock();
}

int BusOut::read()
{
    lock();
    int v = 0;
    for (int i = 0; i < 16; i++) {
        if (_pin[i] != 0) {
            v |= _pin[i]->read() << i;
        }
    }
    unlock();
    return v;
}

BusOut &BusOut::operator= (int v)
{
    // Underlying write is thread safe
    write(v);
    return *this;
}

BusOut &BusOut::operator= (BusOut &rhs)
{
    // Underlying write is thread safe
    write(rhs.read());
    return *this;
}

DigitalOut &BusOut::operator[](int index)
{
    // No lock needed since _pin is not modified outside the constructor
    MBED_ASSERT(index >= 0 && index < 16);
    MBED_ASSERT(_pin[index]);
    return *_pin[index];
}

BusOut::operator int()
{
    // Underlying read is thread safe
    return read();
}

void BusOut::lock()
{
    _mutex.lock();
}

void BusOut::unlock()
{
    _mutex.unlock();
}

} // namespace mbed
