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
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
|
#!/usr/local/bin/pike
#!NO_MODULE
/* $Id: sqladduser.pike,v 1.3 1998/03/05 19:47:20 grubba Exp $
*
* name = "SQL Add user";
* doc = "Add a user to an SQL user-database.";
*/
/*
* This program is (C) 1997 Francesco Chemolli <kinkie@comedia.it>
* You can use, duplicate and distribute it freely under the terms of
* the GNU General Public License, version 2.
* This program comes on an AS-IS basis, WITHOUT ANY WARRANTY of any kind,
* either implicit or esplicit.
* By using it you implicitly state that you are aware of the risks, and
* that take upon yourself all the responsabilities for any damage,
* direct or indirect including loss of profict from the use of this software.
* Don tell me I hadn't warned you..
*/
#include <sql.h>
string readline_until_got (string query) {
string retval;
while (!retval || !sizeof(retval))
retval=readline("(mandatory) "+query);
return retval;
}
int main() {
mapping data=([]);
object sql=Sql.sql("localhost","passwd");
mixed tmp,err;
string query;
data->username=readline_until_got("username: ");
data->passwd=crypt(readline_until_got("password: "));
data->uid=readline("(deprecated) user ID: ");
data->gid=readline("(deprecated) group ID: ");
data->homedir=readline("home directory: ");
data->shell=readline("login shell: ");
foreach(indices(data),tmp) {
if (!sizeof(data[tmp]))
data-=([tmp:0]);
}
if(data->uid)
data->uid=(int)data->uid;
if(data->gid)
data->gid=(int)data->gid;
query="insert into passwd (" + (indices(data)*",") +
") values (";
foreach (values(data),tmp) {
if (stringp(tmp))
query += sprintf ("'%s',",tmp);
else
query += tmp+",";
}
query=query[..sizeof(query)-2];
query += ")";
tmp=sql->query("select * from passwd where username = '"+data->username+"'");
if (sizeof(tmp))
sql->query("delete from passwd where username = '"+data->username+"'");
err= catch {
sql->query(query);
};
if (err) {
write("SQL query error: "+sql->error()+"\n");
write("query was: "+query+"\n");
return 1;
}
}
|
