fakefull_original

/* AMX Mod X script.
*
* FakeFull (fakefull_original.sma)
* Copyright © 2003-2006 Freecode/JTP10181
*
* 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 2
* 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, write to the Free Software
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
*
* In addition, as a special exception, the author gives permission to
* link the code of this program with the Half-Life Game Engine ("HL
* Engine") and Modified Game Libraries ("MODs") developed by Valve,
* L.L.C ("Valve"). You must obey the GNU General Public License in all
* respects for all of the code used other than the HL Engine and MODs
* from Valve. If you modify this file, you may extend this exception
* to your version of the file, but you are not obligated to do so. If
* you do not wish to do so, delete this exception statement from your
* version.
*
****************************************************************************
*
* Version 1.7.6 Date: 08/09/2006
*
* Original Author: Freecode freecode@hotmail.com
* Current Author: JTP10181 jtp@jtpage.net
*
****************************************************************************
*
* Based on OLO's FakeFull metamod plugin. Fake clients
* connect to the server when its empty. Everytime someone
* joins and there is no more spots left for another person
* one fake client is removed. When the server is empty
* and FakeFull is on Automatic mode it will add
* a fake client. Once the # of fake clients and real players
* equals to ff_players it will stop.
*
* Commands:
*
* amx_addfake <# | @FILL> Add # of bots or fill the server
*
* amx_removefake <# | @ALL> Remove # of bots or remove all
*
*
* CVARs: Paste the following into your amxx.cfg to change defaults.
* You must uncomment cvar lines for them to take effect
*
****************************************************************************
* CVAR CONFIG BEGIN
****************************************************************************

// ****************** FakeFull Settings ******************

//Turns Automatic mode on.
//ff_players must be set higher then 0.
//<1 = ON || 0 = OFF>
//ff_automode 1

//Minimal number of fake and real clients on the server.
//Fake clients will be kicked so that the total players on the
//Server equals this number. If there are more players than this
//All the fake players will be gone. Do NOT set this at or aboive
//your max player count or no one will be able to join
//REQUIRED to be above 0 for Automatic mode.
//ff_players 4

//Delay between each fake client joins/leaves.
//REQUIRED to be above 0 for Automatic mode and regular bot add.
//ff_delay 1

****************************************************************************
* CVAR CONFIG END
****************************************************************************
*
* Setup for Automatic Mode:
*
* Set ff_players to the number of fake clients you want in server at max.
* Turn on ff_automode.
*
* Changelog:
*
* v1.7.6 - JTP10181 - 08/09/06
* - Set team to UNASSIGNED for CS so they wont join teams
*
* v1.7.5 - JTP10181 - 08/03/06
* - Got rid of need for engine module
* - Upgraded to pCVARS
* - Finally put an end to fakes ending up with models and being seen as ghost players
*
* v1.7.4 - JTP10181 - 07/01/06
* - Fixed bug in team checking causing fakes on team "-1" to get kicked
* - Upgraded to new file natives
*
* v1.7.3 - JTP10181 - 4/21/06
* - Added code to kick bots if they get on a team somehow
*
* v1.7.2 - JTP10181
* - Added new line of code per suggestion on a forum post, to prevent crashing
*
* v1.7.1 - JTP10181
* - Cleaned up massive code, hopefully no more crashing
* - Renamed CVARS and commands
* - Added feature to randomly add frags to the fake clients
*
* v1.7 - JTP10181
* - Ported fake client creation to new method using AMXX. No longer needs module.
* - Changed bot name file to botnames.txt
*
* v1.6.1 - JTP
* - Fixed bug that could get server stuck in an infinite loop
* - Fixed bug that caused dupe names sometimes
*
* v1.6 - JTP
* - Ported to AMXx
* - Fixed mem leak/overflow bug caused by some of my code
* - Fixed bugs where it was not removing the fakes automatically
* - Rewrote a lot of the createBot function to make it more effecient
* and less likely to cause mem overflows from looping
* - Fixed bugs when setting the max_names higher.
* - Must have the botnames.cfg now, no defaults are embedded in the script
* - Fixed bug where playnames array was 1000 length for the names, made plugin huge.
*
* v1.5
* - Custom names and reading names from botnames.cfg
*
* Below v1.6 was maintained by FreeCode
*
****************************************************************************/
#include <amxmodx>
#include <amxmisc>
#include <fakemeta>
#include <cstrike>
#include <fun>

