Subversion Repositories DIN Is Noise

/*

* levels.cc

* DIN Is Noise is copyright (c) 2006-2025 Jagannathan Sampath

* DIN Is Noise is released under GNU Public License 2.0

* For more information, please visit https://dinisnoise.org/

*/

#include "main.h"

#include "levels.h"

#include "viewwin.h"

#include "input.h"

#include "console.h"

#include "utils.h"

#include "font.h"

#include "log.h"

using namespace std;

extern string user_data_dir;

extern int mousex, mousey, wheel, mouseyy, prev_mousey;

extern char BUFFER [];

extern int line_height;

levels::levels (const string& s) {

  name = s;

  editing = lmb_clicked = paint = nsel = 0;

  selection = 0;

  chgl = 0;

  shftl = 0;

  paintl = 0;

  load ();

  if (editable) {

    const char* bt [] = {"Wrap", "Slide", "<<", ">>", "All", "None", "Invert", "+", "-", "x"};

    button* b[] = {&cbwrap, &bslide, &blshift, &brshift, &ball, &bnone, &binvert, &plus, &minus, &cross};

    click_listener* cl [] = {&cbwrap, &sll, &lsl, &rsl, &alll, &nonl, &invl, &pll, &mil, &crol};

    for (int i = 0; i < 10; ++i) {

      button* pbi = b[i];

      click_listener* pcl = cl[i];

      pbi->set_text (bt[i]);

      pbi->set_listener (pcl);

      pcl->data = this;

      this->add_child (pbi);

    }

    this->add_child (&szr);

    MOVE (szr);

    szr.movlis = this;

    blshift.click_repeat = brshift.click_repeat = 1;

    bml.data = this;

  }

}

levels::~levels () {

  save ();

  removeallbookmarks ();

  if (selection) delete[] selection;

}

void levels::load () {

  string ignore;

  int left, bottom;

  ifstream file ((user_data_dir + name).c_str(), ios::in);

  file >> ignore >> n;

  last = n - 1;

  file >> ignore >> left >> bottom;

  file >> ignore >> elem;

  file >> ignore >> height;

  file >> ignore >> editable;

  file >> ignore >> saveable;

  int w;

  file >> ignore >> w;

  cbwrap.set_state (w,0);

  a = 0.7;

  a0 = a / 4;

  extents (left, bottom, left + n * elem, bottom + height);

  set_pos (left, bottom);

  values.resize (n);

  heights.resize (n);

  selection = new bool [n];

  sel_sz = sizeof (bool) * n;

  memset (selection, 0, sel_sz);

  if (saveable) {

    int savings;

    file >> ignore >> savings;

    for (int i = 0; i < savings; ++i) {

      float h; file >> h >> selection[i];

      heights[i] = h;

      values[i] =  h * extents.height_1;

    }

    file >> nsel;

  }

  int nb;

  file >> ignore >> nb;

  if (nb) {

    bmk.resize (nb);

    for (int i = 0, y = minus.extents.bottom - state_button::SIZE2; i < nb; ++i) {

      bookmark* b = new bookmark ();

      b->set_pos (minus.extents.left, y);

      y -= state_button::SIZE2;

      b->set_listener (&bml);

      this->add_child (b);

      bmk[i] = b;

      int nid;

      file >> nid;

      vector<int>& ids = b->ids;

      ids.resize (nid);

      for (int m = 0; m < nid; ++m) file >> ids[m];

    }

  }

  editing = 0;

}

void levels::save () {

  ofstream file ((user_data_dir+name).c_str(), ios::out);

  if (file) {

    file << "num_levels " << n << endl;

    file << "lower_corner " << extents.left << spc << extents.bottom << endl;

    file << "element_width " << elem << endl;

    file << "height " << height << endl;

    file << "editable " << editable << endl;

    file << "saveable " << saveable << endl;

    file << "wrap " << cbwrap.state << endl;

    if (saveable) {

      file << "savings " << n << spc;

      for (int i = 0; i < n; ++i) file << heights[i] << spc << selection[i] << spc;

      file << nsel << endl;

    } else {

      file << "savings 0" << endl;

    }

    int j = bmk.size ();

    file << "bookmarks " << j << spc;

    if (j) {

      for (int i = 0; i < j; ++i) {

        bookmark* bi = bmk[i];

        vector<int>& ids = bi->ids;

        int n = ids.size ();

        file << n << spc;

        for (int m = 0; m < n; ++m) file << ids[m] << spc;

      }

    }

  } else dlog << "!!! couldnt save levels !!!" << endl;

}

