/**
* Add a geometry to the shapefile.
*/
bool add(Osmium::Geometry::Geometry* geometry, ///< the geometry
v8::Local<v8::Object> attributes) { ///< a %Javascript object (hash) with the attributes
try {
add_geometry(geometry->create_shp_object());
} catch (Osmium::Exception::IllegalGeometry) {
return false;
}
int ok = 0;
for (size_t n=0; n < m_fields.size(); n++) {
v8::Local<v8::String> key = v8::String::New(m_fields[n].name().c_str());
if (attributes->HasRealNamedProperty(key)) {
v8::Local<v8::Value> value = attributes->GetRealNamedProperty(key);
if (value->IsUndefined() || value->IsNull()) {
DBFWriteNULLAttribute(m_dbf_handle, m_current_shape, n);
} else {
switch (m_fields[n].type()) {
case FTString:
ok = add_string_attribute(n, value);
break;
case FTInteger:
ok = DBFWriteIntegerAttribute(m_dbf_handle, m_current_shape, n, value->Int32Value());
break;
case FTDouble:
throw std::runtime_error("fields of type double not implemented");
break;
case FTLogical:
ok = add_logical_attribute(n, value);
break;
default:
ok = 0; // should never be here
break;
}
if (!ok) {
std::string errmsg("failed to add attribute '");
errmsg += m_fields[n].name();
errmsg += "'\n";
throw std::runtime_error(errmsg);
}
}
} else {
DBFWriteNULLAttribute(m_dbf_handle, m_current_shape, n);
}
}
return true;
}
void FilterGeometry::add_geometry(const Geometries& g) {
for (unsigned int i = 0; i < g.size(); ++i) {
add_geometry(g);
}
}
// Process a production string and generate form
void L_draw(const context& Context, const k3d::signed_axis Orientation)
{
// Save values
k3d::double_t thick_l = 0;
k3d::double_t ang_l = 0;
k3d::double_t dis_l = 0;
k3d::double_t dis2_l = 0;
k3d::double_t trope_l = 0;
bool poly_on = false;
// Setup vectors
k3d::point3 pos(0.0, 0.0, 0.0);
k3d::vector3 fow(0.0, 0.0, 1.0);
k3d::vector3 lef(0.0, 1.0, 0.0);
k3d::vector3 upp(1.0, 0.0, 0.0);
trope = k3d::normalize(trope);
for(unsigned long i = 0; i < object_string.size(); i++)
{
// Overflow
if(polcount > poly_limit)
break;
// The next char in the string
char next = object_string[i + 1];
// The current char in the string
switch(object_string[i])
{
default:
break;
// Marks last recursion level during growing phase
case '@':
last_recur = !last_recur;
if(last_recur)
{
// Store all variables and do fraction
thick_l = thick;
ang_l = ang;
dis_l = dis;
dis2_l = dis2;
trope_l = trope_amount;
dis *= fraction;
dis2 *= fraction;
thick *= fraction;
ang *= fraction;
trope_amount *= fraction;
}
else
{
// Restore
thick = thick_l;
ang = ang_l;
dis = dis_l;
dis2 = dis2_l;
trope_amount = trope_l;
}
break;
case '+':
save.ang = ang;
if(next == '(')
{
ang = 0.017453 * parse_value(i);
if(last_recur)
ang *= fraction;
}
set_rotation_matrix(-ang, upp);
fow = rotate(fow);
lef = rotate(lef);
ang = save.ang;
break;
case '-':
save.ang = ang;
if(next == '(')
{
ang = 0.017453 * parse_value(i);
if(last_recur)
ang *= fraction;
}
set_rotation_matrix(ang, upp);
fow = rotate(fow);
lef = rotate(lef);
ang = save.ang;
break;
case '~':
{
k3d::double_t r = 6.0;
if(next == '(')
r = 0.017453 * parse_value(i);
else if(rand_set)
r = 0.017453 * rand_amount;
k3d::double_t a = Rnd() * r * 2.0 - r;
set_rotation_matrix(a, upp);
fow = rotate(fow);
lef = rotate(lef);
a = (Rnd() * r * 2.0) - r;
set_rotation_matrix(a, lef);
fow = rotate(fow);
upp = rotate(upp);
a = (Rnd() * r * 2.0) - r;
set_rotation_matrix(a, fow);
lef = rotate(lef);
upp = rotate(upp);
}
break;
case 't':
{
if((fow[0] == 0.0) && (fow[1] == 0.0))
break;
save.tr = tr;
if(trope_set)
tr = trope_amount;
if(next == '(')
{
tr = parse_value(i);
if(last_recur)
tr *= fraction;
}
trope = fow;
trope[0] = -trope[0];
trope[1] = -trope[1];
trope[2] = 0.0;
trope = k3d::normalize(trope);
k3d::double_t r = tr * (fow * trope);
set_rotation_matrix(-r, lef);
fow = rotate(fow);
upp = rotate(upp);
tr = save.tr;
}
break;
case '$':
{
k3d::vector3 v = fow - sky;
if(v.length() == 0.0)
break;
lef = fow ^ sky;
upp = fow ^ lef;
if(upp[2] < 0.0)
{
upp = -upp;
lef = -lef;
}
}
break;
case '&':
save.ang = ang;
if(next == '(')
{
ang = 0.017453 * parse_value(i);
if(last_recur)
ang *= fraction;
}
set_rotation_matrix(ang, lef);
fow = rotate(fow);
upp = rotate(upp);
ang = save.ang;
break;
case '^':
save.ang = ang;
if(next == '(')
{
ang = 0.017453 * parse_value(i);
if(last_recur)
ang *= fraction;
}
set_rotation_matrix(-ang, lef);
fow = rotate(fow);
upp = rotate(upp);
ang = save.ang;
break;
case '<':
save.ang = ang;
if(next == '(')
{
ang = 0.017453 * parse_value(i);
if(last_recur)
ang *= fraction;
}
set_rotation_matrix(-ang, fow);
lef = rotate(lef);
upp = rotate(upp);
ang = save.ang;
break;
case '>':
save.ang = ang;
if(next == '(')
{
ang = 0.017453 * parse_value(i);
if(last_recur)
ang *= fraction;
}
set_rotation_matrix(ang, fow);
lef = rotate(lef);
upp = rotate(upp);
ang = save.ang;
break;
case '%':
set_rotation_matrix(3.141592654, fow);
lef = rotate(lef);
upp = rotate(upp);
break;
case '|':
set_rotation_matrix(3.141592654, upp);
fow = rotate(fow);
lef = rotate(lef);
break;
case '!':
if(next == '(')
{
if(last_recur)
thick *= 1.0 + fraction * (parse_value(i) - 1.0);
else
thick *= parse_value(i);
}
else
{
if(last_recur)
thick *= 1.0 + fraction * (0.7 - 1.0);
else
thick *= 0.7;
}
break;
case '?':
if(next == '(')
{
if(last_recur)
thick *= 1.0 + fraction * (parse_value(i) - 1.0);
else
thick *= parse_value(i);
}
else
{
if(last_recur)
thick /= 1.0 + fraction * (0.7 - 1.0);
else
thick /= 0.7;
}
break;
case ':':
if(next == '(')
{
if(last_recur)
ang *= 1.0 + fraction * (parse_value(i) - 1.0);
else
ang *= parse_value(i);
}
else
{
if(last_recur)
ang *= 1.0 + fraction * (0.9 - 1.0);
else
ang *= 0.9;
}
break;
case ';':
if(next == '(')
{
if(last_recur)
ang *= 1.0 + fraction * (parse_value(i) - 1.0);
else
ang *= parse_value(i);
}
else
{
if(last_recur)
ang /= 1.0 + fraction * (0.9 - 1.0);
else
ang /= 0.9;
}
break;
case '\'':
if(next == '(')
{
k3d::double_t r = parse_value(i);
if(last_recur)
{
dis *= 1.0 + fraction * (r - 1.0);
dis2 *= 1.0 + fraction * (r - 1.0);
}
else
{
dis *= r;
dis2 *= r;
}
}
else
{
if(last_recur)
{
dis *= 1.0 + fraction * (0.9 - 1.0);
dis2 *= 1.0 + fraction * (0.9 - 1.0);
}
else
{
dis *= 0.9;
dis2 *= 0.9;
}
}
break;
case '"':
if(next == '(')
{
k3d::double_t r = parse_value(i);
if(last_recur)
{
dis *= 1.0 + fraction * (r - 1.0);
dis2 *= 1.0 + fraction * (r - 1.0);
}
else
{
dis *= r;
dis2 *= r;
}
}
else
{
if(last_recur)
{
dis /= 1.0 + fraction * (0.9 - 1.0);
dis2 /= 1.0 + fraction * (0.9 - 1.0);
}
else
{
dis /= 0.9;
dis2 /= 0.9;
}
}
break;
case 'Z':
{
save.dis2 = dis2;
if(next == '(')
{
dis2 = parse_value(i);
if(last_recur)
dis2 *= fraction;
}
k3d::point3 end = pos + dis2 * fow;
if(closed_form)
add_cylinder(pos, end, upp, col, Context, Orientation);
else
add_cube(pos, end, upp, col, Context, Orientation);
pos = end;
dis2 = save.dis2;
}
break;
case 'F':
{
save.dis = dis;
if(next == '(')
{
dis = parse_value(i);
if(last_recur)
dis *= fraction;
}
k3d::point3 end = pos + dis * fow;
if(closed_form)
add_cylinder(pos, end, upp, col, Context, Orientation);
else
add_cube(pos, end, upp, col, Context, Orientation);
pos = end;
dis = save.dis;
}
break;
case '[':
{
s_rec new_rec;
new_rec.pos = pos;
new_rec.fow = fow;
new_rec.lef = lef;
new_rec.upp = upp;
new_rec.col = col;
new_rec.dis = dis;
new_rec.dis2 = dis2;
new_rec.ang = ang;
new_rec.thick = thick;
new_rec.tr = tr;
if(closed_form)
{
new_rec.last = last;
new_rec.last_col = last_col;
for(unsigned long j = 0; j < 8; j++)
new_rec.last_v[j] = last_v[j];
}
if(stack.size() < max_stack_size)
stack.push(new_rec);
}
break;
case ']':
{
if(!stack.size())
break;
s_rec old_rec = stack.top();
pos = old_rec.pos;
fow = old_rec.fow;
lef = old_rec.lef;
upp = old_rec.upp;
col = old_rec.col;
dis = old_rec.dis;
dis2 = old_rec.dis2;
ang = old_rec.ang;
thick = old_rec.thick;
tr = old_rec.tr;
if(closed_form)
{
last = old_rec.last;
last_col = old_rec.last_col;
for(unsigned long j = 0; j < 8; j++)
last_v[j] = old_rec.last_v[j];
}
stack.pop();
}
break;
case '{':
if(poly_on)
{
vectors_t new_rec = vertices;
if(pstack.size() < max_stack_size)
pstack.push(new_rec);
}
poly_on = true;
vertices.clear();
vertices.push_back(pos);
break;
case 'f':
save.dis = dis;
if(next == '(')
{
dis = parse_value(i);
if(last_recur)
dis *= fraction;
}
pos = pos + dis * fow;
if(poly_on)
vertices.push_back(pos);
dis = save.dis;
break;
case '.':
if(poly_on)
vertices.push_back(pos);
break;
case 'g':
save.dis = dis;
if(next == '(')
{
dis = parse_value(i);
if(last_recur)
dis *= fraction;
}
pos = pos + dis * fow;
dis = save.dis;
break;
case 'z':
save.dis2 = dis2;
if(next == '(')
{
dis2 = parse_value(i);
if(last_recur)
dis2 *= fraction;
}
pos = pos + dis2 * fow;
if(poly_on)
vertices.push_back(pos);
dis2 = save.dis2;
break;
case '}':
polygons.clear();
if(vertices.size() > 3)
{
for(unsigned long j = 1; j < vertices.size() - 1; j++)
polygons.push_back(polygon(0, j, j + 1, j + 1));
add_geometry(col, Context);
}
poly_on = false;
if(pstack.size() > 0)
{
vertices.clear();
if(!pstack.size())
break;
vertices = pstack.top();
pstack.pop();
poly_on = true;
}
break;
case 'c':
if(next == '(')
col = (unsigned long)parse_value(i);
else
col++;
break;
}
}
}