new const Plugin[] = "FakeFull Original"
new const Version[] = "1.7.6"
new const Author[] = "JTP10181/Freecode/AssKicR"

#define MAX_NAMES 256

new bool:is_user_ffbot[33]
new bool:checkingStatus = false
new bool:changingBots = false
new botCount = 0, namesread = 0
new namesToUse[MAX_NAMES][33]
new pDelay, pAuto, pPlayers

public plugin_init()
{
register_plugin(Plugin,Version,Author)
pAuto = register_cvar("ff_automode","0")
pPlayers = register_cvar("ff_players","2")
pDelay = register_cvar("ff_delay","1")
register_concmd("amx_addfake","botadd",ADMIN_BAN,"<# | @FILL> - add this many bots")
register_concmd("amx_removefake","botremove",ADMIN_BAN,"<# | @ALL> - remove this many bots")
set_task(10.0,"ServerStatus",0,_,_,"b")
ReadNames()

//Setup jtp10181 CVAR
new cvarString[256], shortName[16]
copy(shortName,15,"ff")

register_cvar("jtp10181","",FCVAR_SERVER|FCVAR_SPONLY)
get_cvar_string("jtp10181",cvarString,255)

if (strlen(cvarString) == 0) {
formatex(cvarString,255,shortName)
set_cvar_string("jtp10181",cvarString)
}
else if (contain(cvarString,shortName) == -1) {
format(cvarString,255,"%s,%s",cvarString, shortName)
set_cvar_string("jtp10181",cvarString)
}
}

public plugin_natives()
{
set_module_filter("module_filter")
set_native_filter("native_filter")
}

public module_filter(const module[])
{
if (!cstrike_running() && equali(module, "cstrike")) {
return PLUGIN_HANDLED
}

return PLUGIN_CONTINUE
}

public native_filter(const name[], index, trap)
{
if (!trap) return PLUGIN_HANDLED

return PLUGIN_CONTINUE
}

public botadd(id,level,cid)
{
if (!cmd_access(id,level,cid,1)) return PLUGIN_HANDLED

new arg[10], botNum

if (read_argc() == 1) botNum = 1
else {
read_argv(1,arg,9)
if (equali(arg,"@FILL")) botNum = get_maxplayers() - get_playersnum(1)
else botNum = str_to_num(arg)
}

if (botNum <=0 || botNum > get_maxplayers() - get_playersnum(1)) {
console_print(id,"[AMXX] Invalid number of bots to add")
return PLUGIN_HANDLED
}

new Float:botDelay = get_pcvar_float(pDelay)
console_print(id,"[AMXX] Adding %d bots with %.1f second delay for each",botNum,botDelay)
set_task(botDelay,"createBot",0,_,_,"a",botNum)
set_task(botDelay * (botNum + 1),"doneChanging")
changingBots = true

return PLUGIN_HANDLED
}

public botremove(id,level,cid)
{
if (!cmd_access(id,level,cid,1)) return PLUGIN_HANDLED

new arg[10], botNum

if (read_argc() == 1) botNum = 1

else {
read_argv(1,arg,9)
if (equali(arg,"@ALL")) botNum = botCount
else botNum = str_to_num(arg)
}

if (botNum <=0 || botNum > botCount) {
console_print(id,"[AMXX] Invalid number of bots to remove")
return PLUGIN_HANDLED
}

new Float:botDelay = get_pcvar_float(pDelay)
console_print(id,"[AMXX] Removing %d bots with %.1f second delay for each",botNum,botDelay)
set_task(botDelay,"removeBot",0,_,_,"a",botNum)
set_task(botDelay * (botNum + 1),"doneChanging")
changingBots = true

return PLUGIN_HANDLED
}

public client_putinserver(id)
{
//Don't want anyone going invisible on us
set_pev(id, pev_rendermode, kRenderNormal)

is_user_ffbot[id] = false
ServerStatus()
}

public client_disconnect(id)
{
is_user_ffbot[id] = false
ServerStatus()
}

