core/smn_lang.cpp
author David Anderson <dvander@alliedmods.net>
Sun Jul 06 04:49:55 2008 +0000 (2008-07-06)
branchrefac-jit
changeset 2168 c24a6fa957db
permissions -rw-r--r--
jit refactoring branch
dvander@2168
     1
/**
dvander@2168
     2
 * vim: set ts=4 :
dvander@2168
     3
 * =============================================================================
dvander@2168
     4
 * SourceMod
dvander@2168
     5
 * Copyright (C) 2004-2008 AlliedModders LLC.  All rights reserved.
dvander@2168
     6
 * =============================================================================
dvander@2168
     7
 *
dvander@2168
     8
 * This program is free software; you can redistribute it and/or modify it under
dvander@2168
     9
 * the terms of the GNU General Public License, version 3.0, as published by the
dvander@2168
    10
 * Free Software Foundation.
dvander@2168
    11
 * 
dvander@2168
    12
 * This program is distributed in the hope that it will be useful, but WITHOUT
dvander@2168
    13
 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
dvander@2168
    14
 * FOR A PARTICULAR PURPOSE.  See the GNU General Public License for more
dvander@2168
    15
 * details.
dvander@2168
    16
 *
dvander@2168
    17
 * You should have received a copy of the GNU General Public License along with
dvander@2168
    18
 * this program.  If not, see <http://www.gnu.org/licenses/>.
dvander@2168
    19
 *
dvander@2168
    20
 * As a special exception, AlliedModders LLC gives you permission to link the
dvander@2168
    21
 * code of this program (as well as its derivative works) to "Half-Life 2," the
dvander@2168
    22
 * "Source Engine," the "SourcePawn JIT," and any Game MODs that run on software
dvander@2168
    23
 * by the Valve Corporation.  You must obey the GNU General Public License in
dvander@2168
    24
 * all respects for all other code used.  Additionally, AlliedModders LLC grants
dvander@2168
    25
 * this exception to all derivative works.  AlliedModders LLC defines further
dvander@2168
    26
 * exceptions, found in LICENSE.txt (as of this writing, version JULY-31-2007),
dvander@2168
    27
 * or <http://www.sourcemod.net/license.php>.
dvander@2168
    28
 *
dvander@2168
    29
 * Version: $Id$
dvander@2168
    30
 */
dvander@2168
    31
dvander@2168
    32
#include "PluginSys.h"
dvander@2168
    33
#include "Translator.h"
dvander@2168
    34
#include "LibrarySys.h"
dvander@2168
    35
#include "sm_stringutil.h"
dvander@2168
    36
#include "PlayerManager.h"
dvander@2168
    37
dvander@2168
    38
static cell_t sm_LoadTranslations(IPluginContext *pCtx, const cell_t *params)
dvander@2168
    39
{
dvander@2168
    40
	char *filename, *ext;
dvander@2168
    41
	char buffer[PLATFORM_MAX_PATH];
dvander@2168
    42
	CPlugin *pl = (CPlugin *)g_PluginSys.FindPluginByContext(pCtx->GetContext());
dvander@2168
    43
dvander@2168
    44
	pCtx->LocalToString(params[1], &filename);
dvander@2168
    45
	UTIL_Format(buffer, sizeof(buffer), "%s", filename);
dvander@2168
    46
dvander@2168
    47
	/* Make sure there is no extension */
dvander@2168
    48
	if ((ext = strstr(buffer, ".txt")) != NULL
dvander@2168
    49
		|| (ext = strstr(buffer, ".cfg")) != NULL)
dvander@2168
    50
	{
dvander@2168
    51
		/* Simple heuristic -- just see if it's at the end and terminate if so */
dvander@2168
    52
		if ((unsigned)(ext - buffer) == strlen(buffer) - 4)
dvander@2168
    53
		{
dvander@2168
    54
			*ext = '\0';
dvander@2168
    55
		}
dvander@2168
    56
	}
dvander@2168
    57
dvander@2168
    58
	pl->GetPhrases()->AddPhraseFile(buffer);
dvander@2168
    59
dvander@2168
    60
	return 1;
dvander@2168
    61
}
dvander@2168
    62
dvander@2168
    63
static cell_t sm_SetGlobalTransTarget(IPluginContext *pContext, const cell_t *params)
dvander@2168
    64
{
dvander@2168
    65
	g_SourceMod.SetGlobalTarget(params[1]);
dvander@2168
    66
dvander@2168
    67
	return 1;
dvander@2168
    68
}
dvander@2168
    69
dvander@2168
    70
static cell_t sm_GetClientLanguage(IPluginContext *pContext, const cell_t *params)
dvander@2168
    71
{
dvander@2168
    72
	CPlayer *player = g_Players.GetPlayerByIndex(params[1]);
dvander@2168
    73
	if (!player || !player->IsConnected())
dvander@2168
    74
	{
dvander@2168
    75
		return pContext->ThrowNativeError("Invalid client index %d", params[1]);
dvander@2168
    76
	}
dvander@2168
    77
dvander@2168
    78
	return g_Translator.GetClientLanguage(params[1]);
dvander@2168
    79
}
dvander@2168
    80
dvander@2168
    81
static cell_t sm_GetServerLanguage(IPluginContext *pContext, const cell_t *params)
dvander@2168
    82
{
dvander@2168
    83
	return g_Translator.GetServerLanguage();
dvander@2168
    84
}
dvander@2168
    85
dvander@2168
    86
static cell_t sm_GetLanguageCount(IPluginContext *pContext, const cell_t *params)
dvander@2168
    87
{
dvander@2168
    88
	return g_Translator.GetLanguageCount();
dvander@2168
    89
}
dvander@2168
    90
dvander@2168
    91
static cell_t sm_GetLanguageInfo(IPluginContext *pContext, const cell_t *params)
dvander@2168
    92
{
dvander@2168
    93
	const char *code;
dvander@2168
    94
	const char *name;
dvander@2168
    95
dvander@2168
    96
	if (!g_Translator.GetLanguageInfo(params[1], &code, &name))
dvander@2168
    97
	{
dvander@2168
    98
		return pContext->ThrowNativeError("Invalid language number %d", params[1]);
dvander@2168
    99
	}
dvander@2168
   100
dvander@2168
   101
	pContext->StringToLocalUTF8(params[2], params[3], code, NULL);
dvander@2168
   102
	pContext->StringToLocalUTF8(params[4], params[5], name, NULL);
dvander@2168
   103
dvander@2168
   104
	return 1;
dvander@2168
   105
}
dvander@2168
   106
dvander@2168
   107
REGISTER_NATIVES(langNatives)
dvander@2168
   108
{
dvander@2168
   109
	{"LoadTranslations",			sm_LoadTranslations},
dvander@2168
   110
	{"SetGlobalTransTarget",		sm_SetGlobalTransTarget},
dvander@2168
   111
	{"GetClientLanguage",			sm_GetClientLanguage},
dvander@2168
   112
	{"GetServerLanguage",			sm_GetServerLanguage},
dvander@2168
   113
	{"GetLanguageCount",			sm_GetLanguageCount},
dvander@2168
   114
	{"GetLanguageInfo",				sm_GetLanguageInfo},
dvander@2168
   115
	{NULL,							NULL},
dvander@2168
   116
};