Subversion Repositories cryptochat

<?php

/*

 * ViaThinkSoft CryptoChat

 * Copyright 2014 - 2018 Daniel Marschall, ViaThinkSoft

 *

 * Licensed under the Apache License, Version 2.0 (the "License");

 * you may not use this file except in compliance with the License.

 * You may obtain a copy of the License at

 *

 *     http://www.apache.org/licenses/LICENSE-2.0

 *

 * Unless required by applicable law or agreed to in writing, software

 * distributed under the License is distributed on an "AS IS" BASIS,

 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.

 * See the License for the specific language governing permissions and

 * limitations under the License.

 */

// -----------------------------------------------------------------------------------------------

// feature: user comes online, user comes offline, user is inactive, user is active, user is typing, get user list

// todo: hide password length to avoid screensaves revealing confidential information

// feature: split screen (frames), with united document.title ! (sum unread posts of each chat)

// ng: smileys

// ng: roomname, username encrypt

// ng: sha3

// ng: maybe it would be usefil if you could see by different colors if something was encrypted using a different password

// bug: some browsers cannot mark the last line, otherwise everything will be marked

// bug: offline detection does not work...

// todo: "reset chat" (counter=0, document='') while pwd change?

// feature: verhindern dass man etwas postet ohne ein passwort eingegeben zu haben? -> config

// feature: posts durchnumerieren?

// bug openpandora: password field on change geht net (cannot repro all the time?) ist !== null ok? (fixed now?)

// bug cheery laptop: froze, didn't check new messages (mehrfach. repro? Aurora 24.2.0 Gentoo). eigene kommen nicht an. nach einer weile geht es plötzlich wieder? evtl ist vts request 1 mal fehlgeschlagen. (fixed now with fail callbacks?)

// feature: shift+enter = new line without sending?

// rp feature: ((->[i] , rp notizen + cors

// feature: send files?

// feature: dereferer

// feature: configuration option to show a drop down box with all chat rooms

// todo: always renew cache

// todo: warn if config is not correct, e.g. admin password missing

// feature: prevent making screenshots? keep clipboard empty?

// feature: detect NoScript

// todo: onChatHide() does not get called when tab is active (and visible), but browser window hasn't the focus

// feature: loginmessage. show version of user. user soll bei jedem ajax-verkehr die version mitsenden, damit der server ihn ablehnen kann wenn die version zu alt ist!. ggf ein re-load forcing (self.reload in same room/user/pwd)?

// idea: undo decryption if pwd field changed? delete pwd field and save actual decryption key in VAR array. so no screenloggers can see

// feature?: possibility to disable hash? just try to do AES.

// feature?: possibility to disable user stats or to prune them.

// feature?: possibility to prune chat

// feature?: send pwd hashed with refresh() so you can see which key(s) the active users use?

// feature?: at "(Logging off)"-Message sending: remove DIRECTLY from stat list

// feature: when configuration symbols are not defined, redefine them with default settings

// feature: online list - instead of showing 2 same names, just write "x2"

// -----------------------------------------------------------------------------------------------

if (!file_exists(__DIR__ . '/config/config.inc.php')) {

        die('ERROR: File <b>config/config.inc.php</b> does not exist. Please create it using <b>config/config.original.inc.php</b>');

}

require __DIR__ . '/config/config.inc.php';

define('PRODUCT_NAME', 'CryptoChat');

define('MCC_VER',      trim(file_get_contents(__DIR__ . '/VERSION')));

if (!function_exists('get_magic_quotes_gpc')) {

        // Required by sajax.php

        function get_magic_quotes_gpc() {

                return false;

        }

}

require __DIR__ . '/' . DEP_DIR_SAJAX       . '/php/sajax.php';

require __DIR__ . '/' . DEP_DIR_JSONWRAPPER . '/jsonwrapper.php'; // TODO: make optional. only required if running with PHP 5.1

header('Content-type: text/html; charset=utf-8');

if ((REQUIRE_TLS) && (!is_secure())) {

        // TODO: redirect

        echo '<h1>Please connect via HTTPS or change <b>REQUIRE_TLS</b> to false.</h1>';

        die();

}

define('ACTION_LIST_ROOMS',  1);

define('ACTION_CREATE_ROOM', 2);

