NetTribute library with debug turned on in FShandler Donatien Garner -> Segundo Equipo -> this version

Committer:
hexley
Date:
Fri Nov 19 01:54:45 2010 +0000
Revision:
0:281d6ff68967

        

Who changed what in which revision?

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