Annotation of embedaddon/ipsec-tools/src/racoon/isakmp_newg.c, revision 1.1

1.1     ! misho       1: /*     $NetBSD: isakmp_newg.c,v 1.4 2006/09/09 16:22:09 manu Exp $     */
        !             2: 
        !             3: /*     $KAME: isakmp_newg.c,v 1.10 2002/09/27 05:55:52 itojun Exp $    */
        !             4: 
        !             5: /*
        !             6:  * Copyright (C) 1995, 1996, 1997, and 1998 WIDE Project.
        !             7:  * All rights reserved.
        !             8:  * 
        !             9:  * Redistribution and use in source and binary forms, with or without
        !            10:  * modification, are permitted provided that the following conditions
        !            11:  * are met:
        !            12:  * 1. Redistributions of source code must retain the above copyright
        !            13:  *    notice, this list of conditions and the following disclaimer.
        !            14:  * 2. Redistributions in binary form must reproduce the above copyright
        !            15:  *    notice, this list of conditions and the following disclaimer in the
        !            16:  *    documentation and/or other materials provided with the distribution.
        !            17:  * 3. Neither the name of the project nor the names of its contributors
        !            18:  *    may be used to endorse or promote products derived from this software
        !            19:  *    without specific prior written permission.
        !            20:  * 
        !            21:  * THIS SOFTWARE IS PROVIDED BY THE PROJECT AND CONTRIBUTORS ``AS IS'' AND
        !            22:  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
        !            23:  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
        !            24:  * ARE DISCLAIMED.  IN NO EVENT SHALL THE PROJECT OR CONTRIBUTORS BE LIABLE
        !            25:  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
        !            26:  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
        !            27:  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
        !            28:  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
        !            29:  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
        !            30:  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
        !            31:  * SUCH DAMAGE.
        !            32:  */
        !            33: 
        !            34: #include "config.h"
        !            35: 
        !            36: #include <sys/types.h>
        !            37: #include <sys/param.h>
        !            38: 
        !            39: #include <stdlib.h>
        !            40: #include <stdio.h>
        !            41: #include <string.h>
        !            42: #include <errno.h>
        !            43: 
        !            44: #include "var.h"
        !            45: #include "misc.h"
        !            46: #include "vmbuf.h"
        !            47: #include "plog.h"
        !            48: #include "sockmisc.h"
        !            49: #include "debug.h"
        !            50: 
        !            51: #include "schedule.h"
        !            52: #include "cfparse_proto.h"
        !            53: #include "isakmp_var.h"
        !            54: #include "isakmp.h"
        !            55: #include "isakmp_newg.h"
        !            56: #include "oakley.h"
        !            57: #include "ipsec_doi.h"
        !            58: #include "crypto_openssl.h"
        !            59: #include "handler.h"
        !            60: #include "pfkey.h"
        !            61: #include "admin.h"
        !            62: #include "str2val.h"
        !            63: #include "vendorid.h"
        !            64: 
        !            65: /*
        !            66:  * New group mode as responder
        !            67:  */
        !            68: int
        !            69: isakmp_newgroup_r(iph1, msg)
        !            70:        struct ph1handle *iph1;
        !            71:        vchar_t *msg;
        !            72: {
        !            73: #if 0
        !            74:        struct isakmp *isakmp = (struct isakmp *)msg->v;
        !            75:        struct isakmp_pl_hash *hash = NULL;
        !            76:        struct isakmp_pl_sa *sa = NULL;
        !            77:        int error = -1;
        !            78:        vchar_t *buf;
        !            79:        struct oakley_sa *osa;
        !            80:        int len;
        !            81: 
        !            82:        /* validate the type of next payload */
        !            83:        /*
        !            84:         * ISAKMP_ETYPE_NEWGRP,
        !            85:         * ISAKMP_NPTYPE_HASH, (ISAKMP_NPTYPE_VID), ISAKMP_NPTYPE_SA,
        !            86:         * ISAKMP_NPTYPE_NONE
        !            87:         */
        !            88:     {
        !            89:        vchar_t *pbuf = NULL;
        !            90:        struct isakmp_parse_t *pa;
        !            91: 
        !            92:        if ((pbuf = isakmp_parse(msg)) == NULL)
        !            93:                goto end;
        !            94: 
        !            95:        for (pa = (struct isakmp_parse_t *)pbuf->v;
        !            96:             pa->type != ISAKMP_NPTYPE_NONE;
        !            97:             pa++) {
        !            98: 
        !            99:                switch (pa->type) {
        !           100:                case ISAKMP_NPTYPE_HASH:
        !           101:                        if (hash) {
        !           102:                                isakmp_info_send_n1(iph1, ISAKMP_NTYPE_INVALID_PAYLOAD_TYPE, NULL);
        !           103:                                plog(LLV_ERROR, LOCATION, iph1->remote,
        !           104:                                        "received multiple payload type %d.\n",
        !           105:                                        pa->type);
        !           106:                                vfree(pbuf);
        !           107:                                goto end;
        !           108:                        }
        !           109:                        hash = (struct isakmp_pl_hash *)pa->ptr;
        !           110:                        break;
        !           111:                case ISAKMP_NPTYPE_SA:
        !           112:                        if (sa) {
        !           113:                                isakmp_info_send_n1(iph1, ISAKMP_NTYPE_INVALID_PAYLOAD_TYPE, NULL);
        !           114:                                plog(LLV_ERROR, LOCATION, iph1->remote,
        !           115:                                        "received multiple payload type %d.\n",
        !           116:                                        pa->type);
        !           117:                                vfree(pbuf);
        !           118:                                goto end;
        !           119:                        }
        !           120:                        sa = (struct isakmp_pl_sa *)pa->ptr;
        !           121:                        break;
        !           122:                case ISAKMP_NPTYPE_VID:
        !           123:                        (void)check_vendorid(pa->ptr);
        !           124:                        break;
        !           125:                default:
        !           126:                        isakmp_info_send_n1(iph1, ISAKMP_NTYPE_INVALID_PAYLOAD_TYPE, NULL);
        !           127:                        plog(LLV_ERROR, LOCATION, iph1->remote,
        !           128:                                "ignore the packet, "
        !           129:                                "received unexpecting payload type %d.\n",
        !           130:                                pa->type);
        !           131:                        vfree(pbuf);
        !           132:                        goto end;
        !           133:                }
        !           134:        }
        !           135:        vfree(pbuf);
        !           136: 
        !           137:        if (!hash || !sa) {
        !           138:                isakmp_info_send_n1(iph1, ISAKMP_NTYPE_INVALID_PAYLOAD_TYPE, NULL);
        !           139:                plog(LLV_ERROR, LOCATION, iph1->remote,
        !           140:                        "no HASH, or no SA payload.\n");
        !           141:                goto end;
        !           142:        }
        !           143:     }
        !           144: 
        !           145:        /* validate HASH */
        !           146:     {
        !           147:        char *r_hash;
        !           148:        vchar_t *my_hash = NULL;
        !           149:        int result;
        !           150: 
        !           151:        plog(LLV_DEBUG, LOCATION, NULL, "validate HASH\n");
        !           152: 
        !           153:        len = sizeof(isakmp->msgid) + ntohs(sa->h.len);
        !           154:        buf = vmalloc(len);
        !           155:        if (buf == NULL) {
        !           156:                plog(LLV_ERROR, LOCATION, NULL,
        !           157:                        "failed to get buffer to send.\n");
        !           158:                goto end;
        !           159:        }
        !           160:        memcpy(buf->v, &isakmp->msgid, sizeof(isakmp->msgid));
        !           161:        memcpy(buf->v + sizeof(isakmp->msgid), sa, ntohs(sa->h.len));
        !           162: 
        !           163:        plog(LLV_DEBUG, LOCATION, NULL, "hash source\n");
        !           164:        plogdump(LLV_DEBUG, buf->v, buf->l);
        !           165: 
        !           166:        my_hash = isakmp_prf(iph1->skeyid_a, buf, iph1);
        !           167:        vfree(buf);
        !           168:        if (my_hash == NULL)
        !           169:                goto end;
        !           170: 
        !           171:        plog(LLV_DEBUG, LOCATION, NULL, "hash result\n");
        !           172:        plogdump(LLV_DEBUG, my_hash->v, my_hash->l);
        !           173: 
        !           174:        r_hash = (char *)hash + sizeof(*hash);
        !           175: 
        !           176:        plog(LLV_DEBUG, LOCATION, NULL, "original hash\n"));
        !           177:        plogdump(LLV_DEBUG, r_hash, ntohs(hash->h.len) - sizeof(*hash)));
        !           178: 
        !           179:        result = memcmp(my_hash->v, r_hash, my_hash->l);
        !           180:        vfree(my_hash);
        !           181: 
        !           182:        if (result) {
        !           183:                plog(LLV_ERROR, LOCATION, iph1->remote,
        !           184:                        "HASH mismatch.\n");
        !           185:                isakmp_info_send_n1(iph1, ISAKMP_NTYPE_INVALID_HASH_INFORMATION, NULL);
        !           186:                goto end;
        !           187:        }
        !           188:     }
        !           189: 
        !           190:        /* check SA payload and get new one for use */
        !           191:        buf = ipsecdoi_get_proposal((struct ipsecdoi_sa *)sa,
        !           192:                                        OAKLEY_NEWGROUP_MODE);
        !           193:        if (buf == NULL) {
        !           194:                isakmp_info_send_n1(iph1, ISAKMP_NTYPE_ATTRIBUTES_NOT_SUPPORTED, NULL);
        !           195:                goto end;
        !           196:        }
        !           197: 
        !           198:        /* save sa parameters */
        !           199:        osa = ipsecdoi_get_oakley(buf);
        !           200:        if (osa == NULL) {
        !           201:                isakmp_info_send_n1(iph1, ISAKMP_NTYPE_ATTRIBUTES_NOT_SUPPORTED, NULL);
        !           202:                goto end;
        !           203:        }
        !           204:        vfree(buf);
        !           205: 
        !           206:        switch (osa->dhgrp) {
        !           207:        case OAKLEY_ATTR_GRP_DESC_MODP768:
        !           208:        case OAKLEY_ATTR_GRP_DESC_MODP1024:
        !           209:        case OAKLEY_ATTR_GRP_DESC_MODP1536:
        !           210:                /*XXX*/
        !           211:        default:
        !           212:                isakmp_info_send_n1(iph1, ISAKMP_NTYPE_ATTRIBUTES_NOT_SUPPORTED, NULL);
        !           213:                plog(LLV_ERROR, LOCATION, NULL,
        !           214:                        "dh group %d isn't supported.\n", osa->dhgrp);
        !           215:                goto end;
        !           216:        }
        !           217: 
        !           218:        plog(LLV_INFO, LOCATION, iph1->remote,
        !           219:                "got new dh group %s.\n", isakmp_pindex(&iph1->index, 0));
        !           220: 
        !           221:        error = 0;
        !           222: 
        !           223: end:
        !           224:        if (error) {
        !           225:                if (iph1 != NULL)
        !           226:                        (void)isakmp_free_ph1(iph1);
        !           227:        }
        !           228:        return error;
        !           229: #endif
        !           230:        return 0;
        !           231: }
        !           232: 

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>