$ses_room  = (isset($_POST['ses_room']))  ? trim($_POST['ses_room'])  : '';

$ses_user  = (isset($_POST['ses_user']))  ? trim($_POST['ses_user'])  : '';

$admin_pwd = (isset($_POST['admin_pwd'])) ? trim($_POST['admin_pwd']) : '';

$ses_room = trim(strtolower($ses_room));

$ses_user = trim($ses_user);

// $admin_pwd will be trimmed in adminAuth()

$chat_exists = (!CHAT_MUST_EXIST) || (adminAuth($admin_pwd, ACTION_CREATE_ROOM)) || chat_exists($ses_room);

$is_logged_in = ($ses_room != '') && ($ses_user != '') && $chat_exists;

$show_list    = isset($_REQUEST['list_chatrooms']) && (!LIST_CHATS_REQUIRE_PWD || adminAuth($_POST['admin_pwd'], ACTION_LIST_ROOMS));

if ($is_logged_in) {

        $chatroom_file = chatroom_file($ses_room);

        touch($chatroom_file);

}

function adminAuth($password, $action) {

        if ($action == ACTION_LIST_ROOMS) {

                // if (trim(PWD_LIST_ROOMS) == '') return false;

                return (trim($password) == trim(PWD_LIST_ROOMS));

        } else if ($action == ACTION_CREATE_ROOM) {

                // if (trim(PWD_CREATE_ROOM) == '') return false;

                return (trim($password) == trim(PWD_CREATE_ROOM));

        } else {

                throw new Exception('Unknown action');

        }

}

function is_secure() {

        // https://stackoverflow.com/questions/1175096/how-to-find-out-if-you-are-using-https-without-serverhttps

        if(isset($_SERVER['HTTPS'])) {

                if ($_SERVER['HTTPS'] == 'on') {

                        return true;

                }

        }

        return false;

}

function chat_exists($room) {

        return file_exists(chatroom_file($room));

}

function chatroom_file($room) {

        return __DIR__ . '/chats/'.escape_filename($room).'.html';

}

function chatroom_userstat_file($room, $unique_id) {

        return __DIR__ . '/chats/'.escape_filename($room).'_'.escape_filename($unique_id).'.session';

}

function chatroom_userstat_files($room) {

        $ses_ids = array();

        $ary = glob(__DIR__ . '/chats/'.escape_filename($room).'_*.session');

        foreach ($ary as &$a) {

                if (!preg_match('@'.preg_quote(__DIR__ . '/chats/'.escape_filename($room).'_').'(.+)\.session@ismU', $a, $m)) {

                        die('Internal error at '.__LINE__);

                }

                $ses_ids[] = $m[1];

        }

        return $ses_ids;

}

function write_user_stat($room, $unique_id, $username, $ip) {

        $file = chatroom_userstat_file($room, $unique_id);

        $cont  = '';

#       $cont .= "ROOM:$room\n";

        $cont .= "USERNAME:$username\n";

#       $cont .= "UNIQUEID:$unique_id\n";

        $cont .= "IP:$ip\n";

#       $now=time(); $cont .= "ACTIVE:$now\n";

#       $key=...; $cont .= "KEY:$key\n";

        file_put_contents($file, $cont);

}

function file_age($file) {

        return time()-filemtime($file);

}

function get_active_users($room, $max_inactivity=USERSTAT_INACTIVE_SECS) {

        $ses_ids = array();

        $all_ses_ids = chatroom_userstat_files($room);

        foreach ($all_ses_ids as &$ses_id) {

                $file = chatroom_userstat_file($room, $ses_id);

                if (file_age($file) <= $max_inactivity) {

                        $ses_ids[] = $ses_id;

                } else {

                        if (DELETE_OLD_USERSTATS) {

                                $file = chatroom_userstat_file($room, $ses_id);

                                unlink($file);

                        }

                }

        }

        return $ses_ids;

}

function read_user_stat($room, $unique_id) {

        $res = array();

        $file = chatroom_userstat_file($room, $unique_id);

        if (!file_exists($file)) return false;

        $cont = file($file);

        foreach ($cont as &$c) {

                $c = trim($c);

                if ($c == '') continue;

                $nameval = explode(':', $c, 2);

                if (count($nameval) < 2) continue;

                $name = $nameval[0];

                $val  = $nameval[1];

                $res[$name] = $val;

        }

        $res['ACTIVE']   = filemtime($file);

        $res['ROOM']     = $room;

        $res['UNIQUEID'] = $unique_id;

        return $res;

}

