From: John Kohl Date: Fri, 30 Mar 1990 14:37:38 +0000 (+0000) Subject: *** empty log message *** X-Git-Tag: krb5-1.0-alpha2~949 X-Git-Url: http://git.tremily.us/?a=commitdiff_plain;h=5ae71606c81ac93730db5786d693867682552376;p=krb5.git *** empty log message *** git-svn-id: svn://anonsvn.mit.edu/krb5/trunk@439 dc483132-0cff-0310-8789-dd5450dbe970 --- diff --git a/src/lib/krb5/free/f_creds.c b/src/lib/krb5/free/f_creds.c new file mode 100644 index 000000000..903e8084f --- /dev/null +++ b/src/lib/krb5/free/f_creds.c @@ -0,0 +1,38 @@ +/* + * $Source$ + * $Author$ + * + * Copyright 1990 by the Massachusetts Institute of Technology. + * + * For copying and distribution information, please see the file + * . + * + * krb5_free_creds() + */ + +#if !defined(lint) && !defined(SABER) +static char rcsid_f_creds_c [] = +"$Id$"; +#endif /* !lint & !SABER */ + +#include +#include +#include + +void +krb5_free_creds(val) +krb5_creds *val; +{ + if (val->client) + krb5_free_principal(val->client); + if (val->server) + krb5_free_principal(val->server); + if (val->keyblock.contents) + xfree(val->keyblock.contents); + if (val->ticket.data) + xfree(val->ticket.data); + if (val->second_ticket.data) + xfree(val->second_ticket.data); + xfree(val); + return; +}