log-protoize-20050618
[openafs.git] / src / log / kseal.c
1 /*
2  * Copyright 2000, International Business Machines Corporation and others.
3  * All Rights Reserved.
4  * 
5  * This software has been released under the terms of the IBM Public
6  * License.  For details, see the LICENSE file in the top-level source
7  * directory or online at http://www.openafs.org/dl/license10.html
8  */
9
10 #include <afsconfig.h>
11 #include <afs/param.h>
12
13 RCSID
14     ("$Header$");
15
16 #include <sys/types.h>
17 #include <netinet/in.h>
18 #ifdef  AFS_AIX32_ENV
19 #include <signal.h>
20 #endif
21
22 #ifdef HAVE_STRING_H
23 #include <string.h>
24 #else
25 #ifdef HAVE_STRINGS_H
26 #include <strings.h>
27 #endif
28 #endif
29
30 #include <afs/cellconfig.h>
31 #include <afs/afsutil.h>
32 #include <afs/auth.h>
33 #include <rx/xdr.h>
34 #include <rx/rx.h>
35 #include <des.h>
36 #include <rx/rxkad.h>
37
38 #include "AFS_component_version_number.c"
39
40 int
41 main(int argc, char **argv)
42 {
43     struct ktc_token token;
44     struct ktc_principal sname;
45     register afs_int32 code;
46     struct afsconf_dir *dir;
47     afs_int32 now;
48     char skey[9];
49     char cellName[MAXKTCNAMELEN];
50     char session[8];
51
52 #ifdef  AFS_AIX32_ENV
53     /*
54      * The following signal action for AIX is necessary so that in case of a 
55      * crash (i.e. core is generated) we can include the user's data section 
56      * in the core dump. Unfortunately, by default, only a partial core is
57      * generated which, in many cases, isn't too useful.
58      */
59     struct sigaction nsa;
60
61     sigemptyset(&nsa.sa_mask);
62     nsa.sa_handler = SIG_DFL;
63     nsa.sa_flags = SA_FULLDUMP;
64     sigaction(SIGSEGV, &nsa, NULL);
65 #endif
66     if (argc != 3) {
67         printf("kseal: usage is 'kseal <username> <server key>\n");
68         exit(1);
69     }
70
71     /* lookup configuration info */
72     dir = afsconf_Open(AFSDIR_CLIENT_ETC_DIRPATH);
73     if (!dir) {
74         printf("kseal: can't open config dir (%s)\n",
75                AFSDIR_CLIENT_ETC_DIRPATH);
76         exit(1);
77     }
78     code = afsconf_GetLocalCell(dir, cellName, sizeof(cellName));
79     if (code) {
80         printf("kseal: failed to get local cell name, code %d\n", code);
81         exit(1);
82     }
83
84     /* setup key for sealing */
85     string_to_key(argv[2], skey);
86
87     now = time(0);
88     memcpy(session, &now, 4);   /* but this is only a test pgm */
89     memcpy(session + 4, &now, 4);
90     code =
91         tkt_MakeTicket(token.ticket, &token.ticketLen, skey, argv[1], "",
92                        cellName, now - 300, now + 25 * 3600, session,
93                        /* host */ 0, "afs", "");
94     if (code) {
95         printf("kseal: could not seal ticket, code %d!\n", code);
96         exit(1);
97     }
98
99     /* now send the ticket to the ticket cache */
100     strcpy(sname.name, "afs");
101     strcpy(sname.instance, "");
102     strcpy(sname.cell, cellName);
103     token.startTime = 0;
104     token.endTime = 0x7fffffff;
105     memcpy(&token.sessionKey, session, 8);
106     token.kvno = 0;
107     code = ktc_SetToken(&sname, &token, NULL, 0);
108     if (code) {
109         printf("kseal: could not install newly-sealed ticket, code %d\n",
110                code);
111         exit(1);
112     }
113
114     /* all done */
115     afsconf_Close(dir);
116     exit(0);
117 }