int levels::stop_editing () {

  if (editing == FINISH) {

    editing = 0;

    return 1;

  }

  return 0;

}

int levels::handle_input () {

  prev_mousey = mousey;

  widget::handle_input ();

  int hne = hover && !editing;

  if (hne) calc_lev ();

  if (editable) {

    if (keypressed (SDLK_f)) {

      paint = !paint;

      if (paintl) paintl->paint (*this);

    } else if (keypressedd (SDLK_LEFT)) {

      lshift ();

    } else if (keypressedd (SDLK_RIGHT)) {

      rshift ();

    }

    for (int i = 0, j = children.size(); i < j; ++i) {

      if (children[i]->handle_input ()) return 1;

    }

    if (lmb) {

      if (lmb_clicked == 0) {

        if (stop_editing () == 0) {

          if (hne) {

            if (SHIFT) {

              bool& k = selection [lev];

              k = !k;

              if (k) ++nsel; else --nsel;

            } else {

              editing = STARTED;

              widget::focus = this;

            }

          }

        }

      }

      lmb_clicked = 1;

    } else {

      lmb_clicked = 0;

      if (editing) {

        if (wheel) {

          mousey -= wheel;

          warp_mouse (mousex, mousey);

        }

        if (paint) calc_lev ();

        calc_hgt_val ();

        int dh = set (lev, val, hgt);

        int uml = 0;

        if (selection[lev] && !SHIFT ) uml = update_mul_lev (dh);

        if (chgl && (dh || uml)) chgl->changed (*this);

        editing = FINISH;

      } else {

        if (widget::focus == this) widget::focus = 0;

      }

    }

  }

  return 1;

}

int levels::update_mul_lev (int dh) {

  float dv = dh * extents.height_1;

  int ret = 0;

  for (int i = 0; i < n; ++i) {

    if ((i != lev) && selection[i]) {

      int& hi = heights[i];

      float& vi = values[i];

      int hji = hi + dh;

      float vji = vi + dv;

      if (hji < 0) hji = 0; else if (hji > extents.height) hji = extents.height;

      if (vji < 0.0f) vji = 0.0f; else if (vji > 1.0f) vji = 1.0f;

      hi = hji;

      vi = vji;

      ret = 1;

    }

  }

  return ret;

}

void levels::calc_lev () {

  lev =  (mousex - extents.left) / elem;

  if (lev > last || lev < 0) lev = -1;

}

void levels::calc_hgt_val () {

  hgt = mouseyy - extents.bottom;

  clamp<int> (0, hgt, extents.height);

  val = hgt * extents.height_1;

}

void levels::clear_hgt_val () {

  for (int i = 0; i < n; ++i) values[i] = heights[i] = 0;

}

void levels::draw () {

  if (editing) {

    glColor3f (.5f, .5f, .5f);

    int ybh = extents.bottom + hgt;

    glBegin (GL_LINES);

      glVertex2i (extents.left, ybh);

      glVertex2i (extents.right, ybh);

    glEnd ();

  }

  glEnable (GL_BLEND);

  glBlendFunc (GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);

    int i = 0, x = extents.left, ds = elem - 2;

    if (extents.left < 0) {

      i = -extents.left / elem;

      x = 0;

    }

    for (;i < n; ++i) {

      int l = x + 1, r = x + ds;

      glColor4f (clr.r, clr.g, clr.b, a0);

        glRecti (l, extents.bottom, r, extents.top);

      float dc = selection[i] * 0.4;

      glColor4f (clr.r + dc * clr.r, clr.g + dc * clr.g, clr.b + dc * clr.b, a);

        glRecti (l, extents.bottom, r, extents.bottom + heights[i]);

      x += elem;

      extern viewport view;

      if (x > view.xmax) break;

    }

  glDisable (GL_BLEND);

  sprintf (BUFFER, "%d/%.3f", lev+1, lev > -1? values[lev]:-1);

  draw_string (BUFFER, extents.left, extents.bottom - line_height, 0);

  if (editable) for (int i = 0, j = children.size(); i < j; ++i) children[i]->draw ();

}

