ZG2100 Network interface source

Committer:
donatien
Date:
Fri Jul 09 15:37:23 2010 +0000
Revision:
0:b802fc31f1db
Child:
1:3a7c15057192

        

Who changed what in which revision?

UserRevisionLine numberNew contents of line
donatien 0:b802fc31f1db 1 /**
donatien 0:b802fc31f1db 2 * @file
donatien 0:b802fc31f1db 3 * IGMP - Internet Group Management Protocol
donatien 0:b802fc31f1db 4 *
donatien 0:b802fc31f1db 5 */
donatien 0:b802fc31f1db 6
donatien 0:b802fc31f1db 7 /*
donatien 0:b802fc31f1db 8 * Copyright (c) 2002 CITEL Technologies Ltd.
donatien 0:b802fc31f1db 9 * All rights reserved.
donatien 0:b802fc31f1db 10 *
donatien 0:b802fc31f1db 11 * Redistribution and use in source and binary forms, with or without
donatien 0:b802fc31f1db 12 * modification, are permitted provided that the following conditions
donatien 0:b802fc31f1db 13 * are met:
donatien 0:b802fc31f1db 14 * 1. Redistributions of source code must retain the above copyright
donatien 0:b802fc31f1db 15 * notice, this list of conditions and the following disclaimer.
donatien 0:b802fc31f1db 16 * 2. Redistributions in binary form must reproduce the above copyright
donatien 0:b802fc31f1db 17 * notice, this list of conditions and the following disclaimer in the
donatien 0:b802fc31f1db 18 * documentation and/or other materials provided with the distribution.
donatien 0:b802fc31f1db 19 * 3. Neither the name of CITEL Technologies Ltd nor the names of its contributors
donatien 0:b802fc31f1db 20 * may be used to endorse or promote products derived from this software
donatien 0:b802fc31f1db 21 * without specific prior written permission.
donatien 0:b802fc31f1db 22 *
donatien 0:b802fc31f1db 23 * THIS SOFTWARE IS PROVIDED BY CITEL TECHNOLOGIES AND CONTRIBUTORS ``AS IS''
donatien 0:b802fc31f1db 24 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
donatien 0:b802fc31f1db 25 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
donatien 0:b802fc31f1db 26 * ARE DISCLAIMED. IN NO EVENT SHALL CITEL TECHNOLOGIES OR CONTRIBUTORS BE LIABLE
donatien 0:b802fc31f1db 27 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
donatien 0:b802fc31f1db 28 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
donatien 0:b802fc31f1db 29 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
donatien 0:b802fc31f1db 30 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
donatien 0:b802fc31f1db 31 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
donatien 0:b802fc31f1db 32 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
donatien 0:b802fc31f1db 33 * SUCH DAMAGE.
donatien 0:b802fc31f1db 34 *
donatien 0:b802fc31f1db 35 * This file is a contribution to the lwIP TCP/IP stack.
donatien 0:b802fc31f1db 36 * The Swedish Institute of Computer Science and Adam Dunkels
donatien 0:b802fc31f1db 37 * are specifically granted permission to redistribute this
donatien 0:b802fc31f1db 38 * source code.
donatien 0:b802fc31f1db 39 */
donatien 0:b802fc31f1db 40
donatien 0:b802fc31f1db 41 /*-------------------------------------------------------------
donatien 0:b802fc31f1db 42 Note 1)
donatien 0:b802fc31f1db 43 Although the rfc requires V1 AND V2 capability
donatien 0:b802fc31f1db 44 we will only support v2 since now V1 is very old (August 1989)
donatien 0:b802fc31f1db 45 V1 can be added if required
donatien 0:b802fc31f1db 46
donatien 0:b802fc31f1db 47 a debug print and statistic have been implemented to
donatien 0:b802fc31f1db 48 show this up.
donatien 0:b802fc31f1db 49 -------------------------------------------------------------
donatien 0:b802fc31f1db 50 -------------------------------------------------------------
donatien 0:b802fc31f1db 51 Note 2)
donatien 0:b802fc31f1db 52 A query for a specific group address (as opposed to ALLHOSTS)
donatien 0:b802fc31f1db 53 has now been implemented as I am unsure if it is required
donatien 0:b802fc31f1db 54
donatien 0:b802fc31f1db 55 a debug print and statistic have been implemented to
donatien 0:b802fc31f1db 56 show this up.
donatien 0:b802fc31f1db 57 -------------------------------------------------------------
donatien 0:b802fc31f1db 58 -------------------------------------------------------------
donatien 0:b802fc31f1db 59 Note 3)
donatien 0:b802fc31f1db 60 The router alert rfc 2113 is implemented in outgoing packets
donatien 0:b802fc31f1db 61 but not checked rigorously incoming
donatien 0:b802fc31f1db 62 -------------------------------------------------------------
donatien 0:b802fc31f1db 63 Steve Reynolds
donatien 0:b802fc31f1db 64 ------------------------------------------------------------*/
donatien 0:b802fc31f1db 65
donatien 0:b802fc31f1db 66 /*-----------------------------------------------------------------------------
donatien 0:b802fc31f1db 67 * RFC 988 - Host extensions for IP multicasting - V0
donatien 0:b802fc31f1db 68 * RFC 1054 - Host extensions for IP multicasting -
donatien 0:b802fc31f1db 69 * RFC 1112 - Host extensions for IP multicasting - V1
donatien 0:b802fc31f1db 70 * RFC 2236 - Internet Group Management Protocol, Version 2 - V2 <- this code is based on this RFC (it's the "de facto" standard)
donatien 0:b802fc31f1db 71 * RFC 3376 - Internet Group Management Protocol, Version 3 - V3
donatien 0:b802fc31f1db 72 * RFC 4604 - Using Internet Group Management Protocol Version 3... - V3+
donatien 0:b802fc31f1db 73 * RFC 2113 - IP Router Alert Option -
donatien 0:b802fc31f1db 74 *----------------------------------------------------------------------------*/
donatien 0:b802fc31f1db 75
donatien 0:b802fc31f1db 76 /*-----------------------------------------------------------------------------
donatien 0:b802fc31f1db 77 * Includes
donatien 0:b802fc31f1db 78 *----------------------------------------------------------------------------*/
donatien 0:b802fc31f1db 79
donatien 0:b802fc31f1db 80 #include "lwip/opt.h"
donatien 0:b802fc31f1db 81
donatien 0:b802fc31f1db 82 #if LWIP_IGMP /* don't build if not configured for use in lwipopts.h */
donatien 0:b802fc31f1db 83
donatien 0:b802fc31f1db 84 #include "lwip/igmp.h"
donatien 0:b802fc31f1db 85 #include "lwip/debug.h"
donatien 0:b802fc31f1db 86 #include "lwip/def.h"
donatien 0:b802fc31f1db 87 #include "lwip/mem.h"
donatien 0:b802fc31f1db 88 #include "lwip/ip.h"
donatien 0:b802fc31f1db 89 #include "lwip/inet_chksum.h"
donatien 0:b802fc31f1db 90 #include "lwip/netif.h"
donatien 0:b802fc31f1db 91 #include "lwip/icmp.h"
donatien 0:b802fc31f1db 92 #include "lwip/udp.h"
donatien 0:b802fc31f1db 93 #include "lwip/tcp.h"
donatien 0:b802fc31f1db 94 #include "lwip/stats.h"
donatien 0:b802fc31f1db 95
donatien 0:b802fc31f1db 96 #include "string.h"
donatien 0:b802fc31f1db 97
donatien 0:b802fc31f1db 98 /*
donatien 0:b802fc31f1db 99 * IGMP constants
donatien 0:b802fc31f1db 100 */
donatien 0:b802fc31f1db 101 #define IGMP_TTL 1
donatien 0:b802fc31f1db 102 #define IGMP_MINLEN 8
donatien 0:b802fc31f1db 103 #define ROUTER_ALERT 0x9404
donatien 0:b802fc31f1db 104 #define ROUTER_ALERTLEN 4
donatien 0:b802fc31f1db 105
donatien 0:b802fc31f1db 106 /*
donatien 0:b802fc31f1db 107 * IGMP message types, including version number.
donatien 0:b802fc31f1db 108 */
donatien 0:b802fc31f1db 109 #define IGMP_MEMB_QUERY 0x11 /* Membership query */
donatien 0:b802fc31f1db 110 #define IGMP_V1_MEMB_REPORT 0x12 /* Ver. 1 membership report */
donatien 0:b802fc31f1db 111 #define IGMP_V2_MEMB_REPORT 0x16 /* Ver. 2 membership report */
donatien 0:b802fc31f1db 112 #define IGMP_LEAVE_GROUP 0x17 /* Leave-group message */
donatien 0:b802fc31f1db 113
donatien 0:b802fc31f1db 114 /* Group membership states */
donatien 0:b802fc31f1db 115 #define IGMP_GROUP_NON_MEMBER 0
donatien 0:b802fc31f1db 116 #define IGMP_GROUP_DELAYING_MEMBER 1
donatien 0:b802fc31f1db 117 #define IGMP_GROUP_IDLE_MEMBER 2
donatien 0:b802fc31f1db 118
donatien 0:b802fc31f1db 119 /**
donatien 0:b802fc31f1db 120 * IGMP packet format.
donatien 0:b802fc31f1db 121 */
donatien 0:b802fc31f1db 122 #ifdef PACK_STRUCT_USE_INCLUDES
donatien 0:b802fc31f1db 123 # include "arch/bpstruct.h"
donatien 0:b802fc31f1db 124 #endif
donatien 0:b802fc31f1db 125 PACK_STRUCT_BEGIN
donatien 0:b802fc31f1db 126 struct igmp_msg {
donatien 0:b802fc31f1db 127 PACK_STRUCT_FIELD(u8_t igmp_msgtype);
donatien 0:b802fc31f1db 128 PACK_STRUCT_FIELD(u8_t igmp_maxresp);
donatien 0:b802fc31f1db 129 PACK_STRUCT_FIELD(u16_t igmp_checksum);
donatien 0:b802fc31f1db 130 PACK_STRUCT_FIELD(ip_addr_t igmp_group_address);
donatien 0:b802fc31f1db 131 } PACK_STRUCT_STRUCT;
donatien 0:b802fc31f1db 132 PACK_STRUCT_END
donatien 0:b802fc31f1db 133 #ifdef PACK_STRUCT_USE_INCLUDES
donatien 0:b802fc31f1db 134 # include "arch/epstruct.h"
donatien 0:b802fc31f1db 135 #endif
donatien 0:b802fc31f1db 136
donatien 0:b802fc31f1db 137
donatien 0:b802fc31f1db 138 static struct igmp_group *igmp_lookup_group(struct netif *ifp, ip_addr_t *addr);
donatien 0:b802fc31f1db 139 static err_t igmp_remove_group(struct igmp_group *group);
donatien 0:b802fc31f1db 140 static void igmp_timeout( struct igmp_group *group);
donatien 0:b802fc31f1db 141 static void igmp_start_timer(struct igmp_group *group, u8_t max_time);
donatien 0:b802fc31f1db 142 static void igmp_stop_timer(struct igmp_group *group);
donatien 0:b802fc31f1db 143 static void igmp_delaying_member(struct igmp_group *group, u8_t maxresp);
donatien 0:b802fc31f1db 144 static err_t igmp_ip_output_if(struct pbuf *p, ip_addr_t *src, ip_addr_t *dest, struct netif *netif);
donatien 0:b802fc31f1db 145 static void igmp_send(struct igmp_group *group, u8_t type);
donatien 0:b802fc31f1db 146
donatien 0:b802fc31f1db 147
donatien 0:b802fc31f1db 148 static struct igmp_group* igmp_group_list;
donatien 0:b802fc31f1db 149 static ip_addr_t allsystems;
donatien 0:b802fc31f1db 150 static ip_addr_t allrouters;
donatien 0:b802fc31f1db 151
donatien 0:b802fc31f1db 152
donatien 0:b802fc31f1db 153 /**
donatien 0:b802fc31f1db 154 * Initialize the IGMP module
donatien 0:b802fc31f1db 155 */
donatien 0:b802fc31f1db 156 void
donatien 0:b802fc31f1db 157 igmp_init(void)
donatien 0:b802fc31f1db 158 {
donatien 0:b802fc31f1db 159 LWIP_DEBUGF(IGMP_DEBUG, ("igmp_init: initializing\n"));
donatien 0:b802fc31f1db 160
donatien 0:b802fc31f1db 161 IP4_ADDR(&allsystems, 224, 0, 0, 1);
donatien 0:b802fc31f1db 162 IP4_ADDR(&allrouters, 224, 0, 0, 2);
donatien 0:b802fc31f1db 163 }
donatien 0:b802fc31f1db 164
donatien 0:b802fc31f1db 165 #ifdef LWIP_DEBUG
donatien 0:b802fc31f1db 166 /**
donatien 0:b802fc31f1db 167 * Dump global IGMP groups list
donatien 0:b802fc31f1db 168 */
donatien 0:b802fc31f1db 169 void
donatien 0:b802fc31f1db 170 igmp_dump_group_list()
donatien 0:b802fc31f1db 171 {
donatien 0:b802fc31f1db 172 struct igmp_group *group = igmp_group_list;
donatien 0:b802fc31f1db 173
donatien 0:b802fc31f1db 174 while (group != NULL) {
donatien 0:b802fc31f1db 175 LWIP_DEBUGF(IGMP_DEBUG, ("igmp_dump_group_list: [%"U32_F"] ", (u32_t)(group->group_state)));
donatien 0:b802fc31f1db 176 ip_addr_debug_print(IGMP_DEBUG, &group->group_address);
donatien 0:b802fc31f1db 177 LWIP_DEBUGF(IGMP_DEBUG, (" on if %p\n", group->netif));
donatien 0:b802fc31f1db 178 group = group->next;
donatien 0:b802fc31f1db 179 }
donatien 0:b802fc31f1db 180 LWIP_DEBUGF(IGMP_DEBUG, ("\n"));
donatien 0:b802fc31f1db 181 }
donatien 0:b802fc31f1db 182 #else
donatien 0:b802fc31f1db 183 #define igmp_dump_group_list()
donatien 0:b802fc31f1db 184 #endif /* LWIP_DEBUG */
donatien 0:b802fc31f1db 185
donatien 0:b802fc31f1db 186 /**
donatien 0:b802fc31f1db 187 * Start IGMP processing on interface
donatien 0:b802fc31f1db 188 *
donatien 0:b802fc31f1db 189 * @param netif network interface on which start IGMP processing
donatien 0:b802fc31f1db 190 */
donatien 0:b802fc31f1db 191 err_t
donatien 0:b802fc31f1db 192 igmp_start(struct netif *netif)
donatien 0:b802fc31f1db 193 {
donatien 0:b802fc31f1db 194 struct igmp_group* group;
donatien 0:b802fc31f1db 195
donatien 0:b802fc31f1db 196 LWIP_DEBUGF(IGMP_DEBUG, ("igmp_start: starting IGMP processing on if %p\n", netif));
donatien 0:b802fc31f1db 197
donatien 0:b802fc31f1db 198 group = igmp_lookup_group(netif, &allsystems);
donatien 0:b802fc31f1db 199
donatien 0:b802fc31f1db 200 if (group != NULL) {
donatien 0:b802fc31f1db 201 group->group_state = IGMP_GROUP_IDLE_MEMBER;
donatien 0:b802fc31f1db 202 group->use++;
donatien 0:b802fc31f1db 203
donatien 0:b802fc31f1db 204 /* Allow the igmp messages at the MAC level */
donatien 0:b802fc31f1db 205 if (netif->igmp_mac_filter != NULL) {
donatien 0:b802fc31f1db 206 LWIP_DEBUGF(IGMP_DEBUG, ("igmp_start: igmp_mac_filter(ADD "));
donatien 0:b802fc31f1db 207 ip_addr_debug_print(IGMP_DEBUG, &allsystems);
donatien 0:b802fc31f1db 208 LWIP_DEBUGF(IGMP_DEBUG, (") on if %p\n", netif));
donatien 0:b802fc31f1db 209 netif->igmp_mac_filter(netif, &allsystems, IGMP_ADD_MAC_FILTER);
donatien 0:b802fc31f1db 210 }
donatien 0:b802fc31f1db 211
donatien 0:b802fc31f1db 212 return ERR_OK;
donatien 0:b802fc31f1db 213 }
donatien 0:b802fc31f1db 214
donatien 0:b802fc31f1db 215 return ERR_MEM;
donatien 0:b802fc31f1db 216 }
donatien 0:b802fc31f1db 217
donatien 0:b802fc31f1db 218 /**
donatien 0:b802fc31f1db 219 * Stop IGMP processing on interface
donatien 0:b802fc31f1db 220 *
donatien 0:b802fc31f1db 221 * @param netif network interface on which stop IGMP processing
donatien 0:b802fc31f1db 222 */
donatien 0:b802fc31f1db 223 err_t
donatien 0:b802fc31f1db 224 igmp_stop(struct netif *netif)
donatien 0:b802fc31f1db 225 {
donatien 0:b802fc31f1db 226 struct igmp_group *group = igmp_group_list;
donatien 0:b802fc31f1db 227 struct igmp_group *prev = NULL;
donatien 0:b802fc31f1db 228 struct igmp_group *next;
donatien 0:b802fc31f1db 229
donatien 0:b802fc31f1db 230 /* look for groups joined on this interface further down the list */
donatien 0:b802fc31f1db 231 while (group != NULL) {
donatien 0:b802fc31f1db 232 next = group->next;
donatien 0:b802fc31f1db 233 /* is it a group joined on this interface? */
donatien 0:b802fc31f1db 234 if (group->netif == netif) {
donatien 0:b802fc31f1db 235 /* is it the first group of the list? */
donatien 0:b802fc31f1db 236 if (group == igmp_group_list) {
donatien 0:b802fc31f1db 237 igmp_group_list = next;
donatien 0:b802fc31f1db 238 }
donatien 0:b802fc31f1db 239 /* is there a "previous" group defined? */
donatien 0:b802fc31f1db 240 if (prev != NULL) {
donatien 0:b802fc31f1db 241 prev->next = next;
donatien 0:b802fc31f1db 242 }
donatien 0:b802fc31f1db 243 /* disable the group at the MAC level */
donatien 0:b802fc31f1db 244 if (netif->igmp_mac_filter != NULL) {
donatien 0:b802fc31f1db 245 LWIP_DEBUGF(IGMP_DEBUG, ("igmp_stop: igmp_mac_filter(DEL "));
donatien 0:b802fc31f1db 246 ip_addr_debug_print(IGMP_DEBUG, &group->group_address);
donatien 0:b802fc31f1db 247 LWIP_DEBUGF(IGMP_DEBUG, (") on if %p\n", netif));
donatien 0:b802fc31f1db 248 netif->igmp_mac_filter(netif, &(group->group_address), IGMP_DEL_MAC_FILTER);
donatien 0:b802fc31f1db 249 }
donatien 0:b802fc31f1db 250 /* free group */
donatien 0:b802fc31f1db 251 memp_free(MEMP_IGMP_GROUP, group);
donatien 0:b802fc31f1db 252 } else {
donatien 0:b802fc31f1db 253 /* change the "previous" */
donatien 0:b802fc31f1db 254 prev = group;
donatien 0:b802fc31f1db 255 }
donatien 0:b802fc31f1db 256 /* move to "next" */
donatien 0:b802fc31f1db 257 group = next;
donatien 0:b802fc31f1db 258 }
donatien 0:b802fc31f1db 259 return ERR_OK;
donatien 0:b802fc31f1db 260 }
donatien 0:b802fc31f1db 261
donatien 0:b802fc31f1db 262 /**
donatien 0:b802fc31f1db 263 * Report IGMP memberships for this interface
donatien 0:b802fc31f1db 264 *
donatien 0:b802fc31f1db 265 * @param netif network interface on which report IGMP memberships
donatien 0:b802fc31f1db 266 */
donatien 0:b802fc31f1db 267 void
donatien 0:b802fc31f1db 268 igmp_report_groups(struct netif *netif)
donatien 0:b802fc31f1db 269 {
donatien 0:b802fc31f1db 270 struct igmp_group *group = igmp_group_list;
donatien 0:b802fc31f1db 271
donatien 0:b802fc31f1db 272 LWIP_DEBUGF(IGMP_DEBUG, ("igmp_report_groups: sending IGMP reports on if %p\n", netif));
donatien 0:b802fc31f1db 273
donatien 0:b802fc31f1db 274 while (group != NULL) {
donatien 0:b802fc31f1db 275 if (group->netif == netif) {
donatien 0:b802fc31f1db 276 igmp_delaying_member(group, IGMP_JOIN_DELAYING_MEMBER_TMR);
donatien 0:b802fc31f1db 277 }
donatien 0:b802fc31f1db 278 group = group->next;
donatien 0:b802fc31f1db 279 }
donatien 0:b802fc31f1db 280 }
donatien 0:b802fc31f1db 281
donatien 0:b802fc31f1db 282 /**
donatien 0:b802fc31f1db 283 * Search for a group in the global igmp_group_list
donatien 0:b802fc31f1db 284 *
donatien 0:b802fc31f1db 285 * @param ifp the network interface for which to look
donatien 0:b802fc31f1db 286 * @param addr the group ip address to search for
donatien 0:b802fc31f1db 287 * @return a struct igmp_group* if the group has been found,
donatien 0:b802fc31f1db 288 * NULL if the group wasn't found.
donatien 0:b802fc31f1db 289 */
donatien 0:b802fc31f1db 290 struct igmp_group *
donatien 0:b802fc31f1db 291 igmp_lookfor_group(struct netif *ifp, ip_addr_t *addr)
donatien 0:b802fc31f1db 292 {
donatien 0:b802fc31f1db 293 struct igmp_group *group = igmp_group_list;
donatien 0:b802fc31f1db 294
donatien 0:b802fc31f1db 295 while (group != NULL) {
donatien 0:b802fc31f1db 296 if ((group->netif == ifp) && (ip_addr_cmp(&(group->group_address), addr))) {
donatien 0:b802fc31f1db 297 return group;
donatien 0:b802fc31f1db 298 }
donatien 0:b802fc31f1db 299 group = group->next;
donatien 0:b802fc31f1db 300 }
donatien 0:b802fc31f1db 301
donatien 0:b802fc31f1db 302 /* to be clearer, we return NULL here instead of
donatien 0:b802fc31f1db 303 * 'group' (which is also NULL at this point).
donatien 0:b802fc31f1db 304 */
donatien 0:b802fc31f1db 305 return NULL;
donatien 0:b802fc31f1db 306 }
donatien 0:b802fc31f1db 307
donatien 0:b802fc31f1db 308 /**
donatien 0:b802fc31f1db 309 * Search for a specific igmp group and create a new one if not found-
donatien 0:b802fc31f1db 310 *
donatien 0:b802fc31f1db 311 * @param ifp the network interface for which to look
donatien 0:b802fc31f1db 312 * @param addr the group ip address to search
donatien 0:b802fc31f1db 313 * @return a struct igmp_group*,
donatien 0:b802fc31f1db 314 * NULL on memory error.
donatien 0:b802fc31f1db 315 */
donatien 0:b802fc31f1db 316 struct igmp_group *
donatien 0:b802fc31f1db 317 igmp_lookup_group(struct netif *ifp, ip_addr_t *addr)
donatien 0:b802fc31f1db 318 {
donatien 0:b802fc31f1db 319 struct igmp_group *group = igmp_group_list;
donatien 0:b802fc31f1db 320
donatien 0:b802fc31f1db 321 /* Search if the group already exists */
donatien 0:b802fc31f1db 322 group = igmp_lookfor_group(ifp, addr);
donatien 0:b802fc31f1db 323 if (group != NULL) {
donatien 0:b802fc31f1db 324 /* Group already exists. */
donatien 0:b802fc31f1db 325 return group;
donatien 0:b802fc31f1db 326 }
donatien 0:b802fc31f1db 327
donatien 0:b802fc31f1db 328 /* Group doesn't exist yet, create a new one */
donatien 0:b802fc31f1db 329 group = memp_malloc(MEMP_IGMP_GROUP);
donatien 0:b802fc31f1db 330 if (group != NULL) {
donatien 0:b802fc31f1db 331 group->netif = ifp;
donatien 0:b802fc31f1db 332 ip_addr_set(&(group->group_address), addr);
donatien 0:b802fc31f1db 333 group->timer = 0; /* Not running */
donatien 0:b802fc31f1db 334 group->group_state = IGMP_GROUP_NON_MEMBER;
donatien 0:b802fc31f1db 335 group->last_reporter_flag = 0;
donatien 0:b802fc31f1db 336 group->use = 0;
donatien 0:b802fc31f1db 337 group->next = igmp_group_list;
donatien 0:b802fc31f1db 338
donatien 0:b802fc31f1db 339 igmp_group_list = group;
donatien 0:b802fc31f1db 340 }
donatien 0:b802fc31f1db 341
donatien 0:b802fc31f1db 342 LWIP_DEBUGF(IGMP_DEBUG, ("igmp_lookup_group: %sallocated a new group with address ", (group?"":"impossible to ")));
donatien 0:b802fc31f1db 343 ip_addr_debug_print(IGMP_DEBUG, addr);
donatien 0:b802fc31f1db 344 LWIP_DEBUGF(IGMP_DEBUG, (" on if %p\n", ifp));
donatien 0:b802fc31f1db 345
donatien 0:b802fc31f1db 346 return group;
donatien 0:b802fc31f1db 347 }
donatien 0:b802fc31f1db 348
donatien 0:b802fc31f1db 349 /**
donatien 0:b802fc31f1db 350 * Remove a group in the global igmp_group_list
donatien 0:b802fc31f1db 351 *
donatien 0:b802fc31f1db 352 * @param group the group to remove from the global igmp_group_list
donatien 0:b802fc31f1db 353 * @return ERR_OK if group was removed from the list, an err_t otherwise
donatien 0:b802fc31f1db 354 */
donatien 0:b802fc31f1db 355 static err_t
donatien 0:b802fc31f1db 356 igmp_remove_group(struct igmp_group *group)
donatien 0:b802fc31f1db 357 {
donatien 0:b802fc31f1db 358 err_t err = ERR_OK;
donatien 0:b802fc31f1db 359
donatien 0:b802fc31f1db 360 /* Is it the first group? */
donatien 0:b802fc31f1db 361 if (igmp_group_list == group) {
donatien 0:b802fc31f1db 362 igmp_group_list = group->next;
donatien 0:b802fc31f1db 363 } else {
donatien 0:b802fc31f1db 364 /* look for group further down the list */
donatien 0:b802fc31f1db 365 struct igmp_group *tmpGroup;
donatien 0:b802fc31f1db 366 for (tmpGroup = igmp_group_list; tmpGroup != NULL; tmpGroup = tmpGroup->next) {
donatien 0:b802fc31f1db 367 if (tmpGroup->next == group) {
donatien 0:b802fc31f1db 368 tmpGroup->next = group->next;
donatien 0:b802fc31f1db 369 break;
donatien 0:b802fc31f1db 370 }
donatien 0:b802fc31f1db 371 }
donatien 0:b802fc31f1db 372 /* Group not found in the global igmp_group_list */
donatien 0:b802fc31f1db 373 if (tmpGroup == NULL)
donatien 0:b802fc31f1db 374 err = ERR_ARG;
donatien 0:b802fc31f1db 375 }
donatien 0:b802fc31f1db 376 /* free group */
donatien 0:b802fc31f1db 377 memp_free(MEMP_IGMP_GROUP, group);
donatien 0:b802fc31f1db 378
donatien 0:b802fc31f1db 379 return err;
donatien 0:b802fc31f1db 380 }
donatien 0:b802fc31f1db 381
donatien 0:b802fc31f1db 382 /**
donatien 0:b802fc31f1db 383 * Called from ip_input() if a new IGMP packet is received.
donatien 0:b802fc31f1db 384 *
donatien 0:b802fc31f1db 385 * @param p received igmp packet, p->payload pointing to the ip header
donatien 0:b802fc31f1db 386 * @param inp network interface on which the packet was received
donatien 0:b802fc31f1db 387 * @param dest destination ip address of the igmp packet
donatien 0:b802fc31f1db 388 */
donatien 0:b802fc31f1db 389 void
donatien 0:b802fc31f1db 390 igmp_input(struct pbuf *p, struct netif *inp, ip_addr_t *dest)
donatien 0:b802fc31f1db 391 {
donatien 0:b802fc31f1db 392 struct ip_hdr * iphdr;
donatien 0:b802fc31f1db 393 struct igmp_msg* igmp;
donatien 0:b802fc31f1db 394 struct igmp_group* group;
donatien 0:b802fc31f1db 395 struct igmp_group* groupref;
donatien 0:b802fc31f1db 396
donatien 0:b802fc31f1db 397 IGMP_STATS_INC(igmp.recv);
donatien 0:b802fc31f1db 398
donatien 0:b802fc31f1db 399 /* Note that the length CAN be greater than 8 but only 8 are used - All are included in the checksum */
donatien 0:b802fc31f1db 400 iphdr = p->payload;
donatien 0:b802fc31f1db 401 if (pbuf_header(p, -(s16_t)(IPH_HL(iphdr) * 4)) || (p->len < IGMP_MINLEN)) {
donatien 0:b802fc31f1db 402 pbuf_free(p);
donatien 0:b802fc31f1db 403 IGMP_STATS_INC(igmp.lenerr);
donatien 0:b802fc31f1db 404 LWIP_DEBUGF(IGMP_DEBUG, ("igmp_input: length error\n"));
donatien 0:b802fc31f1db 405 return;
donatien 0:b802fc31f1db 406 }
donatien 0:b802fc31f1db 407
donatien 0:b802fc31f1db 408 LWIP_DEBUGF(IGMP_DEBUG, ("igmp_input: message from "));
donatien 0:b802fc31f1db 409 ip_addr_debug_print(IGMP_DEBUG, &(iphdr->src));
donatien 0:b802fc31f1db 410 LWIP_DEBUGF(IGMP_DEBUG, (" to address "));
donatien 0:b802fc31f1db 411 ip_addr_debug_print(IGMP_DEBUG, &(iphdr->dest));
donatien 0:b802fc31f1db 412 LWIP_DEBUGF(IGMP_DEBUG, (" on if %p\n", inp));
donatien 0:b802fc31f1db 413
donatien 0:b802fc31f1db 414 /* Now calculate and check the checksum */
donatien 0:b802fc31f1db 415 igmp = (struct igmp_msg *)p->payload;
donatien 0:b802fc31f1db 416 if (inet_chksum(igmp, p->len)) {
donatien 0:b802fc31f1db 417 pbuf_free(p);
donatien 0:b802fc31f1db 418 IGMP_STATS_INC(igmp.chkerr);
donatien 0:b802fc31f1db 419 LWIP_DEBUGF(IGMP_DEBUG, ("igmp_input: checksum error\n"));
donatien 0:b802fc31f1db 420 return;
donatien 0:b802fc31f1db 421 }
donatien 0:b802fc31f1db 422
donatien 0:b802fc31f1db 423 /* Packet is ok so find an existing group */
donatien 0:b802fc31f1db 424 group = igmp_lookfor_group(inp, dest); /* use the destination IP address of incoming packet */
donatien 0:b802fc31f1db 425
donatien 0:b802fc31f1db 426 /* If group can be found or create... */
donatien 0:b802fc31f1db 427 if (!group) {
donatien 0:b802fc31f1db 428 pbuf_free(p);
donatien 0:b802fc31f1db 429 IGMP_STATS_INC(igmp.drop);
donatien 0:b802fc31f1db 430 LWIP_DEBUGF(IGMP_DEBUG, ("igmp_input: IGMP frame not for us\n"));
donatien 0:b802fc31f1db 431 return;
donatien 0:b802fc31f1db 432 }
donatien 0:b802fc31f1db 433
donatien 0:b802fc31f1db 434 /* NOW ACT ON THE INCOMING MESSAGE TYPE... */
donatien 0:b802fc31f1db 435 switch (igmp->igmp_msgtype) {
donatien 0:b802fc31f1db 436 case IGMP_MEMB_QUERY: {
donatien 0:b802fc31f1db 437 /* IGMP_MEMB_QUERY to the "all systems" address ? */
donatien 0:b802fc31f1db 438 if ((ip_addr_cmp(dest, &allsystems)) && ip_addr_isany(&igmp->igmp_group_address)) {
donatien 0:b802fc31f1db 439 /* THIS IS THE GENERAL QUERY */
donatien 0:b802fc31f1db 440 LWIP_DEBUGF(IGMP_DEBUG, ("igmp_input: General IGMP_MEMB_QUERY on \"ALL SYSTEMS\" address (224.0.0.1) [igmp_maxresp=%i]\n", (int)(igmp->igmp_maxresp)));
donatien 0:b802fc31f1db 441
donatien 0:b802fc31f1db 442 if (igmp->igmp_maxresp == 0) {
donatien 0:b802fc31f1db 443 IGMP_STATS_INC(igmp.rx_v1);
donatien 0:b802fc31f1db 444 LWIP_DEBUGF(IGMP_DEBUG, ("igmp_input: got an all hosts query with time== 0 - this is V1 and not implemented - treat as v2\n"));
donatien 0:b802fc31f1db 445 igmp->igmp_maxresp = IGMP_V1_DELAYING_MEMBER_TMR;
donatien 0:b802fc31f1db 446 }
donatien 0:b802fc31f1db 447 else {
donatien 0:b802fc31f1db 448 IGMP_STATS_INC(igmp.rx_general);
donatien 0:b802fc31f1db 449 }
donatien 0:b802fc31f1db 450
donatien 0:b802fc31f1db 451 groupref = igmp_group_list;
donatien 0:b802fc31f1db 452 while (groupref) {
donatien 0:b802fc31f1db 453 /* Do not send messages on the all systems group address! */
donatien 0:b802fc31f1db 454 if ((groupref->netif == inp) && (!(ip_addr_cmp(&(groupref->group_address), &allsystems)))) {
donatien 0:b802fc31f1db 455 igmp_delaying_member(groupref, igmp->igmp_maxresp);
donatien 0:b802fc31f1db 456 }
donatien 0:b802fc31f1db 457 groupref = groupref->next;
donatien 0:b802fc31f1db 458 }
donatien 0:b802fc31f1db 459 } else {
donatien 0:b802fc31f1db 460 /* IGMP_MEMB_QUERY to a specific group ? */
donatien 0:b802fc31f1db 461 if (!ip_addr_isany(&igmp->igmp_group_address)) {
donatien 0:b802fc31f1db 462 LWIP_DEBUGF(IGMP_DEBUG, ("igmp_input: IGMP_MEMB_QUERY to a specific group "));
donatien 0:b802fc31f1db 463 ip_addr_debug_print(IGMP_DEBUG, &igmp->igmp_group_address);
donatien 0:b802fc31f1db 464 if (ip_addr_cmp(dest, &allsystems)) {
donatien 0:b802fc31f1db 465 LWIP_DEBUGF(IGMP_DEBUG, (" using \"ALL SYSTEMS\" address (224.0.0.1) [igmp_maxresp=%i]\n", (int)(igmp->igmp_maxresp)));
donatien 0:b802fc31f1db 466 /* we first need to re-lookfor the group since we used dest last time */
donatien 0:b802fc31f1db 467 group = igmp_lookfor_group(inp, &igmp->igmp_group_address);
donatien 0:b802fc31f1db 468 } else {
donatien 0:b802fc31f1db 469 LWIP_DEBUGF(IGMP_DEBUG, (" with the group address as destination [igmp_maxresp=%i]\n", (int)(igmp->igmp_maxresp)));
donatien 0:b802fc31f1db 470 }
donatien 0:b802fc31f1db 471
donatien 0:b802fc31f1db 472 if (group != NULL) {
donatien 0:b802fc31f1db 473 IGMP_STATS_INC(igmp.rx_group);
donatien 0:b802fc31f1db 474 igmp_delaying_member(group, igmp->igmp_maxresp);
donatien 0:b802fc31f1db 475 }
donatien 0:b802fc31f1db 476 else {
donatien 0:b802fc31f1db 477 IGMP_STATS_INC(igmp.drop);
donatien 0:b802fc31f1db 478 }
donatien 0:b802fc31f1db 479 }
donatien 0:b802fc31f1db 480 else {
donatien 0:b802fc31f1db 481 IGMP_STATS_INC(igmp.proterr);
donatien 0:b802fc31f1db 482 }
donatien 0:b802fc31f1db 483 }
donatien 0:b802fc31f1db 484 break;
donatien 0:b802fc31f1db 485 }
donatien 0:b802fc31f1db 486 case IGMP_V2_MEMB_REPORT: {
donatien 0:b802fc31f1db 487 LWIP_DEBUGF(IGMP_DEBUG, ("igmp_input: IGMP_V2_MEMB_REPORT\n"));
donatien 0:b802fc31f1db 488 IGMP_STATS_INC(igmp.rx_report);
donatien 0:b802fc31f1db 489 if (group->group_state == IGMP_GROUP_DELAYING_MEMBER) {
donatien 0:b802fc31f1db 490 /* This is on a specific group we have already looked up */
donatien 0:b802fc31f1db 491 group->timer = 0; /* stopped */
donatien 0:b802fc31f1db 492 group->group_state = IGMP_GROUP_IDLE_MEMBER;
donatien 0:b802fc31f1db 493 group->last_reporter_flag = 0;
donatien 0:b802fc31f1db 494 }
donatien 0:b802fc31f1db 495 break;
donatien 0:b802fc31f1db 496 }
donatien 0:b802fc31f1db 497 default: {
donatien 0:b802fc31f1db 498 LWIP_DEBUGF(IGMP_DEBUG, ("igmp_input: unexpected msg %d in state %d on group %p on if %p\n",
donatien 0:b802fc31f1db 499 igmp->igmp_msgtype, group->group_state, &group, group->netif));
donatien 0:b802fc31f1db 500 IGMP_STATS_INC(igmp.proterr);
donatien 0:b802fc31f1db 501 break;
donatien 0:b802fc31f1db 502 }
donatien 0:b802fc31f1db 503 }
donatien 0:b802fc31f1db 504
donatien 0:b802fc31f1db 505 pbuf_free(p);
donatien 0:b802fc31f1db 506 return;
donatien 0:b802fc31f1db 507 }
donatien 0:b802fc31f1db 508
donatien 0:b802fc31f1db 509 /**
donatien 0:b802fc31f1db 510 * Join a group on one network interface.
donatien 0:b802fc31f1db 511 *
donatien 0:b802fc31f1db 512 * @param ifaddr ip address of the network interface which should join a new group
donatien 0:b802fc31f1db 513 * @param groupaddr the ip address of the group which to join
donatien 0:b802fc31f1db 514 * @return ERR_OK if group was joined on the netif(s), an err_t otherwise
donatien 0:b802fc31f1db 515 */
donatien 0:b802fc31f1db 516 err_t
donatien 0:b802fc31f1db 517 igmp_joingroup(ip_addr_t *ifaddr, ip_addr_t *groupaddr)
donatien 0:b802fc31f1db 518 {
donatien 0:b802fc31f1db 519 err_t err = ERR_VAL; /* no matching interface */
donatien 0:b802fc31f1db 520 struct igmp_group *group;
donatien 0:b802fc31f1db 521 struct netif *netif;
donatien 0:b802fc31f1db 522
donatien 0:b802fc31f1db 523 /* make sure it is multicast address */
donatien 0:b802fc31f1db 524 LWIP_ERROR("igmp_joingroup: attempt to join non-multicast address", ip_addr_ismulticast(groupaddr), return ERR_VAL;);
donatien 0:b802fc31f1db 525 LWIP_ERROR("igmp_joingroup: attempt to join allsystems address", (!ip_addr_cmp(groupaddr, &allsystems)), return ERR_VAL;);
donatien 0:b802fc31f1db 526
donatien 0:b802fc31f1db 527 /* loop through netif's */
donatien 0:b802fc31f1db 528 netif = netif_list;
donatien 0:b802fc31f1db 529 while (netif != NULL) {
donatien 0:b802fc31f1db 530 /* Should we join this interface ? */
donatien 0:b802fc31f1db 531 if ((netif->flags & NETIF_FLAG_IGMP) && ((ip_addr_isany(ifaddr) || ip_addr_cmp(&(netif->ip_addr), ifaddr)))) {
donatien 0:b802fc31f1db 532 /* find group or create a new one if not found */
donatien 0:b802fc31f1db 533 group = igmp_lookup_group(netif, groupaddr);
donatien 0:b802fc31f1db 534
donatien 0:b802fc31f1db 535 if (group != NULL) {
donatien 0:b802fc31f1db 536 /* This should create a new group, check the state to make sure */
donatien 0:b802fc31f1db 537 if (group->group_state != IGMP_GROUP_NON_MEMBER) {
donatien 0:b802fc31f1db 538 LWIP_DEBUGF(IGMP_DEBUG, ("igmp_joingroup: join to group not in state IGMP_GROUP_NON_MEMBER\n"));
donatien 0:b802fc31f1db 539 } else {
donatien 0:b802fc31f1db 540 /* OK - it was new group */
donatien 0:b802fc31f1db 541 LWIP_DEBUGF(IGMP_DEBUG, ("igmp_joingroup: join to new group: "));
donatien 0:b802fc31f1db 542 ip_addr_debug_print(IGMP_DEBUG, groupaddr);
donatien 0:b802fc31f1db 543 LWIP_DEBUGF(IGMP_DEBUG, ("\n"));
donatien 0:b802fc31f1db 544
donatien 0:b802fc31f1db 545 /* If first use of the group, allow the group at the MAC level */
donatien 0:b802fc31f1db 546 if ((group->use==0) && (netif->igmp_mac_filter != NULL)) {
donatien 0:b802fc31f1db 547 LWIP_DEBUGF(IGMP_DEBUG, ("igmp_joingroup: igmp_mac_filter(ADD "));
donatien 0:b802fc31f1db 548 ip_addr_debug_print(IGMP_DEBUG, groupaddr);
donatien 0:b802fc31f1db 549 LWIP_DEBUGF(IGMP_DEBUG, (") on if %p\n", netif));
donatien 0:b802fc31f1db 550 netif->igmp_mac_filter(netif, groupaddr, IGMP_ADD_MAC_FILTER);
donatien 0:b802fc31f1db 551 }
donatien 0:b802fc31f1db 552
donatien 0:b802fc31f1db 553 IGMP_STATS_INC(igmp.tx_join);
donatien 0:b802fc31f1db 554 igmp_send(group, IGMP_V2_MEMB_REPORT);
donatien 0:b802fc31f1db 555
donatien 0:b802fc31f1db 556 igmp_start_timer(group, IGMP_JOIN_DELAYING_MEMBER_TMR);
donatien 0:b802fc31f1db 557
donatien 0:b802fc31f1db 558 /* Need to work out where this timer comes from */
donatien 0:b802fc31f1db 559 group->group_state = IGMP_GROUP_DELAYING_MEMBER;
donatien 0:b802fc31f1db 560 }
donatien 0:b802fc31f1db 561 /* Increment group use */
donatien 0:b802fc31f1db 562 group->use++;
donatien 0:b802fc31f1db 563 /* Join on this interface */
donatien 0:b802fc31f1db 564 err = ERR_OK;
donatien 0:b802fc31f1db 565 } else {
donatien 0:b802fc31f1db 566 /* Return an error even if some network interfaces are joined */
donatien 0:b802fc31f1db 567 /** @todo undo any other netif already joined */
donatien 0:b802fc31f1db 568 LWIP_DEBUGF(IGMP_DEBUG, ("igmp_joingroup: Not enought memory to join to group\n"));
donatien 0:b802fc31f1db 569 return ERR_MEM;
donatien 0:b802fc31f1db 570 }
donatien 0:b802fc31f1db 571 }
donatien 0:b802fc31f1db 572 /* proceed to next network interface */
donatien 0:b802fc31f1db 573 netif = netif->next;
donatien 0:b802fc31f1db 574 }
donatien 0:b802fc31f1db 575
donatien 0:b802fc31f1db 576 return err;
donatien 0:b802fc31f1db 577 }
donatien 0:b802fc31f1db 578
donatien 0:b802fc31f1db 579 /**
donatien 0:b802fc31f1db 580 * Leave a group on one network interface.
donatien 0:b802fc31f1db 581 *
donatien 0:b802fc31f1db 582 * @param ifaddr ip address of the network interface which should leave a group
donatien 0:b802fc31f1db 583 * @param groupaddr the ip address of the group which to leave
donatien 0:b802fc31f1db 584 * @return ERR_OK if group was left on the netif(s), an err_t otherwise
donatien 0:b802fc31f1db 585 */
donatien 0:b802fc31f1db 586 err_t
donatien 0:b802fc31f1db 587 igmp_leavegroup(ip_addr_t *ifaddr, ip_addr_t *groupaddr)
donatien 0:b802fc31f1db 588 {
donatien 0:b802fc31f1db 589 err_t err = ERR_VAL; /* no matching interface */
donatien 0:b802fc31f1db 590 struct igmp_group *group;
donatien 0:b802fc31f1db 591 struct netif *netif;
donatien 0:b802fc31f1db 592
donatien 0:b802fc31f1db 593 /* make sure it is multicast address */
donatien 0:b802fc31f1db 594 LWIP_ERROR("igmp_leavegroup: attempt to leave non-multicast address", ip_addr_ismulticast(groupaddr), return ERR_VAL;);
donatien 0:b802fc31f1db 595 LWIP_ERROR("igmp_leavegroup: attempt to leave allsystems address", (!ip_addr_cmp(groupaddr, &allsystems)), return ERR_VAL;);
donatien 0:b802fc31f1db 596
donatien 0:b802fc31f1db 597 /* loop through netif's */
donatien 0:b802fc31f1db 598 netif = netif_list;
donatien 0:b802fc31f1db 599 while (netif != NULL) {
donatien 0:b802fc31f1db 600 /* Should we leave this interface ? */
donatien 0:b802fc31f1db 601 if ((netif->flags & NETIF_FLAG_IGMP) && ((ip_addr_isany(ifaddr) || ip_addr_cmp(&(netif->ip_addr), ifaddr)))) {
donatien 0:b802fc31f1db 602 /* find group */
donatien 0:b802fc31f1db 603 group = igmp_lookfor_group(netif, groupaddr);
donatien 0:b802fc31f1db 604
donatien 0:b802fc31f1db 605 if (group != NULL) {
donatien 0:b802fc31f1db 606 /* Only send a leave if the flag is set according to the state diagram */
donatien 0:b802fc31f1db 607 LWIP_DEBUGF(IGMP_DEBUG, ("igmp_leavegroup: Leaving group: "));
donatien 0:b802fc31f1db 608 ip_addr_debug_print(IGMP_DEBUG, groupaddr);
donatien 0:b802fc31f1db 609 LWIP_DEBUGF(IGMP_DEBUG, ("\n"));
donatien 0:b802fc31f1db 610
donatien 0:b802fc31f1db 611 /* If there is no other use of the group */
donatien 0:b802fc31f1db 612 if (group->use <= 1) {
donatien 0:b802fc31f1db 613 /* If we are the last reporter for this group */
donatien 0:b802fc31f1db 614 if (group->last_reporter_flag) {
donatien 0:b802fc31f1db 615 LWIP_DEBUGF(IGMP_DEBUG, ("igmp_leavegroup: sending leaving group\n"));
donatien 0:b802fc31f1db 616 IGMP_STATS_INC(igmp.tx_leave);
donatien 0:b802fc31f1db 617 igmp_send(group, IGMP_LEAVE_GROUP);
donatien 0:b802fc31f1db 618 }
donatien 0:b802fc31f1db 619
donatien 0:b802fc31f1db 620 /* Disable the group at the MAC level */
donatien 0:b802fc31f1db 621 if (netif->igmp_mac_filter != NULL) {
donatien 0:b802fc31f1db 622 LWIP_DEBUGF(IGMP_DEBUG, ("igmp_leavegroup: igmp_mac_filter(DEL "));
donatien 0:b802fc31f1db 623 ip_addr_debug_print(IGMP_DEBUG, groupaddr);
donatien 0:b802fc31f1db 624 LWIP_DEBUGF(IGMP_DEBUG, (") on if %p\n", netif));
donatien 0:b802fc31f1db 625 netif->igmp_mac_filter(netif, groupaddr, IGMP_DEL_MAC_FILTER);
donatien 0:b802fc31f1db 626 }
donatien 0:b802fc31f1db 627
donatien 0:b802fc31f1db 628 LWIP_DEBUGF(IGMP_DEBUG, ("igmp_leavegroup: remove group: "));
donatien 0:b802fc31f1db 629 ip_addr_debug_print(IGMP_DEBUG, groupaddr);
donatien 0:b802fc31f1db 630 LWIP_DEBUGF(IGMP_DEBUG, ("\n"));
donatien 0:b802fc31f1db 631
donatien 0:b802fc31f1db 632 /* Free the group */
donatien 0:b802fc31f1db 633 igmp_remove_group(group);
donatien 0:b802fc31f1db 634 } else {
donatien 0:b802fc31f1db 635 /* Decrement group use */
donatien 0:b802fc31f1db 636 group->use--;
donatien 0:b802fc31f1db 637 }
donatien 0:b802fc31f1db 638 /* Leave on this interface */
donatien 0:b802fc31f1db 639 err = ERR_OK;
donatien 0:b802fc31f1db 640 } else {
donatien 0:b802fc31f1db 641 /* It's not a fatal error on "leavegroup" */
donatien 0:b802fc31f1db 642 LWIP_DEBUGF(IGMP_DEBUG, ("igmp_leavegroup: not member of group\n"));
donatien 0:b802fc31f1db 643 }
donatien 0:b802fc31f1db 644 }
donatien 0:b802fc31f1db 645 /* proceed to next network interface */
donatien 0:b802fc31f1db 646 netif = netif->next;
donatien 0:b802fc31f1db 647 }
donatien 0:b802fc31f1db 648
donatien 0:b802fc31f1db 649 return err;
donatien 0:b802fc31f1db 650 }
donatien 0:b802fc31f1db 651
donatien 0:b802fc31f1db 652 /**
donatien 0:b802fc31f1db 653 * The igmp timer function (both for NO_SYS=1 and =0)
donatien 0:b802fc31f1db 654 * Should be called every IGMP_TMR_INTERVAL milliseconds (100 ms is default).
donatien 0:b802fc31f1db 655 */
donatien 0:b802fc31f1db 656 void
donatien 0:b802fc31f1db 657 igmp_tmr(void)
donatien 0:b802fc31f1db 658 {
donatien 0:b802fc31f1db 659 struct igmp_group *group = igmp_group_list;
donatien 0:b802fc31f1db 660
donatien 0:b802fc31f1db 661 while (group != NULL) {
donatien 0:b802fc31f1db 662 if (group->timer > 0) {
donatien 0:b802fc31f1db 663 group->timer--;
donatien 0:b802fc31f1db 664 if (group->timer == 0) {
donatien 0:b802fc31f1db 665 igmp_timeout(group);
donatien 0:b802fc31f1db 666 }
donatien 0:b802fc31f1db 667 }
donatien 0:b802fc31f1db 668 group = group->next;
donatien 0:b802fc31f1db 669 }
donatien 0:b802fc31f1db 670 }
donatien 0:b802fc31f1db 671
donatien 0:b802fc31f1db 672 /**
donatien 0:b802fc31f1db 673 * Called if a timeout for one group is reached.
donatien 0:b802fc31f1db 674 * Sends a report for this group.
donatien 0:b802fc31f1db 675 *
donatien 0:b802fc31f1db 676 * @param group an igmp_group for which a timeout is reached
donatien 0:b802fc31f1db 677 */
donatien 0:b802fc31f1db 678 static void
donatien 0:b802fc31f1db 679 igmp_timeout(struct igmp_group *group)
donatien 0:b802fc31f1db 680 {
donatien 0:b802fc31f1db 681 /* If the state is IGMP_GROUP_DELAYING_MEMBER then we send a report for this group */
donatien 0:b802fc31f1db 682 if (group->group_state == IGMP_GROUP_DELAYING_MEMBER) {
donatien 0:b802fc31f1db 683 LWIP_DEBUGF(IGMP_DEBUG, ("igmp_timeout: report membership for group with address "));
donatien 0:b802fc31f1db 684 ip_addr_debug_print(IGMP_DEBUG, &(group->group_address));
donatien 0:b802fc31f1db 685 LWIP_DEBUGF(IGMP_DEBUG, (" on if %p\n", group->netif));
donatien 0:b802fc31f1db 686
donatien 0:b802fc31f1db 687 IGMP_STATS_INC(igmp.tx_report);
donatien 0:b802fc31f1db 688 igmp_send(group, IGMP_V2_MEMB_REPORT);
donatien 0:b802fc31f1db 689 }
donatien 0:b802fc31f1db 690 }
donatien 0:b802fc31f1db 691
donatien 0:b802fc31f1db 692 /**
donatien 0:b802fc31f1db 693 * Start a timer for an igmp group
donatien 0:b802fc31f1db 694 *
donatien 0:b802fc31f1db 695 * @param group the igmp_group for which to start a timer
donatien 0:b802fc31f1db 696 * @param max_time the time in multiples of IGMP_TMR_INTERVAL (decrease with
donatien 0:b802fc31f1db 697 * every call to igmp_tmr())
donatien 0:b802fc31f1db 698 */
donatien 0:b802fc31f1db 699 static void
donatien 0:b802fc31f1db 700 igmp_start_timer(struct igmp_group *group, u8_t max_time)
donatien 0:b802fc31f1db 701 {
donatien 0:b802fc31f1db 702 /* ensure the input value is > 0 */
donatien 0:b802fc31f1db 703 if (max_time == 0) {
donatien 0:b802fc31f1db 704 max_time = 1;
donatien 0:b802fc31f1db 705 }
donatien 0:b802fc31f1db 706 /* ensure the random value is > 0 */
donatien 0:b802fc31f1db 707 group->timer = (LWIP_RAND() % (max_time - 1)) + 1;
donatien 0:b802fc31f1db 708 }
donatien 0:b802fc31f1db 709
donatien 0:b802fc31f1db 710 /**
donatien 0:b802fc31f1db 711 * Stop a timer for an igmp_group
donatien 0:b802fc31f1db 712 *
donatien 0:b802fc31f1db 713 * @param group the igmp_group for which to stop the timer
donatien 0:b802fc31f1db 714 */
donatien 0:b802fc31f1db 715 static void
donatien 0:b802fc31f1db 716 igmp_stop_timer(struct igmp_group *group)
donatien 0:b802fc31f1db 717 {
donatien 0:b802fc31f1db 718 group->timer = 0;
donatien 0:b802fc31f1db 719 }
donatien 0:b802fc31f1db 720
donatien 0:b802fc31f1db 721 /**
donatien 0:b802fc31f1db 722 * Delaying membership report for a group if necessary
donatien 0:b802fc31f1db 723 *
donatien 0:b802fc31f1db 724 * @param group the igmp_group for which "delaying" membership report
donatien 0:b802fc31f1db 725 * @param maxresp query delay
donatien 0:b802fc31f1db 726 */
donatien 0:b802fc31f1db 727 static void
donatien 0:b802fc31f1db 728 igmp_delaying_member(struct igmp_group *group, u8_t maxresp)
donatien 0:b802fc31f1db 729 {
donatien 0:b802fc31f1db 730 if ((group->group_state == IGMP_GROUP_IDLE_MEMBER) ||
donatien 0:b802fc31f1db 731 ((group->group_state == IGMP_GROUP_DELAYING_MEMBER) &&
donatien 0:b802fc31f1db 732 ((group->timer == 0) || (maxresp < group->timer)))) {
donatien 0:b802fc31f1db 733 igmp_start_timer(group, maxresp);
donatien 0:b802fc31f1db 734 group->group_state = IGMP_GROUP_DELAYING_MEMBER;
donatien 0:b802fc31f1db 735 }
donatien 0:b802fc31f1db 736 }
donatien 0:b802fc31f1db 737
donatien 0:b802fc31f1db 738
donatien 0:b802fc31f1db 739 /**
donatien 0:b802fc31f1db 740 * Sends an IP packet on a network interface. This function constructs the IP header
donatien 0:b802fc31f1db 741 * and calculates the IP header checksum. If the source IP address is NULL,
donatien 0:b802fc31f1db 742 * the IP address of the outgoing network interface is filled in as source address.
donatien 0:b802fc31f1db 743 *
donatien 0:b802fc31f1db 744 * @param p the packet to send (p->payload points to the data, e.g. next
donatien 0:b802fc31f1db 745 protocol header; if dest == IP_HDRINCL, p already includes an IP
donatien 0:b802fc31f1db 746 header and p->payload points to that IP header)
donatien 0:b802fc31f1db 747 * @param src the source IP address to send from (if src == IP_ADDR_ANY, the
donatien 0:b802fc31f1db 748 * IP address of the netif used to send is used as source address)
donatien 0:b802fc31f1db 749 * @param dest the destination IP address to send the packet to
donatien 0:b802fc31f1db 750 * @param ttl the TTL value to be set in the IP header
donatien 0:b802fc31f1db 751 * @param proto the PROTOCOL to be set in the IP header
donatien 0:b802fc31f1db 752 * @param netif the netif on which to send this packet
donatien 0:b802fc31f1db 753 * @return ERR_OK if the packet was sent OK
donatien 0:b802fc31f1db 754 * ERR_BUF if p doesn't have enough space for IP/LINK headers
donatien 0:b802fc31f1db 755 * returns errors returned by netif->output
donatien 0:b802fc31f1db 756 */
donatien 0:b802fc31f1db 757 static err_t
donatien 0:b802fc31f1db 758 igmp_ip_output_if(struct pbuf *p, ip_addr_t *src, ip_addr_t *dest, struct netif *netif)
donatien 0:b802fc31f1db 759 {
donatien 0:b802fc31f1db 760 /* This is the "router alert" option */
donatien 0:b802fc31f1db 761 u16_t ra[2];
donatien 0:b802fc31f1db 762 ra[0] = htons(ROUTER_ALERT);
donatien 0:b802fc31f1db 763 ra[1] = 0x0000; /* Router shall examine packet */
donatien 0:b802fc31f1db 764 IGMP_STATS_INC(igmp.xmit);
donatien 0:b802fc31f1db 765 return ip_output_if_opt(p, src, dest, IGMP_TTL, 0, IP_PROTO_IGMP, netif, ra, ROUTER_ALERTLEN);
donatien 0:b802fc31f1db 766 }
donatien 0:b802fc31f1db 767
donatien 0:b802fc31f1db 768 /**
donatien 0:b802fc31f1db 769 * Send an igmp packet to a specific group.
donatien 0:b802fc31f1db 770 *
donatien 0:b802fc31f1db 771 * @param group the group to which to send the packet
donatien 0:b802fc31f1db 772 * @param type the type of igmp packet to send
donatien 0:b802fc31f1db 773 */
donatien 0:b802fc31f1db 774 static void
donatien 0:b802fc31f1db 775 igmp_send(struct igmp_group *group, u8_t type)
donatien 0:b802fc31f1db 776 {
donatien 0:b802fc31f1db 777 struct pbuf* p = NULL;
donatien 0:b802fc31f1db 778 struct igmp_msg* igmp = NULL;
donatien 0:b802fc31f1db 779 ip_addr_t src = *IP_ADDR_ANY;
donatien 0:b802fc31f1db 780 ip_addr_t* dest = NULL;
donatien 0:b802fc31f1db 781
donatien 0:b802fc31f1db 782 /* IP header + "router alert" option + IGMP header */
donatien 0:b802fc31f1db 783 p = pbuf_alloc(PBUF_TRANSPORT, IGMP_MINLEN, PBUF_RAM);
donatien 0:b802fc31f1db 784
donatien 0:b802fc31f1db 785 if (p) {
donatien 0:b802fc31f1db 786 igmp = p->payload;
donatien 0:b802fc31f1db 787 LWIP_ASSERT("igmp_send: check that first pbuf can hold struct igmp_msg",
donatien 0:b802fc31f1db 788 (p->len >= sizeof(struct igmp_msg)));
donatien 0:b802fc31f1db 789 ip_addr_copy(src, group->netif->ip_addr);
donatien 0:b802fc31f1db 790
donatien 0:b802fc31f1db 791 if (type == IGMP_V2_MEMB_REPORT) {
donatien 0:b802fc31f1db 792 dest = &(group->group_address);
donatien 0:b802fc31f1db 793 ip_addr_copy(igmp->igmp_group_address, group->group_address);
donatien 0:b802fc31f1db 794 group->last_reporter_flag = 1; /* Remember we were the last to report */
donatien 0:b802fc31f1db 795 } else {
donatien 0:b802fc31f1db 796 if (type == IGMP_LEAVE_GROUP) {
donatien 0:b802fc31f1db 797 dest = &allrouters;
donatien 0:b802fc31f1db 798 ip_addr_copy(igmp->igmp_group_address, group->group_address);
donatien 0:b802fc31f1db 799 }
donatien 0:b802fc31f1db 800 }
donatien 0:b802fc31f1db 801
donatien 0:b802fc31f1db 802 if ((type == IGMP_V2_MEMB_REPORT) || (type == IGMP_LEAVE_GROUP)) {
donatien 0:b802fc31f1db 803 igmp->igmp_msgtype = type;
donatien 0:b802fc31f1db 804 igmp->igmp_maxresp = 0;
donatien 0:b802fc31f1db 805 igmp->igmp_checksum = 0;
donatien 0:b802fc31f1db 806 igmp->igmp_checksum = inet_chksum(igmp, IGMP_MINLEN);
donatien 0:b802fc31f1db 807
donatien 0:b802fc31f1db 808 igmp_ip_output_if(p, &src, dest, group->netif);
donatien 0:b802fc31f1db 809 }
donatien 0:b802fc31f1db 810
donatien 0:b802fc31f1db 811 pbuf_free(p);
donatien 0:b802fc31f1db 812 } else {
donatien 0:b802fc31f1db 813 LWIP_DEBUGF(IGMP_DEBUG, ("igmp_send: not enough memory for igmp_send\n"));
donatien 0:b802fc31f1db 814 IGMP_STATS_INC(igmp.memerr);
donatien 0:b802fc31f1db 815 }
donatien 0:b802fc31f1db 816 }
donatien 0:b802fc31f1db 817
donatien 0:b802fc31f1db 818 #endif /* LWIP_IGMP */