+/* cmd_neonserv_extscript.c - NeonServ v5.1
+ * Copyright (C) 2011 Philipp Kreil (pk910)
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation, either version 3 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program. If not, see <http://www.gnu.org/licenses/>.
+ */
+
+#include "cmd_neonserv.h"
+
+/*
+* argv[0] 'toys' if it's a toy command (check if toys are enabled)
+* argv[0-*] script name & parameter patterns
+* argv[argc-1] all arguments passed to the command
+*/
+
+CMD_BIND(neonserv_cmd_extscript) {
+ int i, j;
+ char *args[MAXNUMPARAMS];
+ int argpos = 0;
+ char *next, *curr;
+ char command[1024];
+ int commandpos = 0;
+ char part[MAXLEN];
+ int partpos;
+ int answere_channel = 0;
+ //check first arg
+ if(argc && !stricmp(argv[0], "toys")) {
+ if(!chan) return; //toys are not allowed via query
+ MYSQL_RES *res;
+ MYSQL_ROW row;
+ printf_mysql_query("SELECT `channel_toys` FROM `channels` WHERE `channel_name` = '%s'", escape_string(chan->name));
+ res = mysql_use();
+ row = mysql_fetch_row(res);
+ if(!row || !strcmp(row[0], "0")) {
+ //disabled
+ reply(getTextBot(), user, "NS_FUN_DISABLED", chan->name);
+ return;
+ } else if(!strcmp(row[0], "2"))
+ answere_channel = 1;
+ argc--;
+ argv++;
+ }
+ //parse arguments
+ if(argc < 2) return;
+ curr = argv[argc-1];
+ while(curr) {
+ next = strstr(curr, " ");
+ args[argpos++] = curr;
+ if(next) {
+ *next = '\0';
+ curr = next+1;
+ } else
+ curr = NULL;
+ }
+ //parse command pattern and build command
+ commandpos = sprintf(command, "%s", argv[0]);
+ for(i = 1; i < argc-1; i++) {
+ partpos = 0;
+ if(argv[i][0] == '$') {
+ argv[i]++;
+ if(argv[i][strlen(argv[i])-1] == '-') {
+ argv[i][strlen(argv[i])-1] = '\0';
+ j = atoi(argv[i]);
+ if(j <= argpos)
+ partpos = sprintf(part, "%s", merge_argv(args, j-1, argpos));
+ } else if((j = atoi(argv[i])) > 0) {
+ if(j <= argpos)
+ partpos = sprintf(part, "%s", args[j-1]);
+ } else if(!strcmp(argv[i], "c")) {
+ partpos = sprintf(part, "%s", (chan ? chan->name : ""));
+ } else if(!strcmp(argv[i], "n")) {
+ partpos = sprintf(part, "%s", user->nick);
+ } else if(!strcmp(argv[i], "a")) {
+ partpos = sprintf(part, "%s", ((user->flags & USERFLAG_ISAUTHED) ? user->auth : ""));
+ } else if(!strcmp(argv[i], "access")) {
+ if(chan)
+ partpos = sprintf(part, "%d", getChannelAccess(user, chan, 0));
+ }
+ } else {
+ partpos = sprintf(part, "%s", argv[i]);
+ }
+ //escape shell argument
+ command[commandpos++] = ' ';
+ command[commandpos++] = '\'';
+ for(j = 0; j < partpos; j++) {
+ if(part[j] == '\'') {
+ command[commandpos++] = '\'';
+ command[commandpos++] = '\\';
+ command[commandpos++] = '\'';
+ command[commandpos++] = '\'';
+ } else
+ command[commandpos++] = part[j];
+ }
+ command[commandpos++] = '\'';
+ }
+ command[commandpos] = '\0';
+ //we should now have a valid command
+ FILE *fp;
+ fp = popen(command, "r");
+ if (fp) {
+ char *a;
+ while (fgets(command, 1024, fp) != NULL) {
+ if((a = strchr(command, '\n')))
+ *a = '\0';
+ if(answere_channel) {
+ putsock(client, "PRIVMSG %s :%s", chan->name, command);
+ } else
+ reply(getTextBot(), user, "%s", command);
+ }
+ pclose(fp);
+ } else {
+ //error
+ reply(getTextBot(), user, "internal bot error - please contact an administrator!");
+ return;
+ }
+}
+