int levels::change (int i, float dv) {

  if (i > -1 && i < n) {

    float& vi = values[i];

    vi += dv;

    int result = clamp<float> (0, vi, 1);

    heights[i] = (int) (vi * extents.height + 0.5);

    return result;

  }

  return 0;

}

void levels::set_only (int i, float v) {

  if (i > -1 && i < n) {

    clamp<float> (0, v, 1);

    values[i] = v;

    heights[i] = (int)(v * extents.height + 0.5);

  }

}

int levels::set (int i, float v, int h) { // from ui

  if (i > -1 && i < n) {

    int& hi = heights[i];

    int dh = h - hi;

    hi = h;

    float& vi = values[i];

    if (vi != v) { // bcos from ui

      vi = v;

    }

    return dh;

  }

  return 0;

}

void levels::update () {

  if (chgl) chgl->changed (*this);

}

void levels::chkpos () {

  extern viewport view;

  if (!view.inside (extents.left, extents.bottom)) extents.lower_corner (0, 0);

}

void levels::reheight () {

  for (int i = 0; i < n; ++i) {

    float v = values[i];

    int h = v * height + 0.5;

    heights[i] = h;

  }

}

int levels::lshift () {

  float v0 = values[0];

  int h0 = heights[0];

  int wrap = cbwrap.state;

  if (wrap == 0) {

    if (h0) return 0;

  }

  for (int i = 0, j = 1; i < last; ++i, ++j) {

    values[i] = values[j];

    heights[i] = heights[j];

  }

  float& vl = values[last];

  int& hl = heights[last];

  if (wrap) {

    vl = v0;

    hl = h0;

  } else {

    vl = 0;

    hl = 0;

  }

  if (shftl) shftl->shifted (*this);

  return 1;

}

int levels::rshift () {

  float vl = values[last];

  int hl = heights[last];

  int wrap = cbwrap.state;

  if (wrap == 0) {

    if (hl) return 0;

  }

  for (int j = last, i = last - 1; j > 0; --j, --i) {

    values[j]=values[i];

    heights[j]=heights[i];

  }

  float& v0 = values[0];

  int& h0 = heights[0];

  if (wrap) {

    v0 = vl;

    h0 = hl;

  } else {

    v0 = 0;

    h0 = 0;

  }

  if (shftl) shftl->shifted (*this);

  return 1;

}

void levels::selall () {

  nsel = 0;

  for (int i = 0; i < n; ++i) {

    if (heights[i]) {

      selection[i] = 1;

      ++nsel;

    }

  }

  clearbookmarks ();

}

void levels::selnon () {

  for (int i = 0; i < n; ++i) selection[i] = 0;

  nsel = 0;

  clearbookmarks ();

}

void levels::invsel () {

  for (int i = 0; i < n; ++i) {

    bool& si = selection[i];

    if (si) {

      si = 0;

      --nsel;

    }

    else if (heights[i]) {

      si = 1;

      ++nsel;

    }

  }

  clearbookmarks ();

}

CLICKED_BUTTON (levels, alllis) {

  levels* l = (levels*) data;

  l->selall();

}

CLICKED_BUTTON (levels, nonlis) {

  levels* l = (levels*) data;

  l->selnon();

}

CLICKED_BUTTON (levels, invlis) {

  levels* l = (levels*) data;

  l->invsel();

}

CLICKED_BUTTON (levels, lshiftlis) {

  levels* l = (levels*) data;

  l->lshift ();

}

CLICKED_BUTTON (levels, rshiftlis) {

  levels* l = (levels*) data;

  l->rshift ();

}

