309 lines
		
	
	
		
			8.4 KiB
		
	
	
	
		
			C
		
	
	
	
	
	
			
		
		
	
	
			309 lines
		
	
	
		
			8.4 KiB
		
	
	
	
		
			C
		
	
	
	
	
	
| /**
 | |
|   ******************************************************************************
 | |
|   * @file    netconf.c
 | |
|   * @author  MCD Application Team
 | |
|   * @version V1.1.0
 | |
|   * @date    31-July-2013
 | |
|   * @brief   Network connection configuration
 | |
|   ******************************************************************************
 | |
|   * @attention
 | |
|   *
 | |
|   * <h2><center>© COPYRIGHT 2013 STMicroelectronics</center></h2>
 | |
|   *
 | |
|   * Licensed under MCD-ST Liberty SW License Agreement V2, (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.st.com/software_license_agreement_liberty_v2
 | |
|   *
 | |
|   * 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.
 | |
|   *
 | |
|   ******************************************************************************
 | |
|   */
 | |
| 
 | |
| /* Includes ------------------------------------------------------------------*/
 | |
| #include "lwip/tcpip.h"
 | |
| #include "stm32f4xx.h"
 | |
| #include "lwip/mem.h"
 | |
| #include "lwip/memp.h"
 | |
| #include "lwip/tcp.h"
 | |
| #include "lwip/tcp_impl.h"
 | |
| #include "lwip/udp.h"
 | |
| #include "netif/etharp.h"
 | |
| #include "lwip/dhcp.h"
 | |
| #include "ethernetif.h"
 | |
| #include "stm32f4x7_eth_bsp.h"
 | |
| #include "netconf.h"
 | |
| #include <stdio.h>
 | |
| #include "dev_flash.h"
 | |
| 
 | |
| 
 | |
| 
 | |
| /* Private typedef -----------------------------------------------------------*/
 | |
| #define MAX_DHCP_TRIES        4
 | |
| 
 | |
| /* Private define ------------------------------------------------------------*/
 | |
| /* Private macro -------------------------------------------------------------*/
 | |
| /* Private variables ---------------------------------------------------------*/
 | |
| struct netif gnetif;
 | |
| uint32_t TCPTimer = 0;
 | |
| uint32_t ARPTimer = 0;
 | |
| uint32_t IPaddress = 0;
 | |
| 
 | |
| #ifdef USE_DHCP
 | |
| uint32_t DHCPfineTimer = 0;
 | |
| uint32_t DHCPcoarseTimer = 0;
 | |
| __IO uint8_t DHCP_state;
 | |
| #endif
 | |
| extern __IO uint32_t  EthStatus;
 | |
| 
 | |
| /* Private functions ---------------------------------------------------------*/
 | |
| void LwIP_DHCP_Process_Handle(void);
 | |
| /**
 | |
| * @brief  Initializes the lwIP stack
 | |
| * @param  None
 | |
| * @retval None
 | |
| */
 | |
| void LwIP_Init(void)
 | |
| {
 | |
|   struct ip_addr ipaddr;
 | |
|   struct ip_addr netmask;
 | |
|   struct ip_addr gw;
 | |
| #ifndef USE_DHCP
 | |
|   uint8_t iptab[4] = {0};
 | |
|   uint8_t iptxt[20];
 | |
| #endif
 | |
| 
 | |
|   /* Initializes the dynamic memory heap defined by MEM_SIZE.*/
 | |
|   //mem_init();
 | |
| 
 | |
|   /* Initializes the memory pools defined by MEMP_NUM_x.*/
 | |
|   // memp_init();
 | |
|   
 | |
|   tcpip_init(NULL,NULL);
 | |
| 
 | |
| #ifdef USE_DHCP
 | |
|   ipaddr.addr = 0;
 | |
|   netmask.addr = 0;
 | |
|   gw.addr = 0;
 | |
| #else
 | |
|   const uint8_t *ip=sys_param()->local_ip;
 | |
|   IP4_ADDR(&ipaddr, ip[0], ip[1], ip[2], ip[3]);
 | |
|   IP4_ADDR(&netmask, 255, 255 , 255, 0);
 | |
|   IP4_ADDR(&gw, ip[0], ip[1], ip[2], 1);
 | |
| #endif  
 | |
|   
 | |
|   /* - netif_add(struct netif *netif, struct ip_addr *ipaddr,
 | |
|   struct ip_addr *netmask, struct ip_addr *gw,
 | |
|   void *state, err_t (* init)(struct netif *netif),
 | |
|   err_t (* input)(struct pbuf *p, struct netif *netif))
 | |
| 
 | |
|   Adds your network interface to the netif_list. Allocate a struct
 | |
|   netif and pass a pointer to this structure as the first argument.
 | |
|   Give pointers to cleared ip_addr structures when using DHCP,
 | |
|   or fill them with sane numbers otherwise. The state pointer may be NULL.
 | |
| 
 | |
|   The init function pointer must point to a initialization function for
 | |
|   your ethernet netif interface. The following code illustrates it's use.*/
 | |
|   netif_add(&gnetif, &ipaddr, &netmask, &gw, NULL, ðernetif_init, ðernet_input);
 | |
| 
 | |
|   /*  Registers the default network interface.*/
 | |
|   netif_set_default(&gnetif);
 | |
| 
 | |
|   if (EthStatus == (ETH_INIT_FLAG | ETH_LINK_FLAG))
 | |
|   { 
 | |
|     /* Set Ethernet link flag */
 | |
|     gnetif.flags |= NETIF_FLAG_LINK_UP;
 | |
| 
 | |
|     /* When the netif is fully configured this function must be called.*/
 | |
|     netif_set_up(&gnetif);
 | |
| #ifdef USE_DHCP
 | |
|     DHCP_state = DHCP_START;
 | |
| #endif /* USE_DHCP */
 | |
|   }
 | |
|   else
 | |
|   {
 | |
|     /*  When the netif link is down this function must be called.*/
 | |
|     netif_set_down(&gnetif);
 | |
| #ifdef USE_DHCP
 | |
|     DHCP_state = DHCP_LINK_DOWN;
 | |
| #endif /* USE_DHCP */
 | |
|   }
 | |
|   
 | |
|   /* Set the link callback function, this function is called on change of link status*/
 | |
|   netif_set_link_callback(&gnetif, ETH_link_callback);
 | |
| }
 | |
