123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162 |
- /**
- * 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/>.
- *
- */
-
- // adapted from I2C/master/master.c example
- // https://www-users.cs.york.ac.uk/~pcc/MCP/HAPR-Course-web/CMSIS/examples/html/master_8c_source.html
-
- #ifdef TARGET_LPC1768
-
- #ifdef __cplusplus
- extern "C" {
- #endif
-
- #include <lpc17xx_i2c.h>
- #include <lpc17xx_pinsel.h>
- #include <lpc17xx_libcfg_default.h>
-
- //////////////////////////////////////////////////////////////////////////////////////
-
- // These two routines are exact copies of the lpc17xx_i2c.c routines. Couldn't link to
- // to the lpc17xx_i2c.c routines so had to copy them into this file & rename them.
-
- static uint32_t _I2C_Start (LPC_I2C_TypeDef *I2Cx) {
- // Reset STA, STO, SI
- I2Cx->I2CONCLR = I2C_I2CONCLR_SIC|I2C_I2CONCLR_STOC|I2C_I2CONCLR_STAC;
-
- // Enter to Master Transmitter mode
- I2Cx->I2CONSET = I2C_I2CONSET_STA;
-
- // Wait for complete
- while (!(I2Cx->I2CONSET & I2C_I2CONSET_SI));
- I2Cx->I2CONCLR = I2C_I2CONCLR_STAC;
- return (I2Cx->I2STAT & I2C_STAT_CODE_BITMASK);
- }
-
- static void _I2C_Stop (LPC_I2C_TypeDef *I2Cx) {
- /* Make sure start bit is not active */
- if (I2Cx->I2CONSET & I2C_I2CONSET_STA)
- I2Cx->I2CONCLR = I2C_I2CONCLR_STAC;
-
- I2Cx->I2CONSET = I2C_I2CONSET_STO|I2C_I2CONSET_AA;
- I2Cx->I2CONCLR = I2C_I2CONCLR_SIC;
- }
-
-
- //////////////////////////////////////////////////////////////////////////////////////
-
-
- #define USEDI2CDEV_M 1 // use I2C1 controller
-
- #if (USEDI2CDEV_M == 0)
- #define I2CDEV_M LPC_I2C0
- #elif (USEDI2CDEV_M == 1)
- #define I2CDEV_M LPC_I2C1
- #elif (USEDI2CDEV_M == 2)
- #define I2CDEV_M LPC_I2C2
- #else
- #error "Master I2C device not defined!"
- #endif
-
-
- PINSEL_CFG_Type PinCfg;
- I2C_M_SETUP_Type transferMCfg;
-
- #define I2C_status (LPC_I2C1->I2STAT & I2C_STAT_CODE_BITMASK)
-
-
- uint8_t digipot_mcp4451_start(uint8_t sla) { // send slave address and write bit
- // Sometimes TX data ACK or NAK status is returned. That mean the start state didn't
- // happen which means only the value of the slave address was send. Keep looping until
- // the slave address and write bit are actually sent.
- do{
- _I2C_Stop(I2CDEV_M); // output stop state on I2C bus
- _I2C_Start(I2CDEV_M); // output start state on I2C bus
- while ((I2C_status != I2C_I2STAT_M_TX_START)
- && (I2C_status != I2C_I2STAT_M_TX_RESTART)
- && (I2C_status != I2C_I2STAT_M_TX_DAT_ACK)
- && (I2C_status != I2C_I2STAT_M_TX_DAT_NACK)); //wait for start to be asserted
-
- LPC_I2C1->I2CONCLR = I2C_I2CONCLR_STAC; // clear start state before tansmitting slave address
- LPC_I2C1->I2DAT = (sla <<1) & I2C_I2DAT_BITMASK; // transmit slave address & write bit
- LPC_I2C1->I2CONSET = I2C_I2CONSET_AA;
- LPC_I2C1->I2CONCLR = I2C_I2CONCLR_SIC;
- while ((I2C_status != I2C_I2STAT_M_TX_SLAW_ACK)
- && (I2C_status != I2C_I2STAT_M_TX_SLAW_NACK)
- && (I2C_status != I2C_I2STAT_M_TX_DAT_ACK)
- && (I2C_status != I2C_I2STAT_M_TX_DAT_NACK)); //wait for slaw to finish
- }while ( (I2C_status == I2C_I2STAT_M_TX_DAT_ACK) || (I2C_status == I2C_I2STAT_M_TX_DAT_NACK));
- return 1;
- }
-
-
- void digipot_mcp4451_init(void) {
-
- /**
- * Init I2C pin connect
- */
- PinCfg.OpenDrain = 0;
- PinCfg.Pinmode = 0;
- #if ((USEDI2CDEV_M == 0))
- PinCfg.Funcnum = 1;
- PinCfg.Pinnum = 27;
- PinCfg.Portnum = 0;
- PINSEL_ConfigPin(&PinCfg); // SDA0 / D57 AUX-1
- PinCfg.Pinnum = 28;
- PINSEL_ConfigPin(&PinCfg); // SCL0 / D58 AUX-1
- #endif
- #if ((USEDI2CDEV_M == 1))
- PinCfg.Funcnum = 3;
- PinCfg.Pinnum = 0;
- PinCfg.Portnum = 0;
- PINSEL_ConfigPin(&PinCfg); // SDA1 / D20 SCA
- PinCfg.Pinnum = 1;
- PINSEL_ConfigPin(&PinCfg); // SCL1 / D21 SCL
- #endif
- #if ((USEDI2CDEV_M == 2))
- PinCfg.Funcnum = 2;
- PinCfg.Pinnum = 10;
- PinCfg.Portnum = 0;
- PINSEL_ConfigPin(&PinCfg); // SDA2 / D38 X_ENABLE_PIN
- PinCfg.Pinnum = 11;
- PINSEL_ConfigPin(&PinCfg); // SCL2 / D55 X_DIR_PIN
- #endif
- // Initialize I2C peripheral
- I2C_Init(I2CDEV_M, 400000); // hardwired to 400KHz bit rate, 100KHz is the other option
-
- /* Enable Master I2C operation */
- I2C_Cmd(I2CDEV_M, I2C_MASTER_MODE, ENABLE);
- }
-
-
- uint8_t digipot_mcp4451_send_byte(uint8_t data) {
- LPC_I2C1->I2DAT = data & I2C_I2DAT_BITMASK; // transmit data
- LPC_I2C1->I2CONSET = I2C_I2CONSET_AA;
- LPC_I2C1->I2CONCLR = I2C_I2CONCLR_SIC;
- while ((I2C_status != I2C_I2STAT_M_TX_DAT_ACK) && (I2C_status != I2C_I2STAT_M_TX_DAT_NACK)); // wait for xmit to finish
- return 1;
- }
-
- #ifdef __cplusplus
- }
- #endif
-
- #endif // TARGET_LPC1768
|