Add third_party libs

1 files changed, 424 insertions, 0 deletions

diff --git a/third_party/windows/fltk-1.1.10/src/Fl_arg.cxx b/third_party/windows/fltk-1.1.10/src/Fl_arg.cxx
new file mode 100644
index 0000000..1733c8f
--- /dev/null
+++ b/third_party/windows/fltk-1.1.10/src/Fl_arg.cxx
@@ -0,0 +1,424 @@
+//

+// "$Id: Fl_arg.cxx 5190 2006-06-09 16:16:34Z mike $"

+//

+// Optional argument initialization code for the Fast Light Tool Kit (FLTK).

+//

+// Copyright 1998-2005 by Bill Spitzak and others.

+//

+// This library is free software; you can redistribute it and/or

+// modify it under the terms of the GNU Library General Public

+// License as published by the Free Software Foundation; either

+// version 2 of the License, or (at your option) any later version.

+//

+// This library 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

+// Library General Public License for more details.

+//

+// You should have received a copy of the GNU Library General Public

+// License along with this library; if not, write to the Free Software

+// Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307

+// USA.

+//

+// Please report all bugs and problems on the following page:

+//

+//     http://www.fltk.org/str.php

+//

+

+// OPTIONAL initialization code for a program using fltk.

+// You do not need to call this!  Feel free to make up your own switches.

+

+#include <FL/Fl.H>

+#include <FL/x.H>

+#include <FL/Fl_Window.H>

+#include <FL/Fl_Tooltip.H>

+#include <FL/filename.H>

+#include <FL/fl_draw.H>

+#include <ctype.h>

+#include "flstring.h"

+

+#if defined(WIN32) || defined(__APPLE__)

+int XParseGeometry(const char*, int*, int*, unsigned int*, unsigned int*);

+#  define NoValue	0x0000

+#  define XValue  	0x0001

+#  define YValue	0x0002

+#  define WidthValue  	0x0004

+#  define HeightValue  	0x0008

+#  define AllValues 	0x000F

+#  define XNegative 	0x0010

+#  define YNegative 	0x0020

+#endif

+

+static int fl_match(const char *a, const char *s, int atleast = 1) {

+  const char *b = s;

+  while (*a && (*a == *b || tolower(*a) == *b)) {a++; b++;}

+  return !*a && b >= s+atleast;

+}

+

+// flags set by previously parsed arguments:

+extern char fl_show_iconic; // in Fl_x.cxx

+static char arg_called;

+static char return_i;

+static const char *name;

+static const char *geometry;

+static const char *title;

+// these are in Fl_get_system_colors and are set by the switches:

+extern const char *fl_fg;

+extern const char *fl_bg;

+extern const char *fl_bg2;

+

+// consume a switch from argv.  Returns number of words eaten, 0 on error:

+int Fl::arg(int argc, char **argv, int &i) {

+  arg_called = 1;

+  const char *s = argv[i];

+

+  if (!s) {i++; return 1;}	// something removed by calling program?

+

+  // a word that does not start with '-', or a word after a '--', or

+  // the word '-' by itself all start the "non-switch arguments" to

+  // a program.  Return 0 to indicate that we don't understand the

+  // word, but set a flag (return_i) so that args() will return at

+  // that point:

+  if (s[0] != '-' || s[1] == '-' || !s[1]) {return_i = 1; return 0;}

+  s++; // point after the dash

+

+  if (fl_match(s, "iconic")) {

+    fl_show_iconic = 1;

+    i++;

+    return 1;

+  } else if (fl_match(s, "kbd")) {

+    Fl::visible_focus(1);

+    i++;

+    return 1;

+  } else if (fl_match(s, "nokbd", 3)) {

+    Fl::visible_focus(0);

+    i++;

+    return 1;

+  } else if (fl_match(s, "dnd", 2)) {

+    Fl::dnd_text_ops(1);

+    i++;

+    return 1;

+  } else if (fl_match(s, "nodnd", 3)) {

+    Fl::dnd_text_ops(0);

+    i++;

+    return 1;

+  } else if (fl_match(s, "tooltips", 2)) {

+    Fl_Tooltip::enable();

+    i++;

+    return 1;

+  } else if (fl_match(s, "notooltips", 3)) {

+    Fl_Tooltip::disable();

+    i++;

+    return 1;

+  }

+#ifdef __APPLE__

+  // The Finder application in MacOS X passes the "-psn_N_NNNNN" option

+  // to all apps...

+  else if (strncmp(s, "psn_", 4) == 0) {

+    i++;

+    return 1;

+  }

+#endif // __APPLE__

+

+  const char *v = argv[i+1];

+  if (i >= argc-1 || !v)

+    return 0;	// all the rest need an argument, so if missing it is an error

+

+  if (fl_match(s, "geometry")) {

+

+    int flags, gx, gy; unsigned int gw, gh;

+    flags = XParseGeometry(v, &gx, &gy, &gw, &gh);

+    if (!flags) return 0;

+    geometry = v;

+

+#if !defined(WIN32) && !defined(__APPLE__)

+  } else if (fl_match(s, "display", 2)) {

+    Fl::display(v);

+#endif

+

+  } else if (fl_match(s, "title", 2)) {

+    title = v;

+

+  } else if (fl_match(s, "name", 2)) {

+    name = v;

+

+  } else if (fl_match(s, "bg2", 3) || fl_match(s, "background2", 11)) {

+    fl_bg2 = v;

+

+  } else if (fl_match(s, "bg", 2) || fl_match(s, "background", 10)) {

+    fl_bg = v;

+

+  } else if (fl_match(s, "fg", 2) || fl_match(s, "foreground", 10)) {

+    fl_fg = v;

+

+  } else if (fl_match(s, "scheme", 1)) {

+    Fl::scheme(v);

+

+  } else return 0; // unrecognized

+

+  i += 2;

+  return 2;

+}

