Subversion Repositories spk

#include "spk.h"

namespace SPK {
        s_int GetAutomaticFiletype(CyString file, CyString *extradir)
        {
                CFileIO File(file);
                CyString dir = File.GetDirIO().TopDir();

                CyString basename = File.GetBaseName();
                // could be a script, text file or map
                s_int type = -1;
                if ( dir.Compare("types") || dir.Compare("mov") || dir.Compare("s") )
                {
                        type = FILETYPE_EXTRA;
                        if ( extradir )
                                *extradir = dir;
                }
                else if ( File.CheckFileExtension("xml") || File.CheckFileExtension("pck") )
                {
                        // TC text file
                        type = FILETYPE_SCRIPT;
                        if ( File.GetFilename().IsIn("-L") && File.GetFilename().Left(4).ToInt() )
                                type = FILETYPE_TEXT;
                        // X2/X3 text file
                        else if ( basename.Length() >= 5 && basename.Length() <= 8 && File.GetBaseName().ToInt() )
                                type = FILETYPE_TEXT;
                        else if ( dir.Compare("maps") )
                                type = FILETYPE_MAP;
                        else if ( dir.Compare("t") )
                                type = FILETYPE_TEXT;
                        else if ( dir.Compare("uninstall") || basename.IsIn("uninstall") )
                                type = FILETYPE_UNINSTALL;
                        else if ( dir.Compare("director") )
                                type = FILETYPE_MISSION;
                }
                // could be a model file or scene file
                else if ( File.CheckFileExtension("pbd") || File.CheckFileExtension("bod") )
                {
                        if ( dir.IsIn("cockpit") || basename.IsIn("cockpit") )
                                type = FILETYPE_COCKPITSCENE;
                        else
                                type = FILETYPE_SHIPSCENE;
                }
                // can only be a model
                else if ( File.CheckFileExtension("pbb") || File.CheckFileExtension("bob") )
                        type = FILETYPE_SHIPMODEL;
                // texture file
                else if ( File.CheckFileExtension("dds") )
                        type = FILETYPE_SHIPOTHER;
                else if ( File.CheckFileExtension("txt") || dir.Compare("readme") )
                        type = FILETYPE_README;
                else if ( File.CheckFileExtension("cat") || File.CheckFileExtension("dat") )
                        type = FILETYPE_MOD;
                else if ( File.CheckFileExtension("mp3") )
                        type = FILETYPE_SOUND;
                else if ( dir.Compare("loadscr") )
                        type = FILETYPE_SCREEN;
                else if ( dir.Compare("graphics") )
                        type = FILETYPE_ADVERT;
                else if ( File.CheckFileExtension("jpg") || File.CheckFileExtension("bmp") )
                        type = FILETYPE_SCREEN;
                else if ( File.CheckFileExtension("gif") )
                        type = FILETYPE_ADVERT;

                return type;
        }

        void AssignAutomaticFiletypes(CyStringList *list)
        {
                for ( SStringList *str = list->Head(); str; str = str->next )
                {
                        CyString extradir;
                        s_int type = SPK::GetAutomaticFiletype(str->str, &extradir);

                        if ( type == FILETYPE_EXTRA && !extradir.Empty() )
                                str->data = CyString::Number(type) + " " + extradir;
                        else
                                str->data = CyString::Number(type);
                }
        }

