blob: 83cb0b85d92b56990afebae00d9b3d26232061bf [file] [log] [blame]
Damien Millerd4a8b7e1999-10-27 13:42:43 +10001/*
2**
Damien Miller4e61b792000-01-29 20:13:40 +11003** OpenBSD replacement routines
Damien Millerd4a8b7e1999-10-27 13:42:43 +10004**
5** Damien Miller <djm@ibs.com.au>
6**
Damien Millerf20c2aa2000-01-06 20:28:41 +11007** Copyright 1999 Damien Miller
Damien Millerd4a8b7e1999-10-27 13:42:43 +10008** Copyright 1999 Internet Business Solutions
9**
10** Permission is hereby granted, free of charge, to any person
11** obtaining a copy of this software and associated documentation
12** files (the "Software"), to deal in the Software without
13** restriction, including without limitation the rights to use, copy,
14** modify, merge, publish, distribute, sublicense, and/or sell copies
15** of the Software, and to permit persons to whom the Software is
16** furnished to do so, subject to the following conditions:
17**
18** The above copyright notice and this permission notice shall be
19** included in all copies or substantial portions of the Software.
20**
21** THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY
22** KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE
23** WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE
24** AND NONINFRINGEMENT. IN NO EVENT SHALL DAMIEN MILLER OR INTERNET
25** BUSINESS SOLUTIONS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
26** LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
27** ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE
28** OR OTHER DEALINGS IN THE SOFTWARE.
29**
30** Except as contained in this notice, the name of Internet Business
31** Solutions shall not be used in advertising or otherwise to promote
32** the sale, use or other dealings in this Software without prior
33** written authorization from Internet Business Solutions.
34**
35*/
36
Damien Miller6b85a7f2000-01-02 11:45:33 +110037#include "config.h"
38
Damien Millerd4a8b7e1999-10-27 13:42:43 +100039#include <stdio.h>
40#include <stdlib.h>
41#include <string.h>
42#include <errno.h>
43#include <unistd.h>
44
45#include <sys/types.h>
46#include <sys/stat.h>
47#include <fcntl.h>
Damien Miller1fa154b2000-01-23 10:32:03 +110048#ifdef HAVE_STDDEF_H
49#include <stddef.h>
50#endif
Damien Millerd4a8b7e1999-10-27 13:42:43 +100051
Damien Millerd4a8b7e1999-10-27 13:42:43 +100052#include "xmalloc.h"
Damien Millerab18c411999-11-11 10:40:23 +110053#include "ssh.h"
Damien Miller753331e1999-12-30 01:29:35 +110054#include "bsd-misc.h"
Damien Millerf07390e2000-01-29 20:40:22 +110055#include "random.h"
Damien Miller58fc4731999-11-19 12:05:01 +110056
Damien Millere413cba1999-10-28 14:12:54 +100057#ifndef HAVE_ARC4RANDOM
58
Damien Miller037a0dc1999-12-07 15:38:31 +110059typedef struct
60{
61 unsigned int s[256];
62 int i;
63 int j;
64} rc4_t;
65
Damien Miller037a0dc1999-12-07 15:38:31 +110066void rc4_key(rc4_t *r, unsigned char *key, int len);
67void rc4_getbytes(rc4_t *r, unsigned char *buffer, int len);
Damien Millerd4a8b7e1999-10-27 13:42:43 +100068
69static rc4_t *rc4 = NULL;
70
Damien Miller037a0dc1999-12-07 15:38:31 +110071void rc4_key(rc4_t *r, unsigned char *key, int len)
72{
73 int t;
74
75 for(r->i = 0; r->i < 256; r->i++)
76 r->s[r->i] = r->i;
77
78 r->j = 0;
79 for(r->i = 0; r->i < 256; r->i++)
80 {
81 r->j = (r->j + r->s[r->i] + key[r->i % len]) % 256;
82 t = r->s[r->i];
83 r->s[r->i] = r->s[r->j];
84 r->s[r->j] = t;
85 }
86 r->i = r->j = 0;
87}
88
89void rc4_getbytes(rc4_t *r, unsigned char *buffer, int len)
90{
91 int t;
92 int c;
93
94 c = 0;
95 while(c < len)
96 {
97 r->i = (r->i + 1) % 256;
98 r->j = (r->j + r->s[r->i]) % 256;
99 t = r->s[r->i];
100 r->s[r->i] = r->s[r->j];
101 r->s[r->j] = t;
102
103 t = (r->s[r->i] + r->s[r->j]) % 256;
104
105 buffer[c] = r->s[t];
106 c++;
107 }
108}
109
Damien Miller3d112ef1999-10-28 13:20:30 +1000110unsigned int arc4random(void)
Damien Millerd4a8b7e1999-10-27 13:42:43 +1000111{
Damien Miller3d112ef1999-10-28 13:20:30 +1000112 unsigned int r;
Damien Millerd4a8b7e1999-10-27 13:42:43 +1000113
114 if (rc4 == NULL)
115 arc4random_stir();
116
Damien Miller3d112ef1999-10-28 13:20:30 +1000117 rc4_getbytes(rc4, (unsigned char *)&r, sizeof(r));
Damien Millerd4a8b7e1999-10-27 13:42:43 +1000118
119 return(r);
120}
121
122void arc4random_stir(void)
123{
124 unsigned char rand_buf[32];
125
126 if (rc4 == NULL)
127 rc4 = xmalloc(sizeof(*rc4));
128
129 get_random_bytes(rand_buf, sizeof(rand_buf));
130 rc4_key(rc4, rand_buf, sizeof(rand_buf));
Damien Millerf07390e2000-01-29 20:40:22 +1100131 memset(rand_buf, 0, sizeof(rand_buf));
Damien Millerd4a8b7e1999-10-27 13:42:43 +1000132}
Damien Millere413cba1999-10-28 14:12:54 +1000133#endif /* !HAVE_ARC4RANDOM */
Damien Millerd4a8b7e1999-10-27 13:42:43 +1000134
Damien Millere413cba1999-10-28 14:12:54 +1000135#ifndef HAVE_SETPROCTITLE
136void setproctitle(const char *fmt, ...)
137{
138 /* FIXME */
139}
140#endif /* !HAVE_SETPROCTITLE */
Damien Millerd7702521999-11-22 16:11:05 +1100141
142#ifndef HAVE_SETENV
143int setenv(const char *name, const char *value, int overwrite)
144{
145 char *env_string;
146 int result;
147
148 /* Don't overwrite existing env. var if overwrite is 0 */
149 if (!overwrite && (getenv(name) != NULL))
150 return(0);
151
152 env_string = xmalloc(strlen(name) + strlen(value) + 2);
153 sprintf(env_string, "%s=%s", name, value);
154
155 result = putenv(env_string);
156
Damien Millerf09b07a2000-03-15 11:23:48 +1100157 /* Putenv doesn't copy the env_string, so we need to keep a copy of it */
158 /* around. This leaks a bit of memory, but it doesn't matter */
159 /* for our (OpenSSH port ) use: setenv is only used twice in ssh-agent */
160/* xfree(env_string); */
Damien Millerd7702521999-11-22 16:11:05 +1100161
162 return(result);
163}
164#endif /* !HAVE_SETENV */
Damien Millere72b7af1999-12-30 15:08:44 +1100165
166#ifndef HAVE_SETLOGIN
167int setlogin(const char *name)
168{
169 return(0);
170}
171#endif /* !HAVE_SETLOGIN */
172
173#ifndef HAVE_INNETGR
174int innetgr(const char *netgroup, const char *host,
175 const char *user, const char *domain)
176{
177 return(0);
178}
179#endif /* HAVE_INNETGR */
180
181#if !defined(HAVE_SETEUID) && defined(HAVE_SETREUID)
182int seteuid(uid_t euid)
183{
184 return(setreuid(-1,euid));
185}
186#endif /* !defined(HAVE_SETEUID) && defined(HAVE_SETREUID) */