CLICKED_BUTTON (levels, pluslis) {

  levels* l = (levels*) data;

  l->addbookmark ();

}

void levels::slide::clicked (button& b) {

  if (!mouse_slider0.active) {

    mouse_slider0.add (this);

    activate_mouse_slider ();

  }

}

void levels::slide::moused (int dir, double scl) {

  levels* l = (levels*) data;

  if (dir > 0) l->rshift (); else l->lshift ();

}

void levels::set_pos (int x, int y) {

  widget::set_pos (x, y);

  extern int line_height;

  int bx = extents.right + 3, by = extents.top - line_height;

  blshift.set_pos (bx, by);

  brshift.set_pos (bx + 28, by);

  by -= line_height;

  {

    button* b[] = {&cbwrap, &bslide, &ball, &bnone, &binvert};

    for (int i = 0; i < 5; ++i) {

      button& bi = *b[i];

      bi.set_pos (bx, by);

      by -= line_height;

    }

  }

  {

    button* b[] = {&plus, &minus, &cross};

    for (int i = 0; i < 3; ++i) {

      b[i]->set_pos (bx, by);

      bx += 20;

    }

  }

  szr.set_pos (extents.right + elem, extents.bottom);

}

void levels::addbookmark () {

  if (nsel) {

    bookmark* bm = new bookmark ();

    int bs = bmk.size ();

    if (bs) {

      int lb = bs - 1;

      bookmark* plb = bmk [lb];

      bm->set_pos (minus.extents.left, plb->extents.bottom - state_button::SIZE2);

    } else {

      bm->set_pos (minus.extents.left, minus.extents.bottom - state_button::SIZE2);

    }

    for (int i = 0; i < n; ++i) if (selection[i]) bm->ids.push_back (i);

    clearbookmarks ();

    bm->set_state (1, 0);

    bm->set_listener (&bml);

    bmk.push_back (bm);

    this->add_child (bm);

    cons << GREEN << "Bookmarked " << nsel << spc << name << eol;

  } else {

    cons << RED << "No " << name << " selected to bookmark. SHIFT+click " << name << " to select." << eol;

  }

}

void levels::removebookmark () {

  for (vector<bookmark*>::iterator i = bmk.begin (), j = bmk.end (); i != j; ) {

    bookmark* b = *i;

    if (b->state) {

      i = bmk.erase (i);

      j = bmk.end ();

      this->remove_child (b);

      delete b;

    } else {

      ++i;

    }

  }

}

void levels::removeallbookmarks () {

  for (int i = 0, j = bmk.size (); i < j; ++i) {

    bookmark* pbi = bmk[i];

    this->remove_child (pbi);

    delete pbi;

  }

  bmk.clear ();

}

void levels::clearbookmarks () {

  for (int i = 0, j = bmk.size (); i < j; ++i) bmk[i]->set_state (0,0);

}

CLICKED_CHECKBUTTON (levels, bmlis) {

  bookmark& b = dynamic_cast<bookmark&>(cb);

  int s = b.state;

  levels& l = *( (levels*) data);

  if (SHIFT)

    ;

  else {

    l.selnon ();

    if (s == 0) s = 1;

    b.set_state (s, 0);

  }

  int sl [] = {-1, 1};

  for (int i = 0, j = l.bmk.size (); i < j; ++i) {

    if (&b == l.bmk[i]) {

      vector<int>& ids = b.ids;

      int n = ids.size ();

      for (int m = 0; m < n; ++m) l.selection[ids[m]] = s;

      l.nsel += (n * sl[s]);

    }

  }

}

CLICKED_BUTTON (levels, minuslis) {

  ((levels*) data)->removebookmark ();

}

CLICKED_BUTTON (levels, crosslis) {

  ((levels*) data)->removeallbookmarks ();

}

/*MOVED (levels,szrlis) {

  levels* pl = (levels *) data;

  l->sized ();

}*/

void levels::moved () {

  if (extents.top > szr.extents.bottom) {

    height = extents.height = extents.top - szr.extents.bottom;

    set_pos (posx, szr.posy);

    reheight ();

  }

}