function list_rooms() {

        $ary = glob(__DIR__ . '/chats/*.html');

        foreach ($ary as &$a) {

                $a = basename($a, '.html');

        }

        return $ary;

}

function count_messages($room) {

        $room_file = chatroom_file($room);

        return count(file($room_file));

}

function count_users($room) {

        $room_file = chatroom_file($room);

        $cont = file_get_contents($room_file);

        preg_match_all('@\(user:(.*)\)@ismU', $cont, $m);

        $users_lookup = array();

        foreach ($m[1] as &$us) {

                $users_lookup[$us] = true;

        }

        return count($users_lookup);

}

function escape_filename($str) {

        $str = str_replace('/', '_', $str);

        return $str;

}

/* exported via AJAX */

function add_line($id, $room, $user, $msg) {

        if (!chat_exists($room)) return;

        if ($user == '') return;

        $f = fopen(chatroom_file($room), 'a');

        $dt = date('Y-m-d H:i:s');

//      $msg = stripslashes($msg);

        $remote = $_SERVER['REMOTE_ADDR'];

        // Escape stuff

        $user = htmlentities($user, ENT_QUOTES, 'UTF-8');

        $msg  = htmlentities($msg,  ENT_QUOTES, 'UTF-8');

        $msgs = explode("\n", $msg);

        foreach ($msgs as &$msg) {

                fwrite($f, "(date: $dt)(user: $user)$msg<br>\n");

        }

        fclose($f);

        return array($id);

}

/* exported via AJAX */

function refresh($room, $fromline, $username, $unique_id) {

        if (!chat_exists($room)) return;

        if ($fromline < 0) return;

        $unique_id = trim($unique_id);

        if ($unique_id == '') {

                # TODO: show error message

                return false;

        }

        write_user_stat($room, $unique_id, $username, $_SERVER['REMOTE_ADDR']);

        $res = '';

        $lines = file(chatroom_file($room));

        for ($i=$fromline; $i<count($lines); $i++) {

                $res .= $lines[$i] . "\n";

        }

        $userstats = array();

        $ses_ids = get_active_users($room);

        foreach ($ses_ids as &$ses_id) {

                $userstats[] = read_user_stat($room, $ses_id);

        }

        return array(count($lines), $res, $userstats);

}

// $sajax_debug_mode = true;

$sajax_failure_redirect = 'http://web.archive.org/web/20090915191608/http://sajax.info/sajaxfail.html';

sajax_export( /** @phpstan-ignore-line */ // PHPstan thinks that sajax_export() only accepts 0 parameters?!

        array('name' => 'add_line', 'method' => 'POST'),

        array('name' => 'refresh',  'method' => 'GET')   // TODO: post?

);

sajax_handle_client_request();

?>

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"

        "http://www.w3.org/TR/html4/loose.dtd">

<html>

