Merge branch 'upstream'
[linux-2.6] / net / netfilter / xt_sctp.c
1 #include <linux/module.h>
2 #include <linux/skbuff.h>
3 #include <net/ip.h>
4 #include <net/ipv6.h>
5 #include <linux/sctp.h>
6
7 #include <linux/netfilter/x_tables.h>
8 #include <linux/netfilter/xt_sctp.h>
9 #include <linux/netfilter_ipv4/ip_tables.h>
10 #include <linux/netfilter_ipv6/ip6_tables.h>
11
12 MODULE_LICENSE("GPL");
13 MODULE_AUTHOR("Kiran Kumar Immidi");
14 MODULE_DESCRIPTION("Match for SCTP protocol packets");
15 MODULE_ALIAS("ipt_sctp");
16
17 #ifdef DEBUG_SCTP
18 #define duprintf(format, args...) printk(format , ## args)
19 #else
20 #define duprintf(format, args...)
21 #endif
22
23 #define SCCHECK(cond, option, flag, invflag) (!((flag) & (option)) \
24                                               || (!!((invflag) & (option)) ^ (cond)))
25
26 static int
27 match_flags(const struct xt_sctp_flag_info *flag_info,
28             const int flag_count,
29             u_int8_t chunktype,
30             u_int8_t chunkflags)
31 {
32         int i;
33
34         for (i = 0; i < flag_count; i++) {
35                 if (flag_info[i].chunktype == chunktype) {
36                         return (chunkflags & flag_info[i].flag_mask) == flag_info[i].flag;
37                 }
38         }
39
40         return 1;
41 }
42
43 static inline int
44 match_packet(const struct sk_buff *skb,
45              unsigned int offset,
46              const u_int32_t *chunkmap,
47              int chunk_match_type,
48              const struct xt_sctp_flag_info *flag_info,
49              const int flag_count,
50              int *hotdrop)
51 {
52         u_int32_t chunkmapcopy[256 / sizeof (u_int32_t)];
53         sctp_chunkhdr_t _sch, *sch;
54
55 #ifdef DEBUG_SCTP
56         int i = 0;
57 #endif
58
59         if (chunk_match_type == SCTP_CHUNK_MATCH_ALL) {
60                 SCTP_CHUNKMAP_COPY(chunkmapcopy, chunkmap);
61         }
62
63         do {
64                 sch = skb_header_pointer(skb, offset, sizeof(_sch), &_sch);
65                 if (sch == NULL) {
66                         duprintf("Dropping invalid SCTP packet.\n");
67                         *hotdrop = 1;
68                         return 0;
69                 }
70
71                 duprintf("Chunk num: %d\toffset: %d\ttype: %d\tlength: %d\tflags: %x\n", 
72                                 ++i, offset, sch->type, htons(sch->length), sch->flags);
73
74                 offset += (htons(sch->length) + 3) & ~3;
75
76                 duprintf("skb->len: %d\toffset: %d\n", skb->len, offset);
77
78                 if (SCTP_CHUNKMAP_IS_SET(chunkmap, sch->type)) {
79                         switch (chunk_match_type) {
80                         case SCTP_CHUNK_MATCH_ANY:
81                                 if (match_flags(flag_info, flag_count, 
82                                         sch->type, sch->flags)) {
83                                         return 1;
84                                 }
85                                 break;
86
87                         case SCTP_CHUNK_MATCH_ALL:
88                                 if (match_flags(flag_info, flag_count, 
89                                         sch->type, sch->flags)) {
90                                         SCTP_CHUNKMAP_CLEAR(chunkmapcopy, sch->type);
91                                 }
92                                 break;
93
94                         case SCTP_CHUNK_MATCH_ONLY:
95                                 if (!match_flags(flag_info, flag_count, 
96                                         sch->type, sch->flags)) {
97                                         return 0;
98                                 }
99                                 break;
100                         }
101                 } else {
102                         switch (chunk_match_type) {
103                         case SCTP_CHUNK_MATCH_ONLY:
104                                 return 0;
105                         }
106                 }
107         } while (offset < skb->len);
108
109         switch (chunk_match_type) {
110         case SCTP_CHUNK_MATCH_ALL:
111                 return SCTP_CHUNKMAP_IS_CLEAR(chunkmap);
112         case SCTP_CHUNK_MATCH_ANY:
113                 return 0;
114         case SCTP_CHUNK_MATCH_ONLY:
115                 return 1;
116         }
117
118         /* This will never be reached, but required to stop compiler whine */
119         return 0;
120 }
121
122 static int
123 match(const struct sk_buff *skb,
124       const struct net_device *in,
125       const struct net_device *out,
126       const struct xt_match *match,
127       const void *matchinfo,
128       int offset,
129       unsigned int protoff,
130       int *hotdrop)
131 {
132         const struct xt_sctp_info *info;
133         sctp_sctphdr_t _sh, *sh;
134
135         info = (const struct xt_sctp_info *)matchinfo;
136
137         if (offset) {
138                 duprintf("Dropping non-first fragment.. FIXME\n");
139                 return 0;
140         }
141         
142         sh = skb_header_pointer(skb, protoff, sizeof(_sh), &_sh);
143         if (sh == NULL) {
144                 duprintf("Dropping evil TCP offset=0 tinygram.\n");
145                 *hotdrop = 1;
146                 return 0;
147         }
148         duprintf("spt: %d\tdpt: %d\n", ntohs(sh->source), ntohs(sh->dest));
149
150         return  SCCHECK(((ntohs(sh->source) >= info->spts[0]) 
151                         && (ntohs(sh->source) <= info->spts[1])), 
152                         XT_SCTP_SRC_PORTS, info->flags, info->invflags)
153                 && SCCHECK(((ntohs(sh->dest) >= info->dpts[0]) 
154                         && (ntohs(sh->dest) <= info->dpts[1])), 
155                         XT_SCTP_DEST_PORTS, info->flags, info->invflags)
156                 && SCCHECK(match_packet(skb, protoff,
157                                         info->chunkmap, info->chunk_match_type,
158                                         info->flag_info, info->flag_count, 
159                                         hotdrop),
160                            XT_SCTP_CHUNK_TYPES, info->flags, info->invflags);
161 }
162
163 static int
164 checkentry(const char *tablename,
165            const void *inf,
166            const struct xt_match *match,
167            void *matchinfo,
168            unsigned int matchsize,
169            unsigned int hook_mask)
170 {
171         const struct xt_sctp_info *info = matchinfo;
172
173         return !(info->flags & ~XT_SCTP_VALID_FLAGS)
174                 && !(info->invflags & ~XT_SCTP_VALID_FLAGS)
175                 && !(info->invflags & ~info->flags)
176                 && ((!(info->flags & XT_SCTP_CHUNK_TYPES)) || 
177                         (info->chunk_match_type &
178                                 (SCTP_CHUNK_MATCH_ALL 
179                                 | SCTP_CHUNK_MATCH_ANY
180                                 | SCTP_CHUNK_MATCH_ONLY)));
181 }
182
183 static struct xt_match sctp_match = {
184         .name           = "sctp",
185         .match          = match,
186         .matchsize      = sizeof(struct xt_sctp_info),
187         .proto          = IPPROTO_SCTP,
188         .checkentry     = checkentry,
189         .family         = AF_INET,
190         .me             = THIS_MODULE
191 };
192
193 static struct xt_match sctp6_match = {
194         .name           = "sctp",
195         .match          = match,
196         .matchsize      = sizeof(struct xt_sctp_info),
197         .proto          = IPPROTO_SCTP,
198         .checkentry     = checkentry,
199         .family         = AF_INET6,
200         .me             = THIS_MODULE
201 };
202
203 static int __init init(void)
204 {
205         int ret;
206         ret = xt_register_match(&sctp_match);
207         if (ret)
208                 return ret;
209
210         ret = xt_register_match(&sctp6_match);
211         if (ret)
212                 xt_unregister_match(&sctp_match);
213
214         return ret;
215 }
216
217 static void __exit fini(void)
218 {
219         xt_unregister_match(&sctp6_match);
220         xt_unregister_match(&sctp_match);
221 }
222
223 module_init(init);
224 module_exit(fini);