Line data    Source code

       1             : /*
       2             :  * Copyright (c) 1997 - 2001 Kungliga Tekniska Högskolan
       3             :  * (Royal Institute of Technology, Stockholm, Sweden).
       4             :  * All rights reserved.
       5             :  *
       6             :  * Redistribution and use in source and binary forms, with or without
       7             :  * modification, are permitted provided that the following conditions
       8             :  * are met:
       9             :  *
      10             :  * 1. Redistributions of source code must retain the above copyright
      11             :  *    notice, this list of conditions and the following disclaimer.
      12             :  *
      13             :  * 2. Redistributions in binary form must reproduce the above copyright
      14             :  *    notice, this list of conditions and the following disclaimer in the
      15             :  *    documentation and/or other materials provided with the distribution.
      16             :  *
      17             :  * 3. Neither the name of the Institute 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 INSTITUTE 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 INSTITUTE 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 "krb5_locl.h"
      35             : 
      36             : KRB5_LIB_FUNCTION krb5_error_code KRB5_LIB_CALL
      37      100930 : krb5_rd_error(krb5_context context,
      38             :               const krb5_data *msg,
      39             :               KRB_ERROR *result)
      40             : {
      41             : 
      42             :     size_t len;
      43             :     krb5_error_code ret;
      44             : 
      45      100930 :     ret = decode_KRB_ERROR(msg->data, msg->length, result, &len);
      46      100930 :     if(ret) {
      47       54695 :         krb5_clear_error_message(context);
      48       54695 :         return ret;
      49             :     }
      50       46235 :     result->error_code += KRB5KDC_ERR_NONE;
      51       46235 :     return 0;
      52             : }
      53             : 
      54             : KRB5_LIB_FUNCTION void KRB5_LIB_CALL
      55       32057 : krb5_free_error_contents (krb5_context context,
      56             :                           krb5_error *error)
      57             : {
      58       32057 :     free_KRB_ERROR(error);
      59       32057 :     memset(error, 0, sizeof(*error));
      60       32057 : }
      61             : 
      62             : KRB5_LIB_FUNCTION void KRB5_LIB_CALL
      63           0 : krb5_free_error (krb5_context context,
      64             :                  krb5_error *error)
      65             : {
      66           0 :     krb5_free_error_contents (context, error);
      67           0 :     free (error);
      68           0 : }
      69             : 
      70             : KRB5_LIB_FUNCTION krb5_error_code KRB5_LIB_CALL
      71       46235 : krb5_error_from_rd_error(krb5_context context,
      72             :                          const krb5_error *error,
      73             :                          const krb5_creds *creds)
      74             : {
      75             :     krb5_error_code ret;
      76             : 
      77       46235 :     ret = error->error_code;
      78       46235 :     if (error->e_text != NULL) {
      79       41559 :         krb5_set_error_message(context, ret, "%s", *error->e_text);
      80             :     } else {
      81             :         char clientname[256], servername[256];
      82             : 
      83        4676 :         if (creds != NULL) {
      84        2338 :             krb5_unparse_name_fixed(context, creds->client,
      85             :                                     clientname, sizeof(clientname));
      86        2338 :             krb5_unparse_name_fixed(context, creds->server,
      87             :                                     servername, sizeof(servername));
      88             :         }
      89             : 
      90        4676 :         switch (ret) {
      91           0 :         case KRB5KDC_ERR_NAME_EXP :
      92           0 :             krb5_set_error_message(context, ret,
      93           0 :                                    N_("Client %s%s%s expired", ""),
      94             :                                    creds ? "(" : "",
      95             :                                    creds ? clientname : "",
      96             :                                    creds ? ")" : "");
      97           0 :             break;
      98           0 :         case KRB5KDC_ERR_SERVICE_EXP :
      99           0 :             krb5_set_error_message(context, ret,
     100           0 :                                    N_("Server %s%s%s expired", ""),
     101             :                                    creds ? "(" : "",
     102             :                                    creds ? servername : "",
     103             :                                    creds ? ")" : "");
     104           0 :             break;
     105        1050 :         case KRB5KDC_ERR_C_PRINCIPAL_UNKNOWN :
     106        2100 :             krb5_set_error_message(context, ret,
     107        1050 :                                    N_("Client %s%s%s unknown", ""),
     108             :                                    creds ? "(" : "",
     109             :                                    creds ? clientname : "",
     110             :                                    creds ? ")" : "");
     111        1050 :             break;
     112        2200 :         case KRB5KDC_ERR_S_PRINCIPAL_UNKNOWN :
     113        4400 :             krb5_set_error_message(context, ret,
     114        2200 :                                    N_("Server %s%s%s unknown", ""),
     115             :                                    creds ? "(" : "",
     116             :                                    creds ? servername : "",
     117             :                                    creds ? ")" : "");
     118        2200 :             break;
     119        1426 :         default :
     120        1426 :             krb5_clear_error_message(context);
     121        1426 :             break;
     122             :         }
     123             :     }
     124       46235 :     return ret;
     125             : }