Function InternalFormat

core/logic/stringutil.cpp:397–448

static char g_formatbuf[2048];
static StaticCharBuf g_extrabuf;
cell_t InternalFormat(IPluginContext *pCtx, const cell_t *params, int start)
{
	char *buf, *fmt, *destbuf;
	cell_t start_addr, end_addr, maxparam;
	size_t res, maxlen;
	int arg = start + 4;
	bool copy = false;
	char *__copy_buf;

	pCtx->LocalToString(params[start + 1], &destbuf);
	pCtx->LocalToString(params[start + 3], &fmt);

	maxlen = static_cast<size_t>(params[start + 2]);
	start_addr = params[start + 1];
	end_addr = params[start + 1] + maxlen;
	maxparam = params[0];

	for (cell_t i = (start + 3); i <= maxparam; i++)
	{
		if ((params[i] >= start_addr) && (params[i] <= end_addr))
		{
			copy = true;
			break;
		}
	}

	if (copy)
	{
		if (maxlen > sizeof(g_formatbuf))
		{
			char *tmpbuff = g_extrabuf.GetWithSize(maxlen);
			if (!tmpbuff)
				return pCtx->ThrowNativeError("Unable to allocate buffer with a size of \"%u\"", maxlen);

			__copy_buf = tmpbuff;
		}
		else
		{
			__copy_buf = g_formatbuf;
		}
	}

	buf = (copy) ? __copy_buf : destbuf;
	res = atcprintf(buf, maxlen, fmt, pCtx, params, &arg);

	if (copy)
	{
		memcpy(destbuf, __copy_buf, res+1);
	}

	return static_cast<cell_t>(res);
}