| 
 | |
| /**
 | |
| * @brief  Called when a frame is received
 | |
| * @param  None
 | |
| * @retval None
 | |
| */
 | |
| void LwIP_Pkt_Handle(void)
 | |
| {
 | |
|   /* Read a received packet from the Ethernet buffers and send it to the lwIP for handling */
 | |
|   //ethernetif_input(&gnetif);
 | |
| }
 | |
| 
 | |
| /**
 | |
| * @brief  LwIP periodic tasks
 | |
| * @param  localtime the current LocalTime value
 | |
| * @retval None
 | |
| */
 | |
| void LwIP_Periodic_Handle(__IO uint32_t localtime)
 | |
| {
 | |
| #if LWIP_TCP
 | |
|   /* TCP periodic process every 250 ms */
 | |
|   if (localtime - TCPTimer >= TCP_TMR_INTERVAL)
 | |
|   {
 | |
|     TCPTimer =  localtime;
 | |
|     tcp_tmr();
 | |
|   }
 | |
| #endif
 | |
| 
 | |
|   /* ARP periodic process every 5s */
 | |
|   if ((localtime - ARPTimer) >= ARP_TMR_INTERVAL)
 | |
|   {
 | |
|     ARPTimer =  localtime;
 | |
|     etharp_tmr();
 | |
|   }
 | |
| 
 | |
| #ifdef USE_DHCP
 | |
|   /* Fine DHCP periodic process every 500ms */
 | |
|   if (localtime - DHCPfineTimer >= DHCP_FINE_TIMER_MSECS)
 | |
|   {
 | |
|     DHCPfineTimer =  localtime;
 | |
|     dhcp_fine_tmr();
 | |
|     if ((DHCP_state != DHCP_ADDRESS_ASSIGNED) && 
 | |
|         (DHCP_state != DHCP_TIMEOUT) &&
 | |
|           (DHCP_state != DHCP_LINK_DOWN))
 | |
|     {
 | |
|       /* toggle LED1 to indicate DHCP on-going process */
 | |
|       STM_EVAL_LEDToggle(LED1);
 | |
| 
 | |
|       /* process DHCP state machine */
 | |
|       LwIP_DHCP_Process_Handle();    
 | |
|     }
 | |
|   }
 | |
| 
 | |
|   /* DHCP Coarse periodic process every 60s */
 | |
|   if (localtime - DHCPcoarseTimer >= DHCP_COARSE_TIMER_MSECS)
 | |
|   {
 | |
|     DHCPcoarseTimer =  localtime;
 | |
|     dhcp_coarse_tmr();
 | |
|   }
 | |
|   
 | |
| #endif
 | |
| }
 | |
| 
 | |
| #ifdef USE_DHCP
 | |
| /**
 | |
| * @brief  LwIP_DHCP_Process_Handle
 | |
| * @param  None
 | |
| * @retval None
 | |
| */
 | |
| void LwIP_DHCP_Process_Handle()
 | |
