File content as of revision 34:c66986d80f72:

 /* mbed UniGraphic library - PAR8 protocol class
 * Copyright (c) 2015 Giuliano Dianda
 * Released under the MIT License: http://mbed.org/license/mit
 *
 * Derived work of:
 *
 * mbed library for 240*320 pixel display TFT based on ILI9341 LCD Controller
 * Copyright (c) 2013 Peter Drescher - DC2PD
 *
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
 * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 * THE SOFTWARE.
 */
#include "platform.h" 
#if DEVICE_PORTINOUT 
 
#include "PAR8.h"

PAR8::PAR8(PortName port, PinName CS, PinName reset, PinName DC, PinName WR, PinName RD)
    : _port(port,0xFF), _CS(CS), _reset(reset), _DC(DC), _WR(WR), _RD(RD)
{
    _reset = 1;
    _DC=1;
    _WR=1;
    _RD=1;
    _CS=1;
    _port.mode(PullNone);
    _port.output(); // will re-enable our GPIO port
    hw_reset();    
}

void PAR8::wr_cmd8(unsigned char cmd)
{      
    _DC = 0; // 0=cmd
    _port.write(cmd);      // write 8bit
    _WR=0;
    _WR=1;
    _DC = 1; // 1=data next
}
void PAR8::wr_data8(unsigned char data)
{
    _port.write(data);    // write 8bit
    _WR=0;
    _WR=1;
}
void PAR8::wr_cmd16(unsigned short cmd)
{      
    _DC = 0; // 0=cmd
    _port.write(cmd>>8);      // write 8bit
    _WR=0;
    _WR=1;
    _port.write(cmd&0xFF);      // write 8bit
    _WR=0;
    _WR=1;
    _DC = 1; // 1=data next
}
void PAR8::wr_data16(unsigned short data)
{
    _port.write(data>>8);    // write 8bit
    _WR=0;
    _WR=1;
    _port.write(data&0xFF);    // write 8bit
    _WR=0;
    _WR=1;
}
void PAR8::wr_gram(unsigned short data)
{
    _port.write(data>>8);    // write 8bit
    _WR=0;
    _WR=1;
    _port.write(data&0xFF);    // write 8bit
    _WR=0;
    _WR=1;
}
void PAR8::wr_gram(unsigned short data, unsigned int count)
{
    if((data>>8)==(data&0xFF))
    {
        count<<=1;
      //  _port.write(data);    // write 8bit
        while(count)
        {
            _port.write(data);    // rewrite even if same data, otherwise too much fast
            _WR=0;
            _WR=1;
            count--;
        }
    }
    else
    {
        while(count)
        {
            _port.write(data>>8);    // write 8bit
            _WR=0;
            _WR=1;
            _port.write(data&0xFF);    // write 8bit
            _WR=0;
            _WR=1;
            count--;
        }
    }
}
void PAR8::wr_grambuf(unsigned short* data, unsigned int lenght)
{
    while(lenght)
    {
        _port.write((*data)>>8);    // write 8bit
        _WR=0;
        _WR=1;
        _port.write((*data)&0xFF);    // write 8bit
        _WR=0;
        _WR=1;
        data++;
        lenght--;
    }
}
unsigned short PAR8::rd_gram(bool convert)
{
    unsigned int r=0;
   _port.input();
   
    _RD = 0;
    _RD = 0; // add wait
    _port.read(); //dummy read
    _RD = 1;
    
    _RD = 0;
    _RD = 0; // add wait
    r |= _port.read();
    _RD = 1;
    r <<= 8;
    
    _RD = 0;
    _RD = 0; // add wait
    r |= _port.read();
    _RD = 1;
    if(convert)
    {
        r <<= 8;
        _RD = 0;
  //      _RD = 0; // add wait
        r |= _port.read();
        _RD = 1;
        // gram is 18bit/pixel, if you set 16bit/pixel (cmd 3A), during writing the 16bits are expanded to 18bit
        // during reading, you read the raw 18bit gram
        r = RGB24to16((r&0xFF0000)>>16, (r&0xFF00)>>8, r&0xFF);// 18bit pixel padded to 24bits, rrrrrr00_gggggg00_bbbbbb00, converted to 16bit
    }
    _port.output();
    return (unsigned short)r;
}
unsigned int PAR8::rd_reg_data32(unsigned char reg)
{
    wr_cmd8(reg);
    unsigned int r=0;
   _port.input();
   
    _RD = 0;
    _port.read(); //dummy read
    _RD = 1;
    
    _RD = 0;
 //   _RD = 0; // add wait
    r |= (_port.read()&0xFF);
    r <<= 8;
    _RD = 1;
    
    _RD = 0;
 //   _RD = 0; // add wait
    r |= (_port.read()&0xFF);
    r <<= 8;
    _RD = 1;
    
    _RD = 0;
//    _RD = 0; // add wait
    r |= (_port.read()&0xFF);
    r <<= 8;
    _RD = 1;
    
    _RD = 0;
 //   _RD = 0; // add wait
    r |= (_port.read()&0xFF);
    _RD = 1;
    
    _CS = 1; // force CS HIG to interupt the cmd in case was not supported
    _CS = 0;
    _port.output();
    return r;
}
// in Par mode EXTC regs (0xB0-0xFF) can be directly read
unsigned int PAR8::rd_extcreg_data32(unsigned char reg, unsigned char SPIreadenablecmd)
{
    return rd_reg_data32(reg);
}
// ILI932x specific
void PAR8::dummyread()
{
    _port.input();
    _RD=0;
    _RD=0; // add wait
    _port.read();    // dummy read
    _RD=1;
 //   _port.output();
}
// ILI932x specific
void PAR8::reg_select(unsigned char reg, bool forread)
{
    _DC = 0;
    _port.write(0);    // write MSB
    _WR=0;
    _WR=1;
    _port.write(reg);    // write LSB
    _WR=0;
    _WR=1;
    _DC = 1; // 1=data next
}
// ILI932x specific
void PAR8::reg_write(unsigned char reg, unsigned short data)
{
    _DC = 0;
    _port.write(0);    // write MSB
    _WR=0;
    _WR=1;
    _port.write(reg);    // write MSB
    _WR=0;
    _WR=1;
    _DC = 1;
    _port.write(data>>8);
    _WR=0;
    _WR=1;
    _port.write(data&0xFF);
    _WR=0;
    _WR=1;
}
// ILI932x specific
unsigned short PAR8::reg_read(unsigned char reg)
{
    unsigned short r=0;
    _DC = 0;
    _port.write(0);
    _WR=0;
    _WR=1;
    _port.write(reg);
    _WR=0;
    _WR=1;
    _DC = 1;
    _port.input();
    _RD=0;
    r |= _port.read();    // read 8bit
    _RD=1;
    r <<= 8;
    _RD=0;
    r |= _port.read();    // read 8bit
    _RD=1;
    _port.output();
    
    return r;
}
void PAR8::hw_reset()
{
    thread_sleep_for(15);
    _DC = 1;
    _CS = 1;
    _WR = 1;
    _RD = 1;
    _reset = 0;                        // display reset
    thread_sleep_for(2);
    _reset = 1;                       // end reset
    thread_sleep_for(100);
}
void PAR8::BusEnable(bool enable)
{
    _CS = enable ? 0:1;
}

#endif