123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305 |
- /**
- * 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 < 8; i++) WRITE(MOSI_PIN, HIGH);
- }
- else {
- for (uint8_t i = 0; i < 8; i++) WRITE(MOSI_PIN, LOW);
- }
- b <<= 1;
-
- for (uint8_t i = 0; i < 6; 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);
- }
-
- static 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 = pin_map[SCK_PIN].pin;
- PinCfg.Portnum = pin_map[SCK_PIN].port;
- PINSEL_ConfigPin(&PinCfg);
- SET_OUTPUT(SCK_PIN);
-
- PinCfg.Pinnum = pin_map[MISO_PIN].pin;
- PinCfg.Portnum = pin_map[MISO_PIN].port;
- PINSEL_ConfigPin(&PinCfg);
- SET_INPUT(MISO_PIN);
-
- PinCfg.Pinnum = pin_map[MOSI_PIN].pin;
- PinCfg.Portnum = pin_map[MOSI_PIN].port;
- 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
|