mirror of
https://github.com/MarlinFirmware/Marlin.git
synced 2024-12-14 14:31:33 +00:00
306 lines
9.2 KiB
C++
306 lines
9.2 KiB
C++
/**
|
|
* Marlin 3D Printer Firmware
|
|
* Copyright (C) 2016, 2017 MarlinFirmware [https://github.com/MarlinFirmware/Marlin]
|
|
*
|
|
* Based on Sprinter and grbl.
|
|
* Copyright (C) 2011 Camiel Gubbels / Erik van der Zalm
|
|
*
|
|
* This program 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 program 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/>.
|
|
*
|
|
*/
|
|
|
|
/**
|
|
* Software SPI functions originally from Arduino Sd2Card Library
|
|
* Copyright (C) 2009 by William Greiman
|
|
*/
|
|
|
|
/**
|
|
*
|
|
* For TARGET_LPC1768
|
|
*/
|
|
|
|
/**
|
|
* Hardware SPI and a software SPI implementations are included in this file.
|
|
* The hardware SPI runs faster and has higher throughput but is not compatible
|
|
* with some LCD interfaces/adapters.
|
|
*
|
|
* Control of the slave select pin(s) is handled by the calling routines.
|
|
*
|
|
* Some of the LCD interfaces/adapters result in the LCD SPI and the SD card
|
|
* SPI sharing pins. The SCK, MOSI & MISO pins can NOT be set/cleared with
|
|
* WRITE nor digitalWrite when the hardware SPI module within the LPC17xx is
|
|
* active. If any of these pins are shared then the software SPI must be used.
|
|
*
|
|
* A more sophisticated hardware SPI can be found at the following link. This
|
|
* implementation has not been fully debugged.
|
|
* https://github.com/MarlinFirmware/Marlin/tree/071c7a78f27078fd4aee9a3ef365fcf5e143531e
|
|
*/
|
|
|
|
#ifdef TARGET_LPC1768
|
|
|
|
// --------------------------------------------------------------------------
|
|
// Includes
|
|
// --------------------------------------------------------------------------
|
|
|
|
//#include "../../../MarlinConfig.h" //works except in U8g
|
|
#include "spi_pins.h"
|
|
#include "fastio.h"
|
|
|
|
// --------------------------------------------------------------------------
|
|
// Public Variables
|
|
// --------------------------------------------------------------------------
|
|
|
|
|
|
// --------------------------------------------------------------------------
|
|
// Public functions
|
|
// --------------------------------------------------------------------------
|
|
|
|
#if ENABLED(LPC_SOFTWARE_SPI)
|
|
// --------------------------------------------------------------------------
|
|
// software SPI
|
|
// --------------------------------------------------------------------------
|
|
|
|
/**
|
|
* This software SPI runs at three rates. The SD software provides an index
|
|
* (spiRate) of 0-6. The mapping is:
|
|
* 0-1 - about 5 MHz peak
|
|
* 2-3 - about 2 MHz peak
|
|
* all others - about 250 KHz
|
|
*/
|
|
|
|
static uint8_t SPI_speed = 0;
|
|
|
|
static uint8_t spiTransfer(uint8_t b) {
|
|
|
|
if (!SPI_speed) { // fastest - about 5 MHz peak
|
|
for (int bits = 0; bits < 8; bits++) {
|
|
if (b & 0x80) {
|
|
WRITE(MOSI_PIN, HIGH);
|
|
WRITE(MOSI_PIN, HIGH); // delay to (hopefully) guarantee setup time
|
|
}
|
|
else {
|
|
WRITE(MOSI_PIN, LOW);
|
|
WRITE(MOSI_PIN, LOW); // delay to (hopefully) guarantee setup time
|
|
}
|
|
b <<= 1;
|
|
WRITE(SCK_PIN, HIGH);
|
|
if (READ(MISO_PIN)) {
|
|
b |= 1;
|
|
}
|
|
WRITE(SCK_PIN, LOW);
|
|
}
|
|
}
|
|
else if (SPI_speed == 1) { // medium - about 1 MHz
|
|
for (int bits = 0; bits < 8; bits++) {
|
|
if (b & 0x80) {
|
|
for (uint8_t i = 0; i < 9; i++) WRITE(MOSI_PIN, HIGH);
|
|
}
|
|
else {
|
|
for (uint8_t i = 0; i < 9; i++) WRITE(MOSI_PIN, LOW);
|
|
}
|
|
b <<= 1;
|
|
|
|
for (uint8_t i = 0; i < 7; i++) WRITE(SCK_PIN, HIGH);
|
|
|
|
if (READ(MISO_PIN)) {
|
|
b |= 1;
|
|
}
|
|
WRITE(SCK_PIN, LOW);
|
|
}
|
|
}
|
|
else { // slow - about 250 KHz
|
|
for (int bits = 0; bits < 8; bits++) {
|
|
if (b & 0x80) {
|
|
WRITE(MOSI_PIN, HIGH);
|
|
}
|
|
else {
|
|
WRITE(MOSI_PIN, LOW);
|
|
}
|
|
b <<= 1;
|
|
delayMicroseconds(1U);
|
|
WRITE(SCK_PIN, HIGH);
|
|
delayMicroseconds(2U);
|
|
|
|
if (READ(MISO_PIN)) {
|
|
b |= 1;
|
|
}
|
|
WRITE(SCK_PIN, LOW);
|
|
delayMicroseconds(1U);
|
|
}
|
|
}
|
|
return b;
|
|
}
|
|
|
|
void spiBegin() {
|
|
SET_OUTPUT(SCK_PIN);
|
|
SET_INPUT(MISO_PIN);
|
|
SET_OUTPUT(MOSI_PIN);
|
|
}
|
|
|
|
void spiInit(uint8_t spiRate) {
|
|
SPI_speed = spiRate >> 1;
|
|
WRITE(MOSI_PIN, HIGH);
|
|
WRITE(SCK_PIN, LOW);
|
|
}
|
|
|
|
uint8_t spiRec() {
|
|
uint8_t b = spiTransfer(0xff);
|
|
return b;
|
|
}
|
|
|
|
void spiRead(uint8_t*buf, uint16_t nbyte) {
|
|
if (nbyte == 0) return;
|
|
for (int i = 0; i < nbyte; i++) {
|
|
buf[i] = spiTransfer(0xff);
|
|
}
|
|
}
|
|
|
|
void spiSend(uint8_t b) {
|
|
uint8_t response = spiTransfer(b);
|
|
UNUSED(response);
|
|
}
|
|
|
|
void spiSend(const uint8_t* buf, size_t n) {
|
|
uint8_t response;
|
|
if (n == 0) return;
|
|
for (uint16_t i = 0; i < n; i++) {
|
|
response = spiTransfer(buf[i]);
|
|
}
|
|
UNUSED(response);
|
|
}
|
|
|
|
void spiSendBlock(uint8_t token, const uint8_t* buf) {
|
|
uint8_t response;
|
|
response = spiTransfer(token);
|
|
|
|
for (uint16_t i = 0; i < 512; i++) {
|
|
response = spiTransfer(buf[i]);
|
|
}
|
|
UNUSED(response);
|
|
WRITE(SS_PIN, HIGH);
|
|
}
|
|
|
|
#else
|
|
|
|
// hardware SPI
|
|
|
|
#include <lpc17xx_pinsel.h>
|
|
#include <lpc17xx_ssp.h>
|
|
#include <lpc17xx_clkpwr.h>
|
|
|
|
void spiBegin() { // setup SCK, MOSI & MISO pins for SSP0
|
|
|
|
PINSEL_CFG_Type PinCfg; // data structure to hold init values
|
|
PinCfg.Funcnum = 2;
|
|
PinCfg.OpenDrain = 0;
|
|
PinCfg.Pinmode = 0;
|
|
PinCfg.Pinnum = LPC1768_PIN_PIN(SCK_PIN);
|
|
PinCfg.Portnum = LPC1768_PIN_PORT(SCK_PIN);
|
|
PINSEL_ConfigPin(&PinCfg);
|
|
SET_OUTPUT(SCK_PIN);
|
|
|
|
PinCfg.Pinnum = LPC1768_PIN_PIN(MISO_PIN);
|
|
PinCfg.Portnum = LPC1768_PIN_PORT(MISO_PIN);
|
|
PINSEL_ConfigPin(&PinCfg);
|
|
SET_INPUT(MISO_PIN);
|
|
|
|
PinCfg.Pinnum = LPC1768_PIN_PIN(MOSI_PIN);
|
|
PinCfg.Portnum = LPC1768_PIN_PORT(MOSI_PIN);
|
|
PINSEL_ConfigPin(&PinCfg);
|
|
SET_OUTPUT(MOSI_PIN);
|
|
}
|
|
|
|
|
|
void spiInit(uint8_t spiRate) {
|
|
|
|
// table to convert Marlin spiRates (0-5 plus default) into bit rates
|
|
uint32_t Marlin_speed[7]; // CPSR is always 2
|
|
Marlin_speed[0] = 8333333; //(SCR: 2) desired: 8,000,000 actual: 8,333,333 +4.2% SPI_FULL_SPEED
|
|
Marlin_speed[1] = 4166667; //(SCR: 5) desired: 4,000,000 actual: 4,166,667 +4.2% SPI_HALF_SPEED
|
|
Marlin_speed[2] = 2083333; //(SCR: 11) desired: 2,000,000 actual: 2,083,333 +4.2% SPI_QUARTER_SPEED
|
|
Marlin_speed[3] = 1000000; //(SCR: 24) desired: 1,000,000 actual: 1,000,000 SPI_EIGHTH_SPEED
|
|
Marlin_speed[4] = 500000; //(SCR: 49) desired: 500,000 actual: 500,000 SPI_SPEED_5
|
|
Marlin_speed[5] = 250000; //(SCR: 99) desired: 250,000 actual: 250,000 SPI_SPEED_6
|
|
Marlin_speed[6] = 125000; //(SCR:199) desired: 125,000 actual: 125,000 Default from HAL.h
|
|
|
|
|
|
// select 50MHz PCLK for SSP0
|
|
CLKPWR_SetPCLKDiv(CLKPWR_PCLKSEL_SSP0, CLKPWR_PCLKSEL_CCLK_DIV_2);
|
|
|
|
// setup for SPI mode
|
|
SSP_CFG_Type HW_SPI_init; // data structure to hold init values
|
|
SSP_ConfigStructInit(&HW_SPI_init); // set values for SPI mode
|
|
HW_SPI_init.ClockRate = Marlin_speed[MIN(spiRate, 6)]; // put in the specified bit rate
|
|
SSP_Init(LPC_SSP0, &HW_SPI_init); // puts the values into the proper bits in the SSP0 registers
|
|
|
|
SSP_Cmd(LPC_SSP0, ENABLE); // start SSP0 running
|
|
}
|
|
|
|
void spiSend(uint8_t b) {
|
|
while (!SSP_GetStatus(LPC_SSP0, SSP_STAT_TXFIFO_NOTFULL)); // wait for room in the buffer
|
|
SSP_SendData(LPC_SSP0, b & 0x00FF);
|
|
while (SSP_GetStatus(LPC_SSP0, SSP_STAT_BUSY)); // wait for it to finish
|
|
}
|
|
|
|
|
|
void spiSend(const uint8_t* buf, size_t n) {
|
|
if (n == 0) return;
|
|
for (uint16_t i = 0; i < n; i++) {
|
|
while (!SSP_GetStatus(LPC_SSP0, SSP_STAT_TXFIFO_NOTFULL)); // wait for room in the buffer
|
|
SSP_SendData(LPC_SSP0, buf[i] & 0x00FF);
|
|
}
|
|
while (SSP_GetStatus(LPC_SSP0, SSP_STAT_BUSY)); // wait for it to finish
|
|
}
|
|
|
|
void spiSend(uint32_t chan, byte b) {
|
|
}
|
|
|
|
void spiSend(uint32_t chan, const uint8_t* buf, size_t n) {
|
|
}
|
|
|
|
|
|
uint8_t get_one_byte() {
|
|
// send a dummy byte so can clock in receive data
|
|
SSP_SendData(LPC_SSP0,0x00FF);
|
|
while (SSP_GetStatus(LPC_SSP0, SSP_STAT_BUSY)); // wait for it to finish
|
|
return SSP_ReceiveData(LPC_SSP0) & 0x00FF;
|
|
}
|
|
|
|
// Read single byte from SPI
|
|
uint8_t spiRec() {
|
|
while (SSP_GetStatus(LPC_SSP0, SSP_STAT_RXFIFO_NOTEMPTY) || SSP_GetStatus(LPC_SSP0, SSP_STAT_BUSY)) SSP_ReceiveData(LPC_SSP0); //flush the receive buffer
|
|
return get_one_byte();
|
|
}
|
|
|
|
uint8_t spiRec(uint32_t chan) {
|
|
return 0;
|
|
}
|
|
|
|
// Read from SPI into buffer
|
|
void spiRead(uint8_t*buf, uint16_t nbyte) {
|
|
while (SSP_GetStatus(LPC_SSP0, SSP_STAT_RXFIFO_NOTEMPTY) || SSP_GetStatus(LPC_SSP0, SSP_STAT_BUSY)) SSP_ReceiveData(LPC_SSP0); //flush the receive buffer
|
|
if (nbyte == 0) return;
|
|
for (int i = 0; i < nbyte; i++) {
|
|
buf[i] = get_one_byte();
|
|
}
|
|
}
|
|
|
|
// Write from buffer to SPI
|
|
void spiSendBlock(uint8_t token, const uint8_t* buf) {
|
|
}
|
|
#endif // ENABLED(LPC_SOFTWARE_SPI)
|
|
|
|
#endif // TARGET_LPC1768
|
|
|