Copy of NetServicesMin with the HTTP Client library. Includes modification for HTTP servers which send the HTTP status line in its own packet.

Committer:
andrewbonney
Date:
Thu May 26 10:02:40 2011 +0000
Revision:
0:18dd877d2c77

        

Who changed what in which revision?

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