convert-from-bsd-to-posix-string-and-memory-functions-20010807
[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("$Header$");
14
15 #include <sys/types.h>
16 #include <netinet/in.h>
17 #ifdef  AFS_AIX32_ENV
18 #include <signal.h>
19 #endif
20 #include <afs/cellconfig.h>
21 #include <afs/afsutil.h>
22 #include <afs/auth.h>
23 #include <rx/xdr.h>
24 #include <rx/rx.h>
25 #include <des.h>
26 #include <rx/rxkad.h>
27
28 #include "AFS_component_version_number.c"
29
30 main(argc, argv)
31 int argc;
32 char **argv; {
33     struct ktc_token token;
34     struct ktc_principal sname;
35     register afs_int32 code;
36     struct afsconf_dir *dir;
37     afs_int32 now;
38     char skey[9];
39     char cellName[MAXKTCNAMELEN];
40     char session[8];
41
42 #ifdef  AFS_AIX32_ENV
43     /*
44      * The following signal action for AIX is necessary so that in case of a 
45      * crash (i.e. core is generated) we can include the user's data section 
46      * in the core dump. Unfortunately, by default, only a partial core is
47      * generated which, in many cases, isn't too useful.
48      */
49     struct sigaction nsa;
50     
51     sigemptyset(&nsa.sa_mask);
52     nsa.sa_handler = SIG_DFL;
53     nsa.sa_flags = SA_FULLDUMP;
54     sigaction(SIGSEGV, &nsa, NULL);
55 #endif
56     if (argc != 3) {
57         printf("kseal: usage is 'kseal <username> <server key>\n");
58         exit(1);
59     }
60
61     /* lookup configuration info */
62     dir = afsconf_Open(AFSDIR_CLIENT_ETC_DIRPATH);
63     if (!dir) {
64         printf("kseal: can't open config dir (%s)\n", AFSDIR_CLIENT_ETC_DIRPATH);
65         exit(1);
66     }
67     code = afsconf_GetLocalCell(dir, cellName, sizeof(cellName));
68     if (code) {
69         printf("kseal: failed to get local cell name, code %d\n", code);
70         exit(1);
71     }
72
73     /* setup key for sealing */
74     string_to_key(argv[2], skey);
75
76     now = time(0);
77     memcpy(session, &now, 4);   /* but this is only a test pgm */
78     memcpy(session+4, &now, 4);
79     code = tkt_MakeTicket(token.ticket, &token.ticketLen, skey, argv[1], "", cellName,
80         now-300, now+25*3600, session, /* host */ 0, "afs", "");
81     if (code) {
82         printf("kseal: could not seal ticket, code %d!\n", code);
83         exit(1);
84     }
85     
86     /* now send the ticket to the ticket cache */
87     strcpy(sname.name, "afs");
88     strcpy(sname.instance, "");
89     strcpy(sname.cell, cellName);
90     token.startTime = 0;
91     token.endTime = 0x7fffffff;
92     memcpy(&token.sessionKey, session, 8);
93     token.kvno = 0;
94     code = ktc_SetToken (&sname, &token, (char *) 0, 0);
95     if (code) {
96         printf("kseal: could not install newly-sealed ticket, code %d\n", code);
97         exit(1);
98     }
99
100     /* all done */
101     afsconf_Close(dir);
102     exit(0);
103 }