155682Smarkm/*
2233294Sstas * Copyright (c) 1997 - 2002 Kungliga Tekniska H��gskolan
3233294Sstas * (Royal Institute of Technology, Stockholm, Sweden).
4233294Sstas * All rights reserved.
555682Smarkm *
6233294Sstas * Redistribution and use in source and binary forms, with or without
7233294Sstas * modification, are permitted provided that the following conditions
8233294Sstas * are met:
955682Smarkm *
10233294Sstas * 1. Redistributions of source code must retain the above copyright
11233294Sstas *    notice, this list of conditions and the following disclaimer.
1255682Smarkm *
13233294Sstas * 2. Redistributions in binary form must reproduce the above copyright
14233294Sstas *    notice, this list of conditions and the following disclaimer in the
15233294Sstas *    documentation and/or other materials provided with the distribution.
1655682Smarkm *
17233294Sstas * 3. Neither the name of the Institute nor the names of its contributors
18233294Sstas *    may be used to endorse or promote products derived from this software
19233294Sstas *    without specific prior written permission.
2055682Smarkm *
21233294Sstas * THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND
22233294Sstas * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23233294Sstas * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24233294Sstas * ARE DISCLAIMED.  IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE
25233294Sstas * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26233294Sstas * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27233294Sstas * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28233294Sstas * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29233294Sstas * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30233294Sstas * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31233294Sstas * SUCH DAMAGE.
3255682Smarkm */
3355682Smarkm
34233294Sstas#include "krb5_locl.h"
3555682Smarkm
36233294SstasKRB5_LIB_FUNCTION krb5_error_code KRB5_LIB_CALL
3755682Smarkmkrb5_build_ap_req (krb5_context context,
3855682Smarkm		   krb5_enctype enctype,
3955682Smarkm		   krb5_creds *cred,
4055682Smarkm		   krb5_flags ap_options,
4155682Smarkm		   krb5_data authenticator,
4255682Smarkm		   krb5_data *retdata)
4355682Smarkm{
4455682Smarkm  krb5_error_code ret = 0;
4555682Smarkm  AP_REQ ap;
4655682Smarkm  Ticket t;
4755682Smarkm  size_t len;
48233294Sstas
4955682Smarkm  ap.pvno = 5;
5055682Smarkm  ap.msg_type = krb_ap_req;
5155682Smarkm  memset(&ap.ap_options, 0, sizeof(ap.ap_options));
5255682Smarkm  ap.ap_options.use_session_key = (ap_options & AP_OPTS_USE_SESSION_KEY) > 0;
5355682Smarkm  ap.ap_options.mutual_required = (ap_options & AP_OPTS_MUTUAL_REQUIRED) > 0;
54233294Sstas
5555682Smarkm  ap.ticket.tkt_vno = 5;
5655682Smarkm  copy_Realm(&cred->server->realm, &ap.ticket.realm);
5755682Smarkm  copy_PrincipalName(&cred->server->name, &ap.ticket.sname);
5855682Smarkm
5955682Smarkm  decode_Ticket(cred->ticket.data, cred->ticket.length, &t, &len);
6055682Smarkm  copy_EncryptedData(&t.enc_part, &ap.ticket.enc_part);
6155682Smarkm  free_Ticket(&t);
6255682Smarkm
6355682Smarkm  ap.authenticator.etype = enctype;
6455682Smarkm  ap.authenticator.kvno  = NULL;
6555682Smarkm  ap.authenticator.cipher = authenticator;
6655682Smarkm
67103423Snectar  ASN1_MALLOC_ENCODE(AP_REQ, retdata->data, retdata->length,
68103423Snectar		     &ap, &len, ret);
69178825Sdfr  if(ret == 0 && retdata->length != len)
70178825Sdfr      krb5_abortx(context, "internal error in ASN.1 encoder");
7155682Smarkm  free_AP_REQ(&ap);
7255682Smarkm  return ret;
73103423Snectar
7455682Smarkm}
75