Annotation of embedaddon/ipsec-tools/src/racoon/vendorid.c, revision 1.1.1.1

1.1       misho       1: /*     $NetBSD: vendorid.c,v 1.8 2009/09/01 12:22:09 tteras Exp $      */
                      2: 
                      3: /* Id: vendorid.c,v 1.10 2006/02/22 16:10:21 vanhu 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: #include <ctype.h>
                     44: 
                     45: #include "var.h"
                     46: #include "misc.h"
                     47: #include "vmbuf.h"
                     48: #include "plog.h"
                     49: #include "debug.h"
                     50: 
                     51: #include "localconf.h"
                     52: #include "isakmp_var.h"
                     53: #include "isakmp.h"
                     54: #include "vendorid.h"
                     55: #include "crypto_openssl.h"
                     56: #include "handler.h"
                     57: #include "remoteconf.h"
                     58: #ifdef ENABLE_NATT
                     59: #include "nattraversal.h"
                     60: #endif
                     61: #ifdef ENABLE_HYBRID
                     62: #include <resolv.h>
                     63: #include "isakmp_xauth.h"
                     64: #include "isakmp_cfg.h"
                     65: #endif
                     66: 
                     67: static struct vendor_id all_vendor_ids[] = {
                     68: { VENDORID_IPSEC_TOOLS, "IPSec-Tools" },
                     69: { VENDORID_GSSAPI_LONG, "A GSS-API Authentication Method for IKE" },
                     70: { VENDORID_GSSAPI     , "GSSAPI" },
                     71: { VENDORID_MS_NT5     , "MS NT5 ISAKMPOAKLEY" },
                     72: { VENDORID_NATT_00    , "draft-ietf-ipsec-nat-t-ike-00" },
                     73: { VENDORID_NATT_01    , "draft-ietf-ipsec-nat-t-ike-01" },
                     74: { VENDORID_NATT_02    , "draft-ietf-ipsec-nat-t-ike-02" },
                     75: { VENDORID_NATT_02_N  , "draft-ietf-ipsec-nat-t-ike-02\n" },
                     76: { VENDORID_NATT_03    , "draft-ietf-ipsec-nat-t-ike-03" },
                     77: { VENDORID_NATT_04    , "draft-ietf-ipsec-nat-t-ike-04" },
                     78: { VENDORID_NATT_05    , "draft-ietf-ipsec-nat-t-ike-05" },
                     79: { VENDORID_NATT_06    , "draft-ietf-ipsec-nat-t-ike-06" },
                     80: { VENDORID_NATT_07    , "draft-ietf-ipsec-nat-t-ike-07" },
                     81: { VENDORID_NATT_08    , "draft-ietf-ipsec-nat-t-ike-08" },
                     82: { VENDORID_NATT_RFC   , "RFC 3947" },
                     83: { VENDORID_XAUTH      , "draft-ietf-ipsra-isakmp-xauth-06.txt" },
                     84: { VENDORID_UNITY      , "CISCO-UNITY" },
                     85: { VENDORID_FRAG       , "FRAGMENTATION" },
                     86: /* Just a readable string for DPD ... */
                     87: { VENDORID_DPD        , "DPD" },
                     88: /* Other known Vendor IDs */
                     89: { VENDORID_KAME       , "KAME/racoon" },
                     90: };
                     91: 
                     92: #define NUMVENDORIDS   (sizeof(all_vendor_ids)/sizeof(all_vendor_ids[0]))
                     93: 
                     94: #define DPD_MAJOR_VERSION      0x01
                     95: #define DPD_MINOR_VERSION      0x00
                     96: 
                     97: const char vendorid_dpd_hash[] = {
                     98:        0xAF, 0xCA, 0xD7, 0x13,
                     99:        0x68, 0xA1, 0xF1, 0xC9,
                    100:        0x6B, 0x86, 0x96, 0xFC,
                    101:        0x77, 0x57, DPD_MAJOR_VERSION, DPD_MINOR_VERSION
                    102: };
                    103: 
                    104: 
                    105: static vchar_t *vendorid_fixup(int, vchar_t *t);
                    106: 
                    107: static struct vendor_id *
                    108: lookup_vendor_id_by_id (int id)
                    109: {
                    110:        int i;
                    111: 
                    112:        for (i = 0; i < NUMVENDORIDS; i++)
                    113:                if (all_vendor_ids[i].id == id)
                    114:                        return &all_vendor_ids[i];
                    115: 
                    116:        return NULL;
                    117: }
                    118: 
                    119: const char *
                    120: vid_string_by_id (int id)
                    121: {
                    122:        struct vendor_id *current;
                    123: 
                    124:        if (id == VENDORID_DPD)
                    125:                return vendorid_dpd_hash;
                    126: 
                    127:        current = lookup_vendor_id_by_id(id);
                    128: 
                    129:        return current ? current->string : NULL;
                    130: }
                    131: 
                    132: static struct vendor_id *
                    133: lookup_vendor_id_by_hash (const char *hash)
                    134: {
                    135:        int i;
                    136:        unsigned char *h = (unsigned char *)hash;
                    137: 
                    138:        for (i = 0; i < NUMVENDORIDS; i++)
                    139:                if (strncmp(all_vendor_ids[i].hash->v, hash,
                    140:                            all_vendor_ids[i].hash->l) == 0)
                    141:                        return &all_vendor_ids[i];
                    142: 
                    143:        return NULL;
                    144: }
                    145: 
                    146: void
                    147: compute_vendorids (void)
                    148: {
                    149:        int i;
                    150:        vchar_t vid;
                    151: 
                    152:        for (i = 0; i < NUMVENDORIDS; i++) {
                    153:                /* VENDORID_DPD is not a MD5 sum... */
                    154:                if(all_vendor_ids[i].id == VENDORID_DPD){
                    155:                        all_vendor_ids[i].hash = vmalloc(sizeof(vendorid_dpd_hash));
                    156:                        if (all_vendor_ids[i].hash == NULL) {
                    157:                                plog(LLV_ERROR, LOCATION, NULL,
                    158:                                        "unable to get memory for VID hash\n");
                    159:                                exit(1); /* this really shouldn't happen */
                    160:                        }
                    161:                        memcpy(all_vendor_ids[i].hash->v, vendorid_dpd_hash,
                    162:                                   sizeof(vendorid_dpd_hash));
                    163:                        continue;
                    164:                }
                    165: 
                    166:                vid.v = (char *) all_vendor_ids[i].string;
                    167:                vid.l = strlen(vid.v);
                    168: 
                    169:                all_vendor_ids[i].hash = eay_md5_one(&vid);
                    170:                if (all_vendor_ids[i].hash == NULL)
                    171:                        plog(LLV_ERROR, LOCATION, NULL,
                    172:                            "unable to hash vendor ID string\n");
                    173: 
                    174:                /* Special cases */
                    175:                all_vendor_ids[i].hash =
                    176:                        vendorid_fixup(all_vendor_ids[i].id,
                    177:                                       all_vendor_ids[i].hash);
                    178:        }
                    179: }
                    180: 
                    181: /*
                    182:  * set hashed vendor id.
                    183:  * hash function is always MD5.
                    184:  */
                    185: vchar_t *
                    186: set_vendorid(int vendorid)
                    187: {
                    188:        struct vendor_id *current;
                    189:        vchar_t vid, *new;
                    190: 
                    191:        if (vendorid == VENDORID_UNKNOWN) {
                    192:                /*
                    193:                 * The default unknown ID gets translated to
                    194:                 * KAME/racoon.
                    195:                 */
                    196:                vendorid = VENDORID_DEFAULT;
                    197:        }
                    198: 
                    199:        current = lookup_vendor_id_by_id(vendorid);
                    200:        if (current == NULL) {
                    201:                plog(LLV_ERROR, LOCATION, NULL,
                    202:                    "invalid vendor ID index: %d\n", vendorid);
                    203:                return (NULL);
                    204:        }
                    205: 
                    206:        /* The rest of racoon expects a private copy 
                    207:         * of the VID that could be free'd after use.
                    208:         * That's why we don't return the original pointer. */
                    209:        return vdup(current->hash);
                    210: }
                    211: 
                    212: /*
                    213:  * Check the vendor ID payload -- return the vendor ID index
                    214:  * if we find a recognized one, or UNKNOWN if we don't.
                    215:  *
                    216:  * gen ... points to Vendor ID payload.
                    217:  */
                    218: static int
                    219: check_vendorid(struct isakmp_gen *gen)
                    220: {
                    221:        vchar_t vid, *vidhash;
                    222:        int i, vidlen;
                    223:        struct vendor_id *current;
                    224: 
                    225:        if (gen == NULL)
                    226:                return (VENDORID_UNKNOWN);
                    227: 
                    228:        vidlen = ntohs(gen->len) - sizeof(*gen);
                    229: 
                    230:        current = lookup_vendor_id_by_hash((char *)(gen + 1));
                    231:        if (!current)
                    232:                goto unknown;
                    233:        
                    234:        if (current->hash->l < vidlen)
                    235:                plog(LLV_INFO, LOCATION, NULL,
                    236:                     "received broken Microsoft ID: %s\n",
                    237:                     current->string);
                    238:        else
                    239:                plog(LLV_INFO, LOCATION, NULL,
                    240:                     "received Vendor ID: %s\n",
                    241:                     current->string);
                    242: 
                    243:        return current->id;
                    244: 
                    245: unknown:
                    246:        plog(LLV_DEBUG, LOCATION, NULL, "received unknown Vendor ID\n");
                    247:        plogdump(LLV_DEBUG, (char *)(gen + 1), vidlen);
                    248:        return (VENDORID_UNKNOWN);
                    249: }
                    250: 
                    251: int
                    252: handle_vendorid(struct ph1handle *iph1, struct isakmp_gen *gen)
                    253: {
                    254:        int vid_numeric;
                    255: 
                    256:        vid_numeric = check_vendorid(gen);
                    257:        if (vid_numeric == VENDORID_UNKNOWN)
                    258:                return vid_numeric;
                    259: 
                    260:        iph1->vendorid_mask |= BIT(vid_numeric);
                    261: 
                    262: #ifdef ENABLE_NATT
                    263:        if (natt_vendorid(vid_numeric))
                    264:                natt_handle_vendorid(iph1, vid_numeric);
                    265: #endif
                    266: #ifdef ENABLE_HYBRID
                    267:        switch (vid_numeric) {
                    268:        case VENDORID_XAUTH:
                    269:                iph1->mode_cfg->flags |= ISAKMP_CFG_VENDORID_XAUTH;
                    270:                break;
                    271:        case VENDORID_UNITY:
                    272:                iph1->mode_cfg->flags |= ISAKMP_CFG_VENDORID_UNITY;
                    273:                break;
                    274:        default:
                    275:                break;
                    276:        }
                    277: #endif
                    278: #ifdef ENABLE_DPD
                    279:        if (vid_numeric == VENDORID_DPD &&
                    280:            (iph1->rmconf == NULL || iph1->rmconf->dpd)) {
                    281:                iph1->dpd_support = 1;
                    282:                plog(LLV_DEBUG, LOCATION, NULL, "remote supports DPD\n");
                    283:        }
                    284: #endif
                    285: 
                    286:        return vid_numeric;
                    287: }
                    288: 
                    289: static vchar_t * 
                    290: vendorid_fixup(vendorid, vidhash)
                    291:        int vendorid;            
                    292:        vchar_t *vidhash;
                    293: {                         
                    294:        switch(vendorid) {
                    295:        case VENDORID_XAUTH: {  /* The vendor Id is truncated */
                    296:                vchar_t *tmp;                                       
                    297:                                  
                    298:                if ((tmp = vmalloc(8)) == NULL) {
                    299:                        plog(LLV_ERROR, LOCATION, NULL,
                    300:                            "unable to hash vendor ID string\n");
                    301:                        return NULL;                                
                    302:                }                       
                    303:                  
                    304:                memcpy(tmp->v, vidhash->v, 8);
                    305:                vfree(vidhash);           
                    306:                vidhash = tmp;
                    307:                                   
                    308:                break;
                    309:        } 
                    310:        case VENDORID_UNITY:    /* Two bytes tweak */
                    311:                vidhash->v[14] = 0x01;            
                    312:                vidhash->v[15] = 0x00;
                    313:                break;             
                    314: 
                    315:        default:     
                    316:                break;
                    317:        }               
                    318:        
                    319:        return vidhash;
                    320: }                       

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