Committer:
mbed714
Date:
Sat Sep 18 23:05:49 2010 +0000
Revision:
0:d616ece2d859

        

Who changed what in which revision?

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