<head>

        <META HTTP-EQUIV="content-type" CONTENT="text/html; charset=utf-8">

        <title><?php echo htmlentities(PRODUCT_NAME); ?></title>

        <style>

        body {

                background-color:#000011;

                color:white;

                font-family:Arial;

                font-size:13px;

        }

        body.chatroom {

                margin: 0;

                background-color:#000011;

                color:white;

                font-family:Arial;

                font-size:13px;

        }

        thead td {

                font-weight:bold;

                background-color:#000044;

        }

        .encrypted {

                color:orange;

        }

        .error {

                color:#dd0000;

        }

        input, textarea {

                background-color:#000011;

                color:white;

        }

        #postarea textarea {

                width:80%;

                background-color:#000011;

                color:white;

        }

        #header {

                padding:5px;

                position:fixed;

                background-color:#000044;

                color:white;

                width:100%;

                height: 50px;

        }

        #status {

                position:fixed;

                right:5px;

                top:5px;

        }

        #chatmessages {

                padding-bottom:115px;

                padding-top: 65px;

                padding-left: 5px;

                padding-right: 5px;

        }

        #activeusers {

                position:fixed;

                top:65px;

                /*bottom:115px;*/

                right:5px;

                /*height:100px;*/

                width:150px;

                background-color:#222222;

                padding:10px;

        }

        #postarea {

                padding:5px;

                position: fixed;

                bottom:0;

                height: 100px;

                width: 100%;

                background-color:#000044;

                color:white;

        }

        .button {

                /* http://www.drweb.de/magazin/browser-cursor-hand/ */

                cursor: hand; cursor: pointer;

                font-family: Arial;

                color:white;

                background-color: #000022;

                border-color:#000000;

                border-style: inset;

        }

        .button:hover {

                color:yellow;

        }

        label {

                /* http://www.drweb.de/magazin/browser-cursor-hand/ */

                cursor: hand; cursor: pointer;

        }

        label:hover {

                color:yellow;

        }

        a:link {

                color:#ffdd00;

        }

        a:visited {

                color:darkred;

        }

        a:active, a:hover {

                color:white;

        }

        .logout a {

                color:white;

        }

        .logout a:hover {

                color:orange;

        }

        .logout {

                margin-left: 20px;

        }

        </style>

<?php

