/*
- std-vector.hh -- declare std::vector
+ std-vector.hh -- declare vector
source file of the GNU LilyPond music typesetter
#ifndef STD_VECTOR_HH
#define STD_VECTOR_HH
-#include <algorithm> // reverse, sort
+#include <algorithm> /* find, reverse, sort */
+#include <functional> /* unary_function */
+#include <cassert>
-#if !STD_VECTOR
-/* Also declare vector, in the wrong way. */
-#include <algorithm>
-#include <iostream>
-#include <sstream>
+using namespace std;
+
+#if HAVE_BOOST_LAMBDA
+#include <boost/lambda/lambda.hpp>
#endif
+template<typename T>
+int default_compare (T const &a, T const &b)
+{
+ if (a < b)
+ return -1;
+ else if (b < a)
+ return 1;
+ else
+ return 0;
+}
+
+template<typename T>
+int default_compare (T *const &a, T *const &b)
+{
+ if (a < b)
+ return -1;
+ else if (a > b)
+ return 1;
+ else
+ return 0;
+}
#include "compare.hh"
-#if STD_VECTOR
+#ifndef VSIZE
+#define VSIZE
+typedef size_t vsize;
+#define VPOS ((vsize) -1)
+#endif
+#if HAVE_STL_DATA_METHOD
+#include <vector>
+#else /* !HAVE_STL_DATA_METHOD */
#define vector __vector
#include <vector>
#undef vector
namespace std {
- #ifndef VSIZE
- #define VSIZE
- typedef size_t vsize;
- #define VPOS UINT_MAX
- #endif
-
/* Interface without pointer arithmetic (iterator) semantics. */
- template<typename T>
- class vector : public __vector<T>
+ template<typename T, typename A=std::allocator<T> >
+ class vector : public __vector<T, A>
{
public:
typedef typename __vector<T>::iterator iterator;
+ typedef typename __vector<T>::const_iterator const_iterator;
- vector<T> () : __vector<T> ()
- {
- }
-
- vector<T> (iterator const b, iterator const e) : __vector<T> (b, e)
+ vector<T, A> () : __vector<T, A> ()
{
}
- vector<T> (vsize b, vsize e) : __vector<T> (iter (b), iter (e))
+ vector<T, A> (vector<T, A> const& v) : __vector<T, A> (v)
{
}
- iterator iter (vsize n)
+ vector<T, A> (const_iterator b, const_iterator e) : __vector<T, A> (b, e)
{
- if (n == VPOS)
- return this->end ();
- return __vector<T>::begin () + n;
}
- iterator const iter (vsize n) const
+ T*
+ data ()
{
- if (n == VPOS)
- return this->end ();
- return __vector<T>::begin () + n;
+ return &(*this)[0];
}
- void
- insert (T k, vsize i)
+ T const*
+ data () const
{
- __vector<T>::insert (this->iter (i), k);
- }
-
- void
- insert (vector<T> &v, vsize i)
- {
- __vector<T>::insert (iter (i), v.begin (), v.end ());
+ return &(*this)[0];
}
+ };
- void
- concat (vector<T> const &v)
- {
- __vector<T>::insert (this->end (), v.begin (), v.end ());
- }
+} /* namespace std */
- /* Flower-Array compatibility. */
- T const &
- boundary (int dir, vsize i) const
- {
- assert (dir);
- if (dir == 1)
- return this->top (i);
- else
- return this->at (i);
- }
+#endif /* !HAVE_STL_DATA_METHOD */
- T &
- boundary (int dir, vsize i)
- {
- assert (dir);
- if (dir == 1)
- return this->top (i);
- else
- return this->at (i);
- }
+template<typename T>
+T const &
+boundary (vector<T> const &v, int dir, vsize i)
+{
+ assert (dir);
+ return v[dir == -1 ? i : v.size () - 1 - i];
+}
- T const &
- elem (vsize i) const
- {
- return this->at (i);
- }
+template<typename T>
+T &
+boundary (vector<T> &v, int dir, vsize i)
+{
+ assert (dir);
+ return v[dir == -1 ? i : v.size () - 1 - i];
+}
- T &
- elem (vsize i)
- {
- return this->at (i);
- }
+template<typename T>
+T const &
+back (vector<T> const &v, vsize i)
+{
+ return v[v.size () - i - 1];
+}
-#if 1 // FIXME, silly, but keep for s/r
- T const &
- elem_ref (vsize i) const
- {
- return elem (i);
- }
+template<typename T>
+T&
+back (vector<T> &v, vsize i)
+{
+ return v[v.size () - i - 1];
+}
- T &
- elem_ref (vsize i)
- {
- return elem (i);
- }
-#endif
+template<typename T>
+void
+concat (vector<T> &v, vector<T> const& w)
+{
+ v.insert (v.end (), w.begin (), w.end ());
+}
-#if 0
- T *
- remove_array ()
- {
- // FIXME, no algorithm for this?
- T *p = new T[this->size ()];
- for (vsize i = 0; i < this->size (); i++)
- p[i] = (*this)[i];
- this->clear ();
- return p;
- }
-#else
- T *
- remove_array ()
+template<class T>
+void
+binary_search_bounds (vector<T> const &table,
+ T const &key, int (*compare) (T const &, T const &),
+ vsize *lo,
+ vsize *hi)
+{
+ if (*lo >= *hi)
+ return;
+
+ int cmp;
+ int result;
+
+ /* binary search */
+ do
{
- T *p = &(*this)[0];
- // forget array?
- //this->resize (0);
- return p;
- }
-#endif
+ cmp = (*lo + *hi) / 2;
- void
- reverse ()
- {
- // CHECKME: for a simple vector, like vector<int>, this should
- // expand to memrev.
- ::std::reverse (this->begin (), this->end ());
- }
+ result = (*compare) (key, table[cmp]);
- vector<T>
- slice (vsize b, vsize e) const
- {
- return vector<T> (b, e);
- }
-
- void
- sort (int vsize=VPOS, vsize b=VPOS, vsize e=VPOS)
- {
- ::std::sort (iter (b), iter(e));
+ if (result < 0)
+ *hi = cmp;
+ else
+ *lo = cmp;
}
+ while (*hi - *lo > 1);
+}
- void
- sort (int (*compare) (T const &, T const &), int b=-1, int e=-1)
+template<typename T>
+void
+binary_search_bounds (vector<T*> const &table,
+ T const *key, int (*compare) (T *const &, T *const &),
+ vsize *lo,
+ vsize *hi)
+{
+ vsize cmp;
+ int result;
+
+ /* binary search */
+ do
{
- ::std::sort (iter (b), iter(e), compare);
- }
+ cmp = (*lo + *hi) / 2;
- void swap (vsize i, vsize j)
- {
- T t ((*this)[i]);
- (*this)[i] = (*this)[j];
- (*this)[j] = t;
- }
+ result = (*compare) ((T *) key, table[cmp]);
- T const &
- top (vsize i) const
- {
- return (*this)[this->size () - i - 1];
+ if (result < 0)
+ *hi = cmp;
+ else
+ *lo = cmp;
}
+ while (*hi - *lo > 1);
+}
- T&
- top (vsize i)
- {
- return (*this)[this->size () - i - 1];
- }
- };
-
#if 0
- template<typename T>
- vsize
- // binary_search (std::vector<T> const &v,
- binary_search (vector<T> const &v,
- T const &key, int (*compare) (T const &, T const &),
- vsize b=0, vsize e=VPOS)
- {
- //(void) compare;
- vector<T>::iterator const i = find (v.iter (b), v.iter (e), key);
- if (i != v.end ())
- return i - v.begin ();
- return VPOS;
- }
+/* FIXME: what if COMPARE is named: int operator == (T const&, T const&),
+ wouldn't that work for most uses of BINARY_SEARCH?
+*/
+template<typename T>
+vsize
+binary_search (vector<T> const &v,
+ T const &key, int (*compare) (T const &, T const &),
+ vsize b=0, vsize e=VPOS)
+{
+ if (e == VPOS)
+ e = v.size ();
+ typename vector<T>::const_iterator i = find (v.begin () + b,
+ v.begin () + e,
+ key);
+ if (i != v.end ())
+ return i - v.begin ();
+ return VPOS;
+}
#else // c&p from array.icc; cannot easily use stl_algo:find b.o. compare func.
- template<class T>
- void
- binary_search_bounds (vector<T> const &table,
- T const &key, int (*compare) (T const &, T const &),
- vsize *lo,
- vsize *hi)
- {
- int cmp;
- int result;
-
- /* binary search */
- do
- {
- cmp = (*lo + *hi) / 2;
-
- result = (*compare) (key, table[cmp]);
-
- if (result < 0)
- *hi = cmp;
- else
- *lo = cmp;
- }
- while (*hi - *lo > 1);
- }
+template<class T>
+vsize
+binary_search (vector<T> const &table,
+ T const &key,
+ int (*compare) (T const &, T const &),
+ vsize lo=0,
+ vsize hi=VPOS)
+{
+ if (hi == VPOS)
+ hi = table.size ();
+
+ if (lo >= hi)
+ return VPOS;
- template<class T>
- vsize
- binary_search (vector<T> const &table,
- T const &key, int (*compare) (T const &, T const &),
- vsize lo=0,
- vsize hi=VPOS)
- {
- if (hi == VPOS)
- hi = table.size ();
+ binary_search_bounds (table, key, compare, &lo, &hi);
- binary_search_bounds (table, key, compare, &lo, &hi);
+ if (! (*compare) (key, table[lo]))
+ return lo;
+
+ /* not found */
+ return VPOS;
+}
- if (! (*compare) (key, table[lo]))
- return lo;
- /* not found */
- return VPOS;
- }
#endif
-}
+#if 0
+/* FIXME: the COMPARE functionality is broken? */
+template<typename T>
+void
+vector_sort (vector<T> &v, int (*compare) (T const &, T const &),
+ vsize lower=VPOS, vsize upper=VPOS)
+{
+ typename vector<T>::iterator b = v.begin ();
+ typename vector<T>::iterator e = v.begin ();
+ if (lower == VPOS)
+ {
+ lower = 0;
+ upper = v.size ();
+ }
+ sort (b + lower, e + upper, compare);
+}
+#else
+
+// ugh, c&p
+template<typename T> void
+vector_sort (vector<T> &v, int (*compare) (T const &, T const &),
+ vsize lower=VPOS, vsize upper=VPOS)
+{
+ if (lower == VPOS)
+ {
+ lower = 0;
+ upper = v.size () - 1;
+ }
+ if (upper == VPOS || lower >= upper)
+ return;
+ swap (v[lower], v[(lower + upper) / 2]);
+ vsize last = lower;
+ for (vsize i = lower +1; i <= upper; i++)
+ if (compare (v[i], v[lower]) < 0)
+ swap (v[++last], v[i]);
+ swap (v[lower], v[last]);
+ vector_sort (v, compare, lower, last - 1);
+ vector_sort (v, compare, last + 1, upper);
+}
+#endif
-#else /* ! STD_VECTOR */
+template<typename T>
+void
+reverse (vector<T> &v)
+{
+ // CHECKME: for a simple vector, like vector<int>, this should
+ // expand to memrev.
+ reverse (v.begin (), v.end ());
+}
-namespace std {
+template<typename T>
+void
+uniq (vector<T> &v)
+{
+ v.erase (unique (v.begin (), v.end ()), v.end ());
+}
-#define vector Array
- using namespace std;
+template<typename T>
+typename vector<T>::const_iterator
+find (vector<T> const &v, T const &key)
+{
+ return find (v.begin (), v.end (), key);
+}
- #ifndef VSIZE
- #define VSIZE
- typedef int vsize;
- #define VPOS -1
- #endif
+#if HAVE_BOOST_LAMBDA
+#include <boost/lambda/lambda.hpp>
+using namespace boost::lambda;
+template<typename T>
+void
+junk_pointers (vector<T> &v)
+{
+ for_each (v.begin (), v.end (), (delete _1, _1 = 0));
+ v.clear ();
}
+#else
+template<typename T> struct del : public unary_function<T, void>
+{
+ void operator() (T x)
+ {
+ delete x;
+ x = 0;
+ }
+};
+
+template<typename T>
+void
+junk_pointers (vector<T> &v)
+{
+ // Hmm.
+ for_each (v.begin (), v.end (), del<T> ());
+ v.clear ();
+}
+#endif /* HAVE_BOOST_LAMBDA */
-#endif /* STD_VECTOR */
+vector<string> string_split (string str, char c);
-#include "array.hh"
+#define iterof(i,s) typeof((s).begin()) i((s).begin())
#endif /* STD_VECTOR_HH */