        CyString GetSizeString ( unsigned long lSize)
        {
                float size = (float)lSize;

                int level = 0;
                while ( size > 1000 )
                {
                        size /= 1024;
                        ++level;
                        if ( level >= 3 )
                                break;
                }

                CyString s;
                char str[20];
                switch ( level )
                {
                        case 0:
                                SPRINTF(str, "%.0f"), size );
                                s = str;
                                s += "B";
                                break;
                        case 1:
                                SPRINTF(str, "%.2f"), size );
                                s = str;
                                s += "KB";
                                break;
                        case 2:
                                SPRINTF(str, "%.2f"), size );
                                s = str;
                                s += "MB";
                                break;
                        case 3:
                                SPRINTF(str, "%.3f"), size );
                                s = str;
                                s += "GB";
                                break;
                }
                return s;
        }

        bool WriteScriptStyleSheet(CyString dest)
        {
                CyStringList list;
                list.PushBack("<?xml version=\"1.0\" ?>");
                list.PushBack("<xsl:stylesheet version=\"1.0\" xmlns:xsl=\"http://www.w3.org/1999/XSL/Transform\" >");
                list.PushBack("<xsl:template match=\"/\">");
                list.PushBack("<html>");
                list.PushBack("<head>");
                list.PushBack("<title>X3TC Script: <xsl:value-of select=\"script/name\"/></title>");
                list.PushBack("</head>");
                list.PushBack("<body style=\"color:white;background-color:black\">");
                list.PushBack("<xsl:apply-templates/>");
                list.PushBack("</body>");
                list.PushBack("</html>");
                list.PushBack("</xsl:template>");
                list.PushBack("<xsl:template match=\"script\">");
                list.PushBack("<h1>Script <xsl:value-of select=\"name\"/></h1>");
                list.PushBack("Version: <xsl:value-of select=\"version\"/><br/>");
                list.PushBack("for Script Engine Version: <xsl:value-of select=\"engineversion\"/><br/>");
                list.PushBack("<h3>Description</h3>");
                list.PushBack("<xsl:value-of select=\"description\"/>");
                list.PushBack("<xsl:apply-templates/>");
                list.PushBack("<xsl:choose><xsl:when test=\"signature\"><br/>signed</xsl:when></xsl:choose>");
                list.PushBack("</xsl:template>");
                list.PushBack("<xsl:template match=\"name\">");
                list.PushBack("</xsl:template>");
                list.PushBack("<xsl:template match=\"version\">");
                list.PushBack("</xsl:template>");
                list.PushBack("<xsl:template match=\"engineversion\">");
                list.PushBack("</xsl:template>");
                list.PushBack("<xsl:template match=\"description\">");
                list.PushBack("</xsl:template>");
                list.PushBack("<xsl:template match=\"arguments\">");
                list.PushBack("<h3>Arguments</h3>");
                list.PushBack("<ul>");
                list.PushBack("<xsl:apply-templates/>");
                list.PushBack("</ul>");
                list.PushBack("</xsl:template>");
                list.PushBack("<xsl:template match=\"argument\">");
                list.PushBack("<li>");
                list.PushBack("<xsl:value-of select=\"@index\"/>: <xsl:value-of select=\"@name\"/> , <xsl:value-of select=\"@type\"/> , '<xsl:value-of select=\"@desc\"/>'");
                list.PushBack("</li>");
                list.PushBack("</xsl:template>");
                list.PushBack("<xsl:template match=\"sourcetext\">");
                list.PushBack("<h3>Source Text</h3>");
                list.PushBack("<div style=\"color:white;background-color:darkgray\">");
                list.PushBack("<br/>");
                list.PushBack("<code>");
                list.PushBack("<xsl:apply-templates/>");
                list.PushBack("</code>");
                list.PushBack("<br/>");
                list.PushBack("</div>");
                list.PushBack("</xsl:template>");
                list.PushBack("<xsl:template match=\"line\">");
                list.PushBack("<b style=\"color:blue\"><xsl:value-of select=\"@linenr\"/>&#160;<xsl:choose><xsl:when test=\"@interruptable\"><b style=\"color:cyan\"><xsl:value-of select=\"@interruptable\"/></b></xsl:when><xsl:otherwise>&#160;</xsl:otherwise></xsl:choose></b>&#160;<b style=\"color:#777777\"><xsl:value-of select=\"translate(@indent,'&#160;','|&#255;')\"/></b><xsl:apply-templates/><br/>");
                list.PushBack("</xsl:template>");
                list.PushBack("<xsl:template match=\"text\">");
                list.PushBack("<xsl:value-of select=\".\"/>");
                list.PushBack("</xsl:template>");
                list.PushBack("<xsl:template match=\"var\">");
                list.PushBack("<b style=\"color:darkgreen\">");
                list.PushBack("<xsl:value-of select=\".\"/>");
                list.PushBack("</b>");
                list.PushBack("</xsl:template>");
                list.PushBack("<xsl:template match=\"comment\"><b style=\"color:black\"><xsl:value-of select=\".\"/></b></xsl:template>");
                list.PushBack("<xsl:template match=\"call\">'<a><xsl:attribute name=\"href\"><xsl:value-of select=\".\"/>.xml</xsl:attribute><xsl:value-of select=\".\"/></a>'</xsl:template>");
                list.PushBack("<xsl:template match=\"codearray\">");
                list.PushBack("</xsl:template>");
                list.PushBack("<xsl:template match=\"signature\">");
                list.PushBack("</xsl:template>");
                list.PushBack("</xsl:stylesheet>");

                CFileIO File(dest + "/x2script.xsl");
                return File.WriteFile(&list);
        }

        CyString ConvertTimeString(time_t time)
        {
                struct tm   *currDate;
                char    dateString[100];

                time_t n = time;
                currDate = localtime(&n);
                strftime(dateString, sizeof dateString, "(%d/%m/%Y) %H:%M", currDate);

                return CyString(dateString);
        }

        CyString FormatTextName(int id, int lang, bool newstyle)
        {
                if ( newstyle )
                        return CyString::Number(id).PadNumber(4) + "-L" + CyString::Number(lang).PadNumber(3);
                else
                        return CyString::Number(lang) + CyString::Number(id).PadNumber(4);
        }
};