/* DESC: This script runs a shell command using telnet. * Only the first response line is returned. * Don't forget to enable the telnet server * For special chars in command string use escape: apostrophe = "\x27" * Copyright (C) 2014 NetModule AG, Switzerland, rfa */ string telnet(ip, port, user, password, cmd) { if ((sock = socket(AF_INET, SOCK_STREAM, IPPROTO_TCP)) < 0) return NULL; if (connect(sock, ip, port) < 0) return NULL; try { if ((buf = recv(sock)) == NULL || strlen(buf) < 3) throw NULL; buf = explode(buf); if (buf[0] == "\xff") // is command { if (buf[1] == "\xfd" && buf[2] == "\d031") { //negotiate if (send(sock, "\d255\d251\d031") == -1) throw NULL; if (send(sock, "\d255\d250\d031\d000\d080\d000\d024\d255\d240") == -1) throw NULL; } else { for (i = 0; i < strlen(buf); i++) if (buf[i] == "\xfd") buf[i] = "\xfc"; else if (buf[i] == "\xfb") buf[i] = "\xfd"; if (send(sock, implode(buf)) == -1) throw NULL; } } if ((buf = recv(sock)) == NULL || strlen(buf) < 1) throw NULL; // user ? if (send(sock, strcat(user, "\r\n")) == -1) throw NULL; if ((buf = recv(sock)) == NULL || strlen(buf) < 1)throw NULL; // password ? if (send(sock, strcat(password, "\r\n")) == -1) throw NULL; while((s = select(sock, 1)) > 0 && (buf = recv(sock)) != NULL && strlen(buf) > 0) if (s == -1) throw NULL; //ignore all garbage if (send(sock, strcat(cmd, "\r\n")) == -1) throw NULL; //send command rbuf =""; while((s = select(sock, 1)) > 0 && (buf = recv(sock)) != NULL && strlen(buf) > 0){ if (s == -1) throw NULL; else rbuf = strcat(rbuf, buf); // collect return } rbuf = right(rbuf, strlen(rbuf) - strlen(cmd) - 2); //cut cmd if (pos = strrchr(rbuf, "\r")) rbuf = left(rbuf, pos); throw rbuf; } catch (ret) { close (sock); return ret; } } printf("date = <%s>\n", telnet("192.168.1.1", 23, "root", "password", "date")); // show date printf("uptime = <%s>\n", telnet("192.168.1.1", 23, "root", "password", "uptime | awk \x27{print $8}\x27")); //CPU load. Values 0.00-1.00 0=none, max=1.00(100%) printf("free mem = <%s>\n", telnet("192.168.1.1", 23, "root", "password", "free | grep Total | awk \x27{print $3/$2}\x27")); //show free memory Values 0-1 0=none, max=1(100%) printf("ps = %s\n", telnet("192.168.1.1", 23, "root", "password", "ps")); // show processes