a481393dfb1bfcd0b770df41523bb7cbfceb8846
[asterisk/asterisk.git] / apps / app_md5.c
1 /*
2  * Asterisk -- A telephony toolkit for Linux.
3  *
4  * MD5 checksum application
5  * 
6  * Copyright (C) 2005, Olle E. Johansson, Edvina.net
7  *
8  * This program is free software, distributed under the terms of
9  * the GNU General Public License
10  */
11
12 #include <asterisk/file.h>
13 #include <asterisk/logger.h>
14 #include <asterisk/utils.h>
15 #include <asterisk/options.h>
16 #include <asterisk/channel.h>
17 #include <asterisk/pbx.h>
18 #include <asterisk/module.h>
19 #include <asterisk/lock.h>
20 #include <stdlib.h>
21 #include <unistd.h>
22 #include <string.h>
23
24 static char *tdesc_md5 = "MD5 checksum application";
25 static char *app_md5 = "MD5";
26 static char *synopsis_md5 = 
27 "  MD5(<var>=<string>): Calculates a MD5 checksum on <string>.\n"
28 "Returns hash value in a channel variable. Always return 0\n";
29
30 static char *tdesc_md5check = "MD5 checksum verification application";
31 static char *app_md5check = "MD5Check";
32 static char *synopsis_md5check = 
33 "  MD5Check(<md5hash>,<string>): Calculates a MD5 checksum on <string>\n"
34 "and compares it with the hash. Returns 0 if <md5hash> is correct for <string>.\n"
35 "Jumps to priority+101 if incorrect.\n";
36
37 STANDARD_LOCAL_USER;
38
39 LOCAL_USER_DECL;
40
41 /*--- md5_exec: Calculate MD5 checksum (hash) on given string and
42         return it in channel variable ---*/
43 static int md5_exec(struct ast_channel *chan, void *data)
44 {
45         int res=0;
46         struct localuser *u;
47         char *varname= NULL; /* Variable to set */
48         char *string = NULL; /* String to calculate on */
49         char retvar[50]; /* Return value */
50
51         if (!data) {
52                 ast_log(LOG_WARNING, "Syntax: md5(<varname>=<string>) - missing argument!\n");
53                 return -1;
54         }
55         LOCAL_USER_ADD(u);
56         memset(retvar,0, sizeof(retvar));
57         string = ast_strdupa(data);
58         varname = strsep(&string,"=");
59         if (ast_strlen_zero(varname)) {
60                 ast_log(LOG_WARNING, "Syntax: md5(<varname>=<string>) - missing argument!\n");
61                 LOCAL_USER_REMOVE(u);
62                 return -1;
63         }
64         ast_md5_hash(retvar, string);
65         pbx_builtin_setvar_helper(chan, varname, retvar);
66         LOCAL_USER_REMOVE(u);
67         return res;
68 }
69
70 /*--- md5check_exec: Calculate MD5 checksum and compare it with
71         existing checksum. ---*/
72 static int md5check_exec(struct ast_channel *chan, void *data)
73 {
74         int res=0;
75         struct localuser *u;
76         char *hash= NULL; /* Hash to compare with */
77         char *string = NULL; /* String to calculate on */
78         char newhash[50]; /* Return value */
79
80         if (!data) {
81                 ast_log(LOG_WARNING, "Syntax: MD5Check(<md5hash>,<string>) - missing argument!\n");
82                 return -1;
83         }
84         LOCAL_USER_ADD(u);
85         memset(newhash,0, sizeof(newhash));
86
87         string = ast_strdupa(data);
88         hash = strsep(&string,"|");
89         if (ast_strlen_zero(hash)) {
90                 ast_log(LOG_WARNING, "Syntax: MD5Check(<md5hash>,<string>) - missing argument!\n");
91                 LOCAL_USER_REMOVE(u);
92                 return -1;
93         }
94         ast_md5_hash(newhash, string);
95         if (!strcmp(newhash, hash)) {   /* Verification ok */
96                 if (option_debug > 2)
97                         ast_log(LOG_DEBUG, "MD5 verified ok: %s -- %s\n", hash, string);
98                 LOCAL_USER_REMOVE(u);
99                 return 0;
100         }
101         if (option_debug > 2)
102                 ast_log(LOG_DEBUG, "ERROR: MD5 not verified: %s -- %s\n", hash, string);
103         if (ast_exists_extension(chan, chan->context, chan->exten, chan->priority + 101, chan->cid.cid_num))
104                 chan->priority += 100;
105         else if (option_debug > 2)
106                 ast_log(LOG_DEBUG, "ERROR: Can't jump to exten+101 (e%s,p%d), sorry\n", chan->exten,chan->priority+101);
107         LOCAL_USER_REMOVE(u);
108         return res;
109 }
110
111 int unload_module(void)
112 {
113         int res;
114
115         STANDARD_HANGUP_LOCALUSERS;
116         res =ast_unregister_application(app_md5);
117         res |= ast_unregister_application(app_md5check);
118         return res;
119 }
120
121 int load_module(void)
122 {
123         int res;
124
125         res = ast_register_application(app_md5check, md5check_exec, synopsis_md5check, tdesc_md5check);
126         res |= ast_register_application(app_md5, md5_exec, synopsis_md5, tdesc_md5);
127         return res;
128 }
129
130 char *description(void)
131 {
132         return tdesc_md5;
133 }
134
135 int usecount(void)
136 {
137         int res;
138         STANDARD_USECOUNT(res);
139         return res;
140 }
141
142 char *key()
143 {
144         return ASTERISK_GPL_KEY;
145 }