| {
 | |
|   struct ip_addr ipaddr;
 | |
|   struct ip_addr netmask;
 | |
|   struct ip_addr gw;
 | |
|   uint8_t iptab[4] = {0};
 | |
|   uint8_t iptxt[20];
 | |
| 
 | |
|   switch (DHCP_state)
 | |
|   {
 | |
|   case DHCP_START:
 | |
|     {
 | |
|       DHCP_state = DHCP_WAIT_ADDRESS;
 | |
|       dhcp_start(&gnetif);
 | |
|       /* IP address should be set to 0 
 | |
|          every time we want to assign a new DHCP address */
 | |
|       IPaddress = 0;
 | |
| #ifdef USE_LCD
 | |
|       LCD_DisplayStringLine(Line4, (uint8_t*)"     Looking for    ");
 | |
|       LCD_DisplayStringLine(Line5, (uint8_t*)"     DHCP server    ");
 | |
|       LCD_DisplayStringLine(Line6, (uint8_t*)"     please wait... ");
 | |
| #endif
 | |
|     }
 | |
|     break;
 | |
|     
 | |
|   case DHCP_WAIT_ADDRESS:
 | |
|     {
 | |
|       /* Read the new IP address */
 | |
|       IPaddress = gnetif.ip_addr.addr;
 | |
| 
 | |
|       if (IPaddress!=0) 
 | |
|       {
 | |
|         DHCP_state = DHCP_ADDRESS_ASSIGNED;	
 | |
| 
 | |
|         /* Stop DHCP */
 | |
|         dhcp_stop(&gnetif);
 | |
| 
 | |
| #ifdef USE_LCD      
 | |
|         iptab[0] = (uint8_t)(IPaddress >> 24);
 | |
|         iptab[1] = (uint8_t)(IPaddress >> 16);
 | |
|         iptab[2] = (uint8_t)(IPaddress >> 8);
 | |
|         iptab[3] = (uint8_t)(IPaddress);
 | |
| 
 | |
|         sprintf((char*)iptxt, " %d.%d.%d.%d", iptab[3], iptab[2], iptab[1], iptab[0]);
 | |
| 
 | |
|         LCD_ClearLine(Line4);
 | |
|         LCD_ClearLine(Line5);
 | |
|         LCD_ClearLine(Line6);
 | |
| 
 | |
|         /* Display the IP address */
 | |
|         LCD_DisplayStringLine(Line7, (uint8_t*)"IP address assigned ");
 | |
|         LCD_DisplayStringLine(Line8, (uint8_t*)"  by a DHCP server  ");
 | |
|         LCD_DisplayStringLine(Line9, iptxt);
 | |
| #endif
 | |
|         STM_EVAL_LEDOn(LED1);
 | |
|       }
 | |
|       else
 | |
|       {
 | |
|         /* DHCP timeout */
 | |
|         if (gnetif.dhcp->tries > MAX_DHCP_TRIES)
 | |
|         {
 | |
|           DHCP_state = DHCP_TIMEOUT;
 | |
| 
 | |
|           /* Stop DHCP */
 | |
|           dhcp_stop(&gnetif);
 | |
| 
 | |
|           /* Static address used */
 | |
|           IP4_ADDR(&ipaddr, IP_ADDR0 ,IP_ADDR1 , IP_ADDR2 , IP_ADDR3 );
 | |
|           IP4_ADDR(&netmask, NETMASK_ADDR0, NETMASK_ADDR1, NETMASK_ADDR2, NETMASK_ADDR3);
 | |
|           IP4_ADDR(&gw, GW_ADDR0, GW_ADDR1, GW_ADDR2, GW_ADDR3);
 | |
|           netif_set_addr(&gnetif, &ipaddr , &netmask, &gw);
 | |
| 
 | |
| #ifdef USE_LCD   
 | |
|           LCD_DisplayStringLine(Line7, (uint8_t*)"    DHCP timeout    ");
 | |
| 
 | |
|           iptab[0] = IP_ADDR3;
 | |
|           iptab[1] = IP_ADDR2;
 | |
|           iptab[2] = IP_ADDR1;
 | |
|           iptab[3] = IP_ADDR0;
 | |
| 
 | |
|           sprintf((char*)iptxt, "  %d.%d.%d.%d", iptab[3], iptab[2], iptab[1], iptab[0]);
 | |
| 
 | |
|           LCD_ClearLine(Line4);
 | |
|           LCD_ClearLine(Line5);
 | |
|           LCD_ClearLine(Line6);
 | |
| 
 | |
|           LCD_DisplayStringLine(Line8, (uint8_t*)"  Static IP address   ");
 | |
|           LCD_DisplayStringLine(Line9, iptxt);
 | |
| #endif
 | |
|           STM_EVAL_LEDOn(LED1);
 | |
|         }
 | |
|       }
 | |
|     }
 | |
|     break;
 | |
|   default: break;
 | |
|   }
 | |
| }
 | |
| #endif
 | |
| 
 | |
| /************************ (C) COPYRIGHT STMicroelectronics *****END OF FILE****/
 | 