public createBot()
{
new bool:UseAnotherName
new BotName[33], UserNames[33][33]
new name_rand = random_num(0,namesread - 1)
new endLoop = name_rand - 1
if (endLoop < 0) endLoop = namesread - 1

//Save all the usernames so we dont have to keep getting them all
for (new x = 1; x <= 32; x++) {
if (!is_user_connected(x)) continue
get_user_name(x,UserNames[x],32)
}

do {
UseAnotherName = false
copy(BotName,32,namesToUse[name_rand])

for (new id = 1; id <= 32; id++) {

if (!is_user_connected(id)) continue

if (equali(BotName,UserNames[id])) {
UseAnotherName = true

if (name_rand == endLoop) {
UseAnotherName = false
log_amx("ERROR: Ran out of names to use, please add more to botnames.ini")
}

name_rand++
if (name_rand > namesread - 1) {
name_rand = 0
}
break
}
}
} while(UseAnotherName)

new Bot = engfunc(EngFunc_CreateFakeClient, BotName)

if (Bot > 0) {
//Supposed to prevent crashes?
dllfunc(MetaFunc_CallGameEntity, "player", Bot)
set_pev(Bot, pev_flags, FL_FAKECLIENT)

//Make Sure they have no model
set_pev(Bot, pev_model, "")
set_pev(Bot, pev_viewmodel2, "")
set_pev(Bot, pev_modelindex, 0)

//Make them invisible for good measure
set_pev(Bot, pev_renderfx, kRenderFxNone)
set_pev(Bot, pev_rendermode, kRenderTransAlpha)
set_pev(Bot, pev_renderamt, 0.0)

//Set the team if we need to for this mod
set_team(Bot)

is_user_ffbot[Bot] = true
botCount++
}
}

public removeBot()
{
for(new id = 1; id <= 32; id++) {
if (is_user_ffbot[id]) {
server_cmd("kick #%d",get_user_userid(id))
is_user_ffbot[id] = false
botCount--
return
}
}
}

public doneChanging()
{
changingBots = false
}

public ServerStatus()
{
if ( !get_pcvar_num(pAuto) ) return
if ( checkingStatus || changingBots ) return

checkingStatus = true
new rnd

if (botCount > 0) {
for (new id = 1; id <= 32; id++) {

if (!is_user_connected(id)) continue
if (!is_user_ffbot[id]) continue
rnd = random_num(1,100)
if (rnd <= 10) {
set_user_frags(id,get_user_frags(id) + 1)
}

//Set the team if we need to for this mod
set_team(id)

if (get_user_team(id) > 0) {
server_cmd("kick #%d",get_user_userid(id))
is_user_ffbot[id] = false
botCount--
}
}
}

new pnum = get_playersnum(1)
new maxplayers = get_maxplayers()
new ff_players = get_pcvar_num(pPlayers)
new Float:botDelay = get_pcvar_float(pDelay)

if (ff_players > maxplayers - 2) {
ff_players = maxplayers - 2
set_pcvar_num(pPlayers, ff_players)
}

if (botDelay <= 0.0 ) {
log_amx("ERROR: Please set ff_delay to a number higher than 0")
}

else if (ff_players > pnum) {
new addnum = ff_players - pnum
set_task(botDelay,"createBot",0,_,_,"a",addnum)
set_task(botDelay * (addnum + 1),"doneChanging")
changingBots = true
}

else if (ff_players < pnum) {
new removenum = pnum - ff_players
removenum = min(removenum, botCount)

if (removenum > 0) {
set_task(botDelay,"removeBot",0,_,_,"a",removenum)
set_task(botDelay * (removenum + 1),"doneChanging")
changingBots = true
}
}

checkingStatus = false
}

public set_team(BotID)
{
if (cstrike_running()) {
cs_set_user_team(BotID, CS_TEAM_UNASSIGNED)
}
}

public ReadNames() {

new botnames_file[128]
get_configsdir(botnames_file, 63)
format(botnames_file,127,"%s/botnames.txt",botnames_file)

new botnames = fopen(botnames_file,"r")

if (botnames) {
new data[35]

while(!feof(botnames)) {

if (namesread >= MAX_NAMES) {
log_amx("MAX_NAMES exceeded, not all fake client names were able to load")
break
}

fgets(botnames, data, 34)
trim(data)

new len = strlen(data)
if (len <= 0) return
if (data[len]-1 == '^n') data[--len] = 0

if (equal(data,"") || equal(data,"#",1)) continue

copy(namesToUse[namesread],32,data)
namesread++
}

fclose(botnames)
}
else {
new failmsg[128]
formatex(failmsg,128,"Unable to read file ^"%s^", it is required to load bot names from", botnames_file)
log_amx(failmsg)
set_fail_state(failmsg)
}
}