Create experimental new options API, various cleanups
[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 applications";
25 static char *app_md5 = "MD5";
26 static char *desc_md5 = "Calculate MD5 checksum";
27 static char *synopsis_md5 = 
28 "  MD5(<var>=<string>): Calculates a MD5 checksum on <string>.\n"
29 "Returns hash value in a channel variable. Always return 0\n";
30
31 static char *app_md5check = "MD5Check";
32 static char *desc_md5check = "Check MD5 checksum";
33 static char *synopsis_md5check = 
34 "  MD5Check(<md5hash>,<string>): Calculates a MD5 checksum on <string>\n"
35 "and compares it with the hash. Returns 0 if <md5hash> is correct for <string>.\n"
36 "Jumps to priority+101 if incorrect.\n";
37
38 STANDARD_LOCAL_USER;
39
40 LOCAL_USER_DECL;
41
42 /*--- md5_exec: Calculate MD5 checksum (hash) on given string and
43         return it in channel variable ---*/
44 static int md5_exec(struct ast_channel *chan, void *data)
45 {
46         int res=0;
47         struct localuser *u;
48         char *varname= NULL; /* Variable to set */
49         char *string = NULL; /* String to calculate on */
50         char retvar[50]; /* Return value */
51
52         if (!data) {
53                 ast_log(LOG_WARNING, "Syntax: md5(<varname>=<string>) - missing argument!\n");
54                 return -1;
55         }
56         LOCAL_USER_ADD(u);
57         memset(retvar,0, sizeof(retvar));
58         string = ast_strdupa(data);
59         varname = strsep(&string,"=");
60         if (ast_strlen_zero(varname)) {
61                 ast_log(LOG_WARNING, "Syntax: md5(<varname>=<string>) - missing argument!\n");
62                 LOCAL_USER_REMOVE(u);
63                 return -1;
64         }
65         ast_md5_hash(retvar, string);
66         pbx_builtin_setvar_helper(chan, varname, retvar);
67         LOCAL_USER_REMOVE(u);
68         return res;
69 }
70
71 /*--- md5check_exec: Calculate MD5 checksum and compare it with
72         existing checksum. ---*/
73 static int md5check_exec(struct ast_channel *chan, void *data)
74 {
75         int res=0;
76         struct localuser *u;
77         char *hash= NULL; /* Hash to compare with */
78         char *string = NULL; /* String to calculate on */
79         char newhash[50]; /* Return value */
80
81         if (!data) {
82                 ast_log(LOG_WARNING, "Syntax: MD5Check(<md5hash>,<string>) - missing argument!\n");
83                 return -1;
84         }
85         LOCAL_USER_ADD(u);
86         memset(newhash,0, sizeof(newhash));
87
88         string = ast_strdupa(data);
89         hash = strsep(&string,"|");
90         if (ast_strlen_zero(hash)) {
91                 ast_log(LOG_WARNING, "Syntax: MD5Check(<md5hash>,<string>) - missing argument!\n");
92                 LOCAL_USER_REMOVE(u);
93                 return -1;
94         }
95         ast_md5_hash(newhash, string);
96         if (!strcmp(newhash, hash)) {   /* Verification ok */
97                 if (option_debug > 2)
98                         ast_log(LOG_DEBUG, "MD5 verified ok: %s -- %s\n", hash, string);
99                 LOCAL_USER_REMOVE(u);
100                 return 0;
101         }
102         if (option_debug > 2)
103                 ast_log(LOG_DEBUG, "ERROR: MD5 not verified: %s -- %s\n", hash, string);
104         if (ast_exists_extension(chan, chan->context, chan->exten, chan->priority + 101, chan->cid.cid_num))
105                 chan->priority += 100;
106         else if (option_debug > 2)
107                 ast_log(LOG_DEBUG, "ERROR: Can't jump to exten+101 (e%s,p%d), sorry\n", chan->exten,chan->priority+101);
108         LOCAL_USER_REMOVE(u);
109         return res;
110 }
111
112 int unload_module(void)
113 {
114         int res;
115
116         STANDARD_HANGUP_LOCALUSERS;
117         res =ast_unregister_application(app_md5);
118         res |= ast_unregister_application(app_md5check);
119         return res;
120 }
121
122 int load_module(void)
123 {
124         int res;
125
126         res = ast_register_application(app_md5check, md5check_exec, desc_md5check, synopsis_md5check);
127         res |= ast_register_application(app_md5, md5_exec, desc_md5, synopsis_md5);
128         return res;
129 }
130
131 char *description(void)
132 {
133         return tdesc_md5;
134 }
135
136 int usecount(void)
137 {
138         int res;
139         STANDARD_USECOUNT(res);
140         return res;
141 }
142
143 char *key()
144 {
145         return ASTERISK_GPL_KEY;
146 }