2009-04-19 18:07:22 +00:00
#region = = = = = = = = = = = = = = = = = = Copyright ( c ) 2007 Pascal vd Heiden
/ *
* Copyright ( c ) 2007 Pascal vd Heiden , www . codeimp . com
* This program is released under GNU General Public License
*
* 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 .
*
* /
#endregion
#region = = = = = = = = = = = = = = = = = = Namespaces
using System ;
using System.Collections.Generic ;
using System.IO ;
2015-11-30 14:18:42 +00:00
using System.Windows.Forms ;
2009-04-19 18:07:22 +00:00
using CodeImp.DoomBuilder.Compilers ;
2015-11-30 14:18:42 +00:00
using CodeImp.DoomBuilder.Config ;
Added, Sector Edit window, UDMF: added UI for sector damage-realted properties.
Added, DECORATE parser: damage types are now parsed.
Added: the editor now reports duplicate textures/flats/patches/sprites/colormaps/voxels in the loaded wads.
Added, all text parsers: added #region/#endregion support.
Added TERRAIN parser.
Added, Script Editor: added special handling for DECORATE special comments.
Added, Sector Edit window, UDMF: Soundsequence value was setup incorrectly when showing the window for multiple sectors with mixed Soundsequence value.
Fixed, Map Options window: "Strictly load patches between P_START and P_END" was not applied when applying the changes.
Fixed, MAPINFO parser: MapInfo should be treated as defined when a map MAPINFO block corresponding to current map is encountered even if it doesn't define any properties recognized by the editor.
Fixed, all text parsers: in some cases error line was calculated incorrectly when reporting an error detected by a text parser.
Cosmetic: changed ' to " in the rest of Error and Warning messages.
Internal: added text resource tracking.
Updated ZDoom_DECORATE.cfg.
Updated documentation ("Game Configuration - Basic Settings" page).
2016-02-22 12:33:19 +00:00
using CodeImp.DoomBuilder.Data ;
2009-04-19 18:07:22 +00:00
#endregion
namespace CodeImp.DoomBuilder.Controls
{
internal sealed class ScriptFileDocumentTab : ScriptDocumentTab
{
#region = = = = = = = = = = = = = = = = = = Constants
#endregion
#region = = = = = = = = = = = = = = = = = = Variables
private string filepathname ;
#endregion
#region = = = = = = = = = = = = = = = = = = Properties
public override bool IsSaveAsRequired { get { return ( filepathname . Length = = 0 ) ; } }
public override string Filename { get { return filepathname ; } }
#endregion
#region = = = = = = = = = = = = = = = = = = Constructor / Disposer
// Constructor
2016-04-28 14:02:24 +00:00
public ScriptFileDocumentTab ( ScriptEditorPanel panel , ScriptConfiguration config ) : base ( panel , config )
2009-04-19 18:07:22 +00:00
{
string ext = "" ;
// Initialize
this . filepathname = "" ;
2016-11-24 11:55:11 +00:00
tabtype = ScriptDocumentTabType . FILE ; //mxd
2009-04-19 18:07:22 +00:00
if ( config . Extensions . Length > 0 ) ext = "." + config . Extensions [ 0 ] ;
SetTitle ( "Untitled" + ext ) ;
editor . ClearUndoRedo ( ) ;
}
2016-11-24 11:55:11 +00:00
//mxd. Replace constructor
internal ScriptFileDocumentTab ( ScriptResourceDocumentTab sourcetab )
: base ( sourcetab . Panel , sourcetab . Config )
{
// Set text and view settings
tabtype = ScriptDocumentTabType . FILE ;
editor . Scintilla . Text = sourcetab . Editor . Scintilla . Text ;
SetViewSettings ( sourcetab . GetViewSettings ( ) ) ;
// Set title
SetTitle ( sourcetab . Filename ) ;
}
2009-04-19 18:07:22 +00:00
#endregion
#region = = = = = = = = = = = = = = = = = = Methods
// This compiles the script file
public override void Compile ( )
{
2016-05-12 13:56:25 +00:00
//mxd. Compile
2015-11-30 14:18:42 +00:00
List < CompilerError > errors = new List < CompilerError > ( ) ;
2016-05-12 13:56:25 +00:00
if ( DirectoryReader . CompileScriptLump ( filepathname , config , errors ) )
2015-11-30 14:18:42 +00:00
{
2016-05-12 13:56:25 +00:00
//mxd. Update script navigator
errors . AddRange ( UpdateNavigator ( ) ) ;
2015-11-30 14:18:42 +00:00
}
// Feed errors to panel
2016-05-12 13:56:25 +00:00
panel . ShowErrors ( errors , false ) ;
2015-11-30 14:18:42 +00:00
}
2009-04-19 18:07:22 +00:00
// This checks if a script error applies to this script
public override bool VerifyErrorForScript ( CompilerError e )
{
return ( string . Compare ( e . filename , filepathname , true ) = = 0 ) ;
}
// This saves the document (used for both explicit and implicit)
// Return true when successfully saved
public override bool Save ( )
{
try
{
// Write the file
File . WriteAllBytes ( filepathname , editor . GetText ( ) ) ;
}
catch ( Exception e )
{
// Failed
2016-02-08 21:51:03 +00:00
General . ErrorLogger . Add ( ErrorType . Error , "Cannot open file \"" + filepathname + "\" for writing. Make sure the path exists and that the file is not in use by another application." ) ;
2009-04-19 18:07:22 +00:00
General . WriteLogLine ( e . GetType ( ) . Name + ": " + e . Message ) ;
General . ShowErrorMessage ( "Unable to open file \"" + filepathname + "\" for writing. Make sure the path exists and that the file is not in use by another application." , MessageBoxButtons . OK ) ;
return false ;
}
// Done
2016-01-27 14:08:15 +00:00
editor . SetSavePoint ( ) ; //mxd
2015-11-30 14:18:42 +00:00
UpdateTitle ( ) ; //mxd
2009-04-19 18:07:22 +00:00
return true ;
}
// This saves the document to a new file
// Return true when successfully saved
public override bool SaveAs ( string filename )
{
string oldfilename = filepathname ;
filepathname = filename ;
if ( this . Save ( ) )
{
SetTitle ( Path . GetFileName ( filepathname ) ) ;
return true ;
}
else
{
this . filepathname = oldfilename ;
return false ;
}
}
// This opens a file and returns true when successful
public bool Open ( string filepathname )
{
2013-09-11 09:47:53 +00:00
try
2009-04-19 18:07:22 +00:00
{
// Read the file
2016-01-27 14:08:15 +00:00
editor . Text = File . ReadAllText ( filepathname ) ; //mxd
2009-04-19 18:07:22 +00:00
}
catch ( Exception e )
{
// Failed
2016-02-08 21:51:03 +00:00
General . ErrorLogger . Add ( ErrorType . Error , "Cannot open file \"" + filepathname + "\" for reading. Make sure the path exists and that the file is not in use by another application." ) ;
2009-04-19 18:07:22 +00:00
General . WriteLogLine ( e . GetType ( ) . Name + ": " + e . Message ) ;
General . ShowErrorMessage ( "Unable to open file \"" + filepathname + "\" for reading. Make sure the path exists and that the file is not in use by another application." , MessageBoxButtons . OK ) ;
return false ;
}
// Setup
this . filepathname = filepathname ;
editor . ClearUndoRedo ( ) ;
2015-11-30 14:18:42 +00:00
SetTitle ( Path . GetFileName ( filepathname ) ) ;
2016-11-24 11:55:11 +00:00
this . ToolTipText = filepathname ; //mxd
2016-05-12 13:56:25 +00:00
panel . ShowErrors ( UpdateNavigator ( ) , true ) ; //mxd
2012-07-16 09:45:21 +00:00
2009-04-19 18:07:22 +00:00
return true ;
}
// This changes the script configurations
public override void ChangeScriptConfig ( ScriptConfiguration newconfig )
{
if ( filepathname . Length = = 0 )
{
2016-04-28 14:02:24 +00:00
string ext = ( newconfig . Extensions . Length > 0 ? "." + newconfig . Extensions [ 0 ] : "" ) ;
2009-04-19 18:07:22 +00:00
SetTitle ( "Untitled" + ext ) ;
}
2015-12-17 10:07:28 +00:00
else
{
UpdateTitle ( ) ; //mxd
}
2012-07-12 22:34:12 +00:00
2013-09-11 09:47:53 +00:00
//mxd
base . ChangeScriptConfig ( newconfig ) ;
2009-04-19 18:07:22 +00:00
}
#endregion
#region = = = = = = = = = = = = = = = = = = Events
#endregion
}
}