src/lib/krb5/krb/copy_princ.c

   1 /*
   2  * lib/krb5/krb/copy_princ.c
   3  *
   4  * Copyright 1990 by the Massachusetts Institute of Technology.
   5  * All Rights Reserved.
   6  *
   7  * Export of this software from the United States of America may
   8  *   require a specific license from the United States Government.
   9  *   It is the responsibility of any person or organization contemplating
  10  *   export to obtain such a license before exporting.
  11  *
  12  * WITHIN THAT CONSTRAINT, permission to use, copy, modify, and
  13  * distribute this software and its documentation for any purpose and
  14  * without fee is hereby granted, provided that the above copyright
  15  * notice appear in all copies and that both that copyright notice and
  16  * this permission notice appear in supporting documentation, and that
  17  * the name of M.I.T. not be used in advertising or publicity pertaining
  18  * to distribution of the software without specific, written prior
  19  * permission.  M.I.T. makes no representations about the suitability of
  20  * this software for any purpose.  It is provided "as is" without express
  21  * or implied warranty.
  22  *
  23  *
  24  * krb5_copy_principal()
  25  */
  26
  27 #include "k5-int.h"
  28
  29 /*
  30  * Copy a principal structure, with fresh allocation.
  31  */
  32 krb5_error_code
  33 krb5_copy_principal(context, inprinc, outprinc)
  34     krb5_context context;
  35     krb5_const_principal inprinc;
  36     krb5_principal *outprinc;
  37 {
  38     register krb5_principal tempprinc;
  39     register int i, nelems;
  40
  41     tempprinc = (krb5_principal)malloc(sizeof(krb5_principal_data));
  42
  43     if (tempprinc == 0)
  44         return ENOMEM;
  45
  46     *tempprinc = *inprinc;      /* Copy all of the non-allocated pieces */
  47
  48     nelems = (int) krb5_princ_size(context, inprinc);
  49     tempprinc->data = malloc(nelems * sizeof(krb5_data));
  50
  51     if (tempprinc->data == 0) {
  52         free((char *)tempprinc);
  53         return ENOMEM;
  54     }
  55
  56     for (i = 0; i < nelems; i++) {
  57         int len = krb5_princ_component(context, inprinc, i)->length;
  58         krb5_princ_component(context, tempprinc, i)->length = len;
  59         if ((krb5_princ_component(context, tempprinc, i)->data = malloc(len)) == 0) {
  60             while (--i >= 0)
  61                 free(krb5_princ_component(context, tempprinc, i)->data);
  62             free (tempprinc->data);
  63             free (tempprinc);
  64             return ENOMEM;
  65         }
  66         memcpy(krb5_princ_component(context, tempprinc, i)->data,
  67                krb5_princ_component(context, inprinc, i)->data, len);
  68     }
  69
  70     tempprinc->realm.data =
  71             malloc(tempprinc->realm.length = inprinc->realm.length);
  72     if (!tempprinc->realm.data) {
  73             for (i = 0; i < nelems; i++)
  74                     free(krb5_princ_component(context, tempprinc, i)->data);
  75             free(tempprinc->data);
  76             free(tempprinc);
  77             return ENOMEM;
  78     }
  79     memcpy(tempprinc->realm.data, inprinc->realm.data, inprinc->realm.length);
  80
  81     *outprinc = tempprinc;
  82     return 0;
  83 }