if ($is_logged_in) {

?>

        <script type="text/javascript" src="<?php echo DEP_DIR_CRYPTOJS; ?>/rollups/sha256.js"></script>

        <script type="text/javascript" src="<?php echo DEP_DIR_CRYPTOJS; ?>/rollups/aes.js"></script>

        <script type="text/javascript" src="<?php echo DEP_DIR_CRYPTOJS; ?>/rollups/md5.js"></script>

        <script type="text/javascript" src="<?php echo DEP_DIR_SAJAX; ?>/php/json_stringify.js"></script>

        <script type="text/javascript" src="<?php echo DEP_DIR_SAJAX; ?>/php/json_parse.js"></script>

        <script type="text/javascript" src="<?php echo DEP_DIR_SAJAX; ?>/php/sajax.js"></script>

        <script type="text/javascript" src="<?php echo DEP_DIR_CRC32; ?>/crc32.js"></script>

        <script type="text/javascript">

        <?php

        sajax_show_javascript();

        ?>

        var product = <?php echo json_encode(PRODUCT_NAME); ?>;

        var version = <?php echo json_encode(MCC_VER); ?>;

        var room = <?php echo json_encode($ses_room); ?>;

        var user = <?php echo json_encode($ses_user); ?>;

        var curseq = 0;

        var roomSalt = "<?php echo sha1(X_SALT.$ses_room); ?>";

        var curVisible = true;

        var backgroundSeqCount = 0;

        var blink = 0;

        var uniqueID = "";

        // --- Useful functions

        function scrollToBottom() {

                // http://www.sourcetricks.com/2010/07/javascript-scroll-to-bottom-of-page.html

                window.scrollTo(0, document.body.scrollHeight);

        }

        function randNum(min, max) {

                return Math.floor((Math.random()*max)+min);

        }

        // http://stackoverflow.com/questions/1349404/generate-a-string-of-5-random-characters-in-javascript/1349426#1349426

        function randomString(len) {

                var text = "";

                var possible = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789";

                for( var i=0; i < len; i++ ) {

                        text += possible.charAt(Math.floor(Math.random() * possible.length));

                }

                return text;

        }

        // Array Remove - By John Resig (MIT Licensed)

        Array.prototype.remove = function(from, to) {

                var rest = this.slice((to || from) + 1 || this.length);

                this.length = from < 0 ? this.length + from : from;

                return this.push.apply(this, rest);

        };

        function sleep(milliseconds) {

                // http://www.phpied.com/sleep-in-javascript/

                var start = new Date().getTime();

                for (var i = 0; i < 1e7; i++) {

                        if ((new Date().getTime() - start) > milliseconds) {

                                break;

                        }

                }

        }

        function get_html_translation_table(table, quote_style) {

                // From: http://phpjs.org/functions

                // +   original by: Philip Peterson

                // +    revised by: Kevin van Zonneveld (http://kevin.vanzonneveld.net)

                // +   bugfixed by: noname

                // +   bugfixed by: Alex

                // +   bugfixed by: Marco

                // +   bugfixed by: madipta

                // +   improved by: KELAN

                // +   improved by: Brett Zamir (http://brett-zamir.me)

                // +   bugfixed by: Brett Zamir (http://brett-zamir.me)

                // +      input by: Frank Forte

                // +   bugfixed by: T.Wild

                // +      input by: Ratheous

                // %          note: It has been decided that we're not going to add global

                // %          note: dependencies to php.js, meaning the constants are not

                // %          note: real constants, but strings instead. Integers are also supported if someone

                // %          note: chooses to create the constants themselves.

                // *     example 1: get_html_translation_table('HTML_SPECIALCHARS');

                // *     returns 1: {'"': '&quot;', '&': '&amp;', '<': '&lt;', '>': '&gt;'}

                var entities = {},

                        hash_map = {},

                        decimal;

                var constMappingTable = {},

                        constMappingQuoteStyle = {};

                var useTable = {},

                        useQuoteStyle = {};

                // Translate arguments

                constMappingTable[0] = 'HTML_SPECIALCHARS';

                constMappingTable[1] = 'HTML_ENTITIES';

                constMappingQuoteStyle[0] = 'ENT_NOQUOTES';

                constMappingQuoteStyle[2] = 'ENT_COMPAT';

                constMappingQuoteStyle[3] = 'ENT_QUOTES';

                useTable = !isNaN(table) ? constMappingTable[table] : table ? table.toUpperCase() : 'HTML_SPECIALCHARS';

                useQuoteStyle = !isNaN(quote_style) ? constMappingQuoteStyle[quote_style] : quote_style ? quote_style.toUpperCase() : 'ENT_COMPAT';

                if (useTable !== 'HTML_SPECIALCHARS' && useTable !== 'HTML_ENTITIES') {

                        throw new Error("Table: " + useTable + ' not supported');

                        // return false;

                }

                entities['38'] = '&';

                if (useTable === 'HTML_ENTITIES') {

                        entities['160'] = ' ';

                        entities['161'] = '¡';

                        entities['162'] = '¢';

                        entities['163'] = '£';

                        entities['164'] = '¤';

                        entities['165'] = '¥';

                        entities['166'] = '¦';

                        entities['167'] = '§';

                        entities['168'] = '¨';

                        entities['169'] = '©';

                        entities['170'] = 'ª';

                        entities['171'] = '«';

                        entities['172'] = '¬';

                        entities['173'] = '­';

                        entities['174'] = '®';

                        entities['175'] = '¯';

                        entities['176'] = '°';

                        entities['177'] = '±';

                        entities['178'] = '²';

                        entities['179'] = '³';

                        entities['180'] = '´';

                        entities['181'] = 'µ';

                        entities['182'] = '¶';

                        entities['183'] = '·';

                        entities['184'] = '¸';

                        entities['185'] = '¹';

                        entities['186'] = 'º';

                        entities['187'] = '»';

                        entities['188'] = '¼';

                        entities['189'] = '½';

                        entities['190'] = '¾';

                        entities['191'] = '¿';

                        entities['192'] = 'À';

                        entities['193'] = 'Á';

                        entities['194'] = 'Â';

                        entities['195'] = 'Ã';

                        entities['196'] = 'Ä';

                        entities['197'] = 'Å';

                        entities['198'] = 'Æ';

                        entities['199'] = 'Ç';

                        entities['200'] = 'È';

                        entities['201'] = 'É';

                        entities['202'] = 'Ê';

                        entities['203'] = 'Ë';

                        entities['204'] = 'Ì';

                        entities['205'] = 'Í';

                        entities['206'] = 'Î';

                        entities['207'] = 'Ï';

                        entities['208'] = 'Ð';

                        entities['209'] = 'Ñ';

                        entities['210'] = 'Ò';

                        entities['211'] = 'Ó';

                        entities['212'] = 'Ô';

                        entities['213'] = 'Õ';

                        entities['214'] = 'Ö';

                        entities['215'] = '×';

                        entities['216'] = 'Ø';

                        entities['217'] = 'Ù';

                        entities['218'] = 'Ú';

                        entities['219'] = 'Û';

                        entities['220'] = 'Ü';

                        entities['221'] = 'Ý';

                        entities['222'] = 'Þ';

                        entities['223'] = 'ß';

                        entities['224'] = 'à';

                        entities['225'] = 'á';

                        entities['226'] = 'â';

                        entities['227'] = 'ã';

                        entities['228'] = 'ä';

                        entities['229'] = 'å';

                        entities['230'] = 'æ';

                        entities['231'] = 'ç';

                        entities['232'] = 'è';

                        entities['233'] = 'é';

                        entities['234'] = 'ê';

                        entities['235'] = 'ë';

                        entities['236'] = 'ì';

                        entities['237'] = 'í';

                        entities['238'] = 'î';

                        entities['239'] = 'ï';

                        entities['240'] = 'ð';

                        entities['241'] = 'ñ';

                        entities['242'] = 'ò';

                        entities['243'] = 'ó';

                        entities['244'] = 'ô';

                        entities['245'] = 'õ';

                        entities['246'] = 'ö';

                        entities['247'] = '÷';

                        entities['248'] = 'ø';

                        entities['249'] = 'ù';

                        entities['250'] = 'ú';

                        entities['251'] = 'û';

                        entities['252'] = 'ü';

                        entities['253'] = 'ý';

                        entities['254'] = 'þ';

                        entities['255'] = 'ÿ';

                }

                if (useQuoteStyle !== 'ENT_NOQUOTES') {

                        entities['34'] = '"';

                }

                if (useQuoteStyle === 'ENT_QUOTES') {

                        entities['39'] = ''';

                }

                entities['60'] = '<';

                entities['62'] = '>';

                // ascii decimals to real symbols

                for (decimal in entities) {

                        if (entities.hasOwnProperty(decimal)) {

                                hash_map[String.fromCharCode(decimal)] = entities[decimal];

                        }

                }

                return hash_map;

        }

        function htmlentities(string, quote_style, charset, double_encode) {

                // From: http://phpjs.org/functions

                // +   original by: Kevin van Zonneveld (http://kevin.vanzonneveld.net)

                // +    revised by: Kevin van Zonneveld (http://kevin.vanzonneveld.net)

                // +   improved by: nobbler

                // +    tweaked by: Jack

                // +   bugfixed by: Onno Marsman

                // +    revised by: Kevin van Zonneveld (http://kevin.vanzonneveld.net)

                // +    bugfixed by: Brett Zamir (http://brett-zamir.me)

                // +      input by: Ratheous

                // +   improved by: Rafa. Kukawski (http://blog.kukawski.pl)

                // +   improved by: Dj (http://phpjs.org/functions/htmlentities:425#comment_134018)

                // -    depends on: get_html_translation_table

                // *     example 1: htmlentities('Kevin & van Zonneveld');

                // *     returns 1: 'Kevin & van Zonneveld'

                // *     example 2: htmlentities("foo'bar","ENT_QUOTES");

                // *     returns 2: 'foo'bar'

                var hash_map = this.get_html_translation_table('HTML_ENTITIES', quote_style),

                        symbol = '';

                string = string == null ? '' : string + '';

                if (!hash_map) {

                        return false;

                }

                if (quote_style && quote_style === 'ENT_QUOTES') {

                        hash_map["'"] = ''';

                }

                if (!!double_encode || double_encode == null) {         // TODO: korrekt "== null"? nicht "!= null"?

                        for (symbol in hash_map) {

                                if (hash_map.hasOwnProperty(symbol)) {

                                        string = string.split(symbol).join(hash_map[symbol]);

                                }

                        }

                } else {

                        string = string.replace(/([\s\S]*?)(&(?:#\d+|#x[\da-f]+|[a-zA-Z][\da-z]*);|$)/g, function (ignore, text, entity) {

                                for (symbol in hash_map) {

                                        if (hash_map.hasOwnProperty(symbol)) {

                                                text = text.split(symbol).join(hash_map[symbol]);

                                        }

                                }

                                return text + entity;

                        });

                }

                return string;

        }

        /* accepts parameters

         * h  Object = {h:x, s:y, v:z}

         * OR

         * h, s, v

         * This code expects 0 <= h, s, v <= 1

         * http://stackoverflow.com/a/17243070

        */

        function HSVtoRGB(h, s, v) {

                var r, g, b, i, f, p, q, t;