blob: 3f3939215a99d71b1159a723e93450cdd3ac6aeb (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
|
/* This file is part of the Project Athena Zephyr Notification System.
* It contains source for the ZGetSender.c function.
*
* Created by: Robert French
*
* $Source$
* $Author$
*
* Copyright (c) 1987 by the Massachusetts Institute of Technology.
* For copying and distribution information, see the file
* "mit-copyright.h".
*/
/* $Header$ */
#ifndef lint
static char rcsid_ZGetSender_c[] = "$Header$";
#endif lint
#include <zephyr/mit-copyright.h>
#include <zephyr/zephyr_internal.h>
#include <pwd.h>
uid_t getuid();
char *ZGetSender()
{
struct passwd *pw;
#ifdef KERBEROS
char pname[ANAME_SZ], pinst[INST_SZ];
static char sender[ANAME_SZ+INST_SZ+REALM_SZ+3] = "";
#else
static char sender[128] = "";
#endif
/* Return it if already cached */
if (*sender)
return (sender);
#ifdef KERBEROS
if (tf_init((char *)TKT_FILE, R_TKT_FIL) == KSUCCESS) {
if ((tf_get_pname(pname) == KSUCCESS) &&
(tf_get_pinst(pinst) == KSUCCESS)) {
(void) sprintf(sender, "%s%s%s@%s", pname, (pinst[0]?".":""),
pinst, __Zephyr_realm);
tf_close();
return (sender);
}
tf_close();
}
#endif KERBEROS
/* XXX a uid_t is a u_short (now), but getpwuid
* wants an int. AARGH! */
pw = getpwuid((int) getuid());
if (!pw)
return ("unknown");
(void) sprintf(sender, "%s@%s", pw->pw_name, __Zephyr_realm);
return (sender);
}
|
