--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/src/Format.cc Sun Feb 02 17:06:39 2014 +0200
@@ -0,0 +1,138 @@
+/*
+ Copyright 2012-2014 Santeri Piippo
+ All rights reserved.
+
+ Redistribution and use in source and binary forms, with or without
+ modification, are permitted provided that the following conditions
+ are met:
+
+ 1. Redistributions of source code must retain the above copyright
+ notice, this list of conditions and the following disclaimer.
+ 2. Redistributions in binary form must reproduce the above copyright
+ notice, this list of conditions and the following disclaimer in the
+ documentation and/or other materials provided with the distribution.
+ 3. The name of the author may not be used to endorse or promote products
+ derived from this software without specific prior written permission.
+
+ THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
+ IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
+ OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
+ IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
+ INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
+ NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
+ DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
+ THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
+ (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
+ THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+*/
+
+#include <cstdio>
+#include "Main.h"
+#include "Format.h"
+#include "Lexer.h"
+
+// =============================================================================
+//
+static void DrawPosition (const String& fmt, int pos)
+{
+ String rep (fmt);
+ rep.Replace ("\n", "↵");
+ rep.Replace ("\t", "⇥");
+
+ fprintf (stderr, "%s\n", rep.CString());
+
+ for (int x = 0; x < pos; ++x)
+ fprintf (stderr, "-");
+
+ fprintf (stderr, "^\n");
+}
+
+// =============================================================================
+//
+String FormatArgs (const List<FormatArgument>& args)
+{
+ const String& fmtstr = args[0].AsString();
+ assert (args.Size() >= 1);
+
+ if (args.Size() == 1)
+ return args[0].AsString();
+
+ String fmt = fmtstr;
+ String out;
+ int pos = 0;
+
+ while ((pos = fmt.FirstIndexOf ("%", pos)) != -1)
+ {
+ if (fmt[pos + 1] == '%')
+ {
+ fmt.Replace (pos, 2, "%");
+ pos++;
+ continue;
+ }
+
+ int ofs = 1;
+ char mod = '\0';
+
+ // handle modifiers
+ if (fmt[pos + ofs] == 's' || fmt[pos + ofs] == 'x')
+ {
+ mod = fmt[pos + ofs];
+ ofs++;
+ }
+
+ if (!isdigit (fmt[pos + ofs]))
+ {
+ fprintf (stderr, "bad format string, expected digit with optional "
+ "modifier after '%%':\n");
+ DrawPosition (fmt, pos);
+ return fmt;
+ }
+
+ int i = fmt[pos + ofs] - '0';
+
+ if (i >= args.Size())
+ {
+ fprintf (stderr, "format arg #%d used but not defined: %s\n", i, fmtstr.CString());
+ return fmt;
+ }
+
+ String repl = args[i].AsString();
+
+ switch (mod)
+ {
+ case 's': repl = (repl == "1") ? "" : "s"; break;
+ case 'd': repl.SPrintf ("%d", repl[0]); break;
+ case 'x': repl.SPrintf ("0x%X", repl.ToLong()); break;
+ default: break;
+ }
+
+ fmt.Replace (pos, 1 + ofs, repl);
+ pos += repl.Length();
+ }
+
+ return fmt;
+}
+
+// =============================================================================
+//
+void PrintArgs (FILE* fp, const List<FormatArgument>& args)
+{
+ String out = FormatArgs (args);
+ fprintf (fp, "%s", out.CString());
+}
+
+// =============================================================================
+//
+void DoError (String msg)
+{
+ Lexer* lx = Lexer::GetCurrentLexer();
+ String fileinfo;
+
+ if (lx != null && lx->HasValidToken())
+ {
+ Lexer::Token* tk = lx->GetToken();
+ fileinfo = Format ("%1:%2:%3: ", tk->file, tk->line, tk->column);
+ }
+
+ throw ScriptError (fileinfo + msg);
+}
\ No newline at end of file