1 /*
2 * crypt.cc --
3 *
4 * FIXME: This file needs a description here.
5 *
6 * Copyright (c) 1991-2002 The Regents of the University of California.
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 are met:
11 *
12 * A. Redistributions of source code must retain the above copyright notice,
13 * this list of conditions and the following disclaimer.
14 * B. Redistributions in binary form must reproduce the above copyright notice,
15 * this list of conditions and the following disclaimer in the documentation
16 * and/or other materials provided with the distribution.
17 * C. Neither the names of the copyright holders nor the names of its
18 * contributors may be used to endorse or promote products derived from this
19 * software without specific prior written permission.
20 *
21 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS ``AS
22 * IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
23 * THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
24 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE
25 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
26 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
27 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
28 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
29 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
30 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
31 * POSSIBILITY OF SUCH DAMAGE.
32 */
33
34 #ifndef lint
35 static const char rcsid[] =
36 "@(#) $Header: /usr/mash/src/repository/mash/mash-1/crypt/crypt.cc,v 1.8 2003/11/19 19:20:26 aswan Exp $";
37 #endif
38
39 #include "crypt/crypt.h"
40
41 /*FIXME*/
42 #define PROTOTYPES 1
43 #include "rtp/global.h"
44 extern "C" {
45 #include "rtp/md5.h"
46 }
47
48 Crypt::Crypt() : badpktlen_(0), badpbit_(0)
49 {
50 }
51
52 Crypt::~Crypt()
53 {
54 }
55
56 int Crypt::command(int argc, const char*const* argv)
57 {
58 if (argc == 3) {
59 Tcl& tcl = Tcl::instance();
60 if (strcmp(argv[1], "key") == 0) {
61 if (set_key(argv[2]) != 0)
62 tcl.result("");
63 else
64 tcl.result("1");
65 return (TCL_OK);
66 }
67 }
68 return (TclObject::command(argc, argv));
69 }
70
71 int Crypt::set_key(const char* key)
72 {
73 MD5_CTX context;
74 MD5Init(&context);
75 MD5Update(&context, (u_char*)key, strlen(key));
76 u_char hash[16];
77 MD5Final((u_char *)hash, &context);
78 return (install_key(hash));
79 }
80
This page was automatically generated by the
LXR engine.
Visit the LXR main site for more
information.