+

+// consume all switches from argv.  Returns number of words eaten.

+// Returns zero on error.  'i' will either point at first word that

+// does not start with '-', at the error word, or after a '--', or at

+// argc.  If your program does not take any word arguments you can

+// report an error if i < argc.

+

+int Fl::args(int argc, char** argv, int& i, int (*cb)(int,char**,int&)) {

+  arg_called = 1;

+  i = 1; // skip argv[0]

+  while (i < argc) {

+    if (cb && cb(argc,argv,i)) continue;

+    if (!arg(argc,argv,i)) return return_i ? i : 0;

+  }

+  return i;

+}

+

+// show a main window, use any parsed arguments

+void Fl_Window::show(int argc, char **argv) {

+  if (argc && !arg_called) Fl::args(argc,argv);

+

+  Fl::get_system_colors();

+

+#if !defined(WIN32) && !defined(__APPLE__)

+  // Get defaults for drag-n-drop and focus...

+  const char *key = 0, *val;

+

+  if (Fl::first_window()) key = Fl::first_window()->xclass();

+  if (!key) key = "fltk";

+

+  val = XGetDefault(fl_display, key, "dndTextOps");

+  if (val) Fl::dnd_text_ops(strcasecmp(val, "true") == 0 ||

+                            strcasecmp(val, "on") == 0 ||

+                            strcasecmp(val, "yes") == 0);

+

+  val = XGetDefault(fl_display, key, "tooltips");

+  if (val) Fl_Tooltip::enable(strcasecmp(val, "true") == 0 ||

+                              strcasecmp(val, "on") == 0 ||

+                              strcasecmp(val, "yes") == 0);

+

+  val = XGetDefault(fl_display, key, "visibleFocus");

+  if (val) Fl::visible_focus(strcasecmp(val, "true") == 0 ||

+                             strcasecmp(val, "on") == 0 ||

+                             strcasecmp(val, "yes") == 0);

+#endif // !WIN32 && !__APPLE__

+

+  // set colors first, so background_pixel is correct:

+  static char beenhere;

+  if (!beenhere) {

+    if (geometry) {

+      int fl = 0, gx = x(), gy = y(); unsigned int gw = w(), gh = h();

+      fl = XParseGeometry(geometry, &gx, &gy, &gw, &gh);

+      if (fl & XNegative) gx = Fl::w()-w()+gx;

+      if (fl & YNegative) gy = Fl::h()-h()+gy;

+      //  int mw,mh; minsize(mw,mh);

+      //  if (mw > gw) gw = mw;

+      //  if (mh > gh) gh = mh;

+      Fl_Widget *r = resizable();

+      if (!r) resizable(this);

+      // for WIN32 we assumme window is not mapped yet:

+      if (fl & (XValue | YValue))

+	x(-1), resize(gx,gy,gw,gh);

+      else

+	size(gw,gh);

+      resizable(r);

+    }

+  }

+

+  // set the class, which is used by X version of get_system_colors:

+  if (name) {xclass(name); name = 0;}

+  else if (!xclass()) xclass(fl_filename_name(argv[0]));

+

+  if (title) {label(title); title = 0;}

+  else if (!label()) label(xclass());

+

+  if (!beenhere) {

+    beenhere = 1;

+    Fl::scheme(Fl::scheme()); // opens display!  May call Fl::fatal()

+  }

+

+  // Show the window AFTER we have set the colors and scheme.

+  show();

+

+#if !defined(WIN32) && !defined(__APPLE__)

+  // set the command string, used by state-saving window managers:

+  int j;

+  int n=0; for (j=0; j<argc; j++) n += strlen(argv[j])+1;

+  char *buffer = new char[n];

+  char *p = buffer;

+  for (j=0; j<argc; j++) for (const char *q = argv[j]; (*p++ = *q++););

+  XChangeProperty(fl_display, fl_xid(this), XA_WM_COMMAND, XA_STRING, 8, 0,

+		  (unsigned char *)buffer, p-buffer-1);

+  delete[] buffer;

+#endif // !WIN32 && !__APPLE__

+}

+

+// Calls useful for simple demo programs, with automatic help message:

+

+static const char * const helpmsg =

+"options are:\n"

+" -bg2 color\n"

+" -bg color\n"

+" -di[splay] host:n.n\n"

+" -dn[d]\n"

+" -fg color\n"

+" -g[eometry] WxH+X+Y\n"

