Quake-III-Arena/q3radiant/ScriptDlg.cpp

/*
===========================================================================
Copyright (C) 1999-2005 Id Software, Inc.

This file is part of Quake III Arena source code.

Quake III Arena source code 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.

Quake III Arena source code 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 Foobar; if not, write to the Free Software
Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
===========================================================================
*/
// ScriptDlg.cpp : implementation file
//

#include "stdafx.h"
#include "Radiant.h"
#include "ScriptDlg.h"

#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif

/////////////////////////////////////////////////////////////////////////////
// CScriptDlg dialog


CScriptDlg::CScriptDlg(CWnd* pParent /*=NULL*/)
	: CDialog(CScriptDlg::IDD, pParent)
{
	//{{AFX_DATA_INIT(CScriptDlg)
	m_strScript = _T("");
	//}}AFX_DATA_INIT
}


void CScriptDlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CScriptDlg)
	DDX_Control(pDX, IDC_LIST_SCRIPTS, m_lstScripts);
	DDX_LBString(pDX, IDC_LIST_SCRIPTS, m_strScript);
	//}}AFX_DATA_MAP
}


BEGIN_MESSAGE_MAP(CScriptDlg, CDialog)
	//{{AFX_MSG_MAP(CScriptDlg)
	ON_BN_CLICKED(ID_RUN, OnRun)
	ON_LBN_DBLCLK(IDC_LIST_SCRIPTS, OnDblclkListScripts)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CScriptDlg message handlers

void CScriptDlg::OnRun() 
{
  UpdateData(TRUE);
  EndDialog(IDOK);
  RunScriptByName(m_strScript.GetBuffer(0), true);
}

BOOL CScriptDlg::OnInitDialog() 
{
	CDialog::OnInitDialog();

  char* pBuff = new char[16384];
  CString strINI = g_strAppPath;
  strINI += "\\scripts.ini";
  int n = GetPrivateProfileSectionNames(pBuff, 16384, strINI);

  // CStringList list;
  m_lstScripts.ResetContent();
  char* pWorkBuff = pBuff;
  while (*pWorkBuff != NULL)
  {
    m_lstScripts.AddString(pWorkBuff);
    pWorkBuff += strlen(pWorkBuff) + 1;
  }
  delete []pBuff;
	return TRUE;  // return TRUE unless you set the focus to a control
	              // EXCEPTION: OCX Property Pages should return FALSE
}


void CScriptDlg::OnDblclkListScripts() 
{
  UpdateData(TRUE);
  EndDialog(IDOK);
  RunScriptByName(m_strScript.GetBuffer(0), true);
}