+" -i[conic]\n"

+" -k[bd]\n"

+" -na[me] classname\n"

+" -nod[nd]\n"

+" -nok[bd]\n"

+" -not[ooltips]\n"

+" -s[cheme] scheme\n"

+" -ti[tle] windowtitle\n"

+" -to[oltips]";

+

+const char * const Fl::help = helpmsg+13;

+

+void Fl::args(int argc, char **argv) {

+  int i; if (Fl::args(argc,argv,i) < argc) Fl::error(helpmsg);

+}

+

+#if defined(WIN32) || defined(__APPLE__)

+

+/* the following function was stolen from the X sources as indicated. */

+

+/* Copyright 	Massachusetts Institute of Technology  1985, 1986, 1987 */

+/* $XConsortium: XParseGeom.c,v 11.18 91/02/21 17:23:05 rws Exp $ */

+

+/*

+Permission to use, copy, modify, distribute, and sell this software and its

+documentation for any purpose is hereby granted without fee, provided that

+the above copyright notice appear in all copies and that both that

+copyright notice and this permission notice appear in supporting

+documentation, and that the name of M.I.T. not be used in advertising or

+publicity pertaining to distribution of the software without specific,

+written prior permission.  M.I.T. makes no representations about the

+suitability of this software for any purpose.  It is provided "as is"

+without express or implied warranty.

+*/

+

+/*

+ *    XParseGeometry parses strings of the form

+ *   "=<width>x<height>{+-}<xoffset>{+-}<yoffset>", where

+ *   width, height, xoffset, and yoffset are unsigned integers.

+ *   Example:  "=80x24+300-49"

+ *   The equal sign is optional.

+ *   It returns a bitmask that indicates which of the four values

+ *   were actually found in the string.  For each value found,

+ *   the corresponding argument is updated;  for each value

+ *   not found, the corresponding argument is left unchanged. 

+ */

+

+static int ReadInteger(char* string, char** NextString)

+{

+  register int Result = 0;

+  int Sign = 1;

+    

+  if (*string == '+')

+    string++;

+  else if (*string == '-') {

+    string++;

+    Sign = -1;

+  }

+  for (; (*string >= '0') && (*string <= '9'); string++) {

+    Result = (Result * 10) + (*string - '0');

+  }

+  *NextString = string;

+  if (Sign >= 0)

+    return (Result);

+  else

+    return (-Result);

+}

+

+int XParseGeometry(const char* string, int* x, int* y,

+		   unsigned int* width, unsigned int* height)

+{

+  int mask = NoValue;

+  register char *strind;

+  unsigned int tempWidth = 0, tempHeight = 0;

+  int tempX = 0, tempY = 0;

+  char *nextCharacter;

+

+  if ( (string == NULL) || (*string == '\0')) return(mask);

+  if (*string == '=')

+    string++;  /* ignore possible '=' at beg of geometry spec */

+

+  strind = (char *)string;

+  if (*strind != '+' && *strind != '-' && *strind != 'x') {

+    tempWidth = ReadInteger(strind, &nextCharacter);

+    if (strind == nextCharacter) 

+      return (0);

+    strind = nextCharacter;

+    mask |= WidthValue;

+  }

+

+  if (*strind == 'x' || *strind == 'X') {	

+    strind++;

+    tempHeight = ReadInteger(strind, &nextCharacter);

+    if (strind == nextCharacter)

+      return (0);

+    strind = nextCharacter;

+    mask |= HeightValue;

+  }

+

+  if ((*strind == '+') || (*strind == '-')) {

+    if (*strind == '-') {

+      strind++;

+      tempX = -ReadInteger(strind, &nextCharacter);

+      if (strind == nextCharacter)

+	return (0);

+      strind = nextCharacter;

+      mask |= XNegative;

+

+    } else {

+      strind++;

+      tempX = ReadInteger(strind, &nextCharacter);

+      if (strind == nextCharacter)

+	return(0);

+      strind = nextCharacter;

+      }

+    mask |= XValue;

+    if ((*strind == '+') || (*strind == '-')) {

+      if (*strind == '-') {

+	strind++;

+	tempY = -ReadInteger(strind, &nextCharacter);

+	if (strind == nextCharacter)

+	  return(0);

+	strind = nextCharacter;

+	mask |= YNegative;

+

+      } else {

+	strind++;

+	tempY = ReadInteger(strind, &nextCharacter);

+	if (strind == nextCharacter)

+	  return(0);

+	strind = nextCharacter;

+      }

+      mask |= YValue;

+    }

+  }

+	

+  /* If strind isn't at the end of the string the it's an invalid

+     geometry specification. */

+

+  if (*strind != '\0') return (0);

+

+  if (mask & XValue)

+    *x = tempX;

+  if (mask & YValue)

+    *y = tempY;

+  if (mask & WidthValue)

+    *width = tempWidth;

+  if (mask & HeightValue)

+    *height = tempHeight;

+  return (mask);

+}

+

+#endif // ifdef WIN32

+

+//

+// End of "$Id: Fl_arg.cxx 5190 2006-06-09 16:16:34Z mike $".

+//