/* * The ManaPlus Client * Copyright (C) 2007-2009 The Mana World Development Team * Copyright (C) 2009-2010 The Mana Developers * Copyright (C) 2011-2013 The ManaPlus Developers * * This file is part of The ManaPlus Client. * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * any later version. * * This program 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 General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see <http://www.gnu.org/licenses/>. */ #include "resources/dye.h" #include "logger.h" #include <math.h> #include <sstream> #include "debug.h" DyePalette::DyePalette(const std::string &description, const int8_t blockSize) { const int size = static_cast<int>(description.length()); if (size == 0) return; if (description[0] != '#') { // TODO: load palette from file. return; } int pos = 1; for ( ; ; ) { if (pos + blockSize > size) break; Color color = { {0, 0, 0, 0} }; for (int i = 0, colorIdx = 0; i < blockSize && colorIdx < 4; i += 2, colorIdx ++) { color.value[colorIdx] = static_cast<unsigned char>(( hexDecode(description[pos + i]) << 4) + hexDecode(description[pos + i + 1])); } mColors.push_back(color); pos += blockSize; if (pos == size) return; if (description[pos] != ',') break; ++pos; } logger->log("Error, invalid embedded palette: %s", description.c_str()); } int DyePalette::hexDecode(const signed char c) { if ('0' <= c && c <= '9') return c - '0'; else if ('A' <= c && c <= 'F') return c - 'A' + 10; else if ('a' <= c && c <= 'f') return c - 'a' + 10; else return 0; } void DyePalette::getColor(const int intensity, int color[3]) const { if (intensity == 0) { color[0] = 0; color[1] = 0; color[2] = 0; return; } int last = static_cast<int>(mColors.size()); if (last == 0) return; const int i = intensity * last / 255; const int t = intensity * last % 255; int j = t != 0 ? i : i - 1; if (j >= last) j = 0; // Get the exact color if any, the next color otherwise. const int r2 = mColors[j].value[0]; const int g2 = mColors[j].value[1]; const int b2 = mColors[j].value[2]; if (t == 0) { // Exact color. color[0] = r2; color[1] = g2; color[2] = b2; return; } // Get the previous color. First color is implicitly black. int r1 = 0, g1 = 0, b1 = 0; if (i > 0 && i < last + 1) { r1 = mColors[i - 1].value[0]; g1 = mColors[i - 1].value[1]; b1 = mColors[i - 1].value[2]; } // Perform a linear interpolation. color[0] = ((255 - t) * r1 + t * r2) / 255; color[1] = ((255 - t) * g1 + t * g2) / 255; color[2] = ((255 - t) * b1 + t * b2) / 255; } void DyePalette::getColor(double intensity, int color[3]) const { // Nothing to do here if (mColors.empty()) return; // Force range if (intensity > 1.0) intensity = 1.0; else if (intensity < 0.0) intensity = 0.0; // Scale up intensity = intensity * static_cast<double>(mColors.size() - 1); // Color indices const int i = static_cast<int>(floor(intensity)); const int j = static_cast<int>(ceil(intensity)); if (i == j) { // Exact color. color[0] = mColors[i].value[0]; color[1] = mColors[i].value[1]; color[2] = mColors[i].value[2]; return; } intensity -= i; const double rest = 1 - intensity; // Get the colors const int r1 = mColors[i].value[0]; const int g1 = mColors[i].value[1]; const int b1 = mColors[i].value[2]; const int r2 = mColors[j].value[0]; const int g2 = mColors[j].value[1]; const int b2 = mColors[j].value[2]; // Perform the interpolation. color[0] = static_cast<int>(rest * r1 + intensity * r2); color[1] = static_cast<int>(rest * g1 + intensity * g2); color[2] = static_cast<int>(rest * b1 + intensity * b2); } void DyePalette::replaceSColor(uint8_t *const color) const { std::vector<Color>::const_iterator it = mColors.begin(); const std::vector<Color>::const_iterator it_end = mColors.end(); while (it != it_end) { const Color &col = *it; ++ it; if (it == it_end) return; const Color &col2 = *it; if (color[0] == col.value[0] && color[1] == col.value[1] && color[2] == col.value[2]) { color[2] = col2.value[0]; color[1] = col2.value[1]; color[0] = col2.value[2]; return; } ++ it; } } void DyePalette::replaceAColor(uint8_t *const color) const { std::vector<Color>::const_iterator it = mColors.begin(); const std::vector<Color>::const_iterator it_end = mColors.end(); while (it != it_end) { const Color &col = *it; ++ it; if (it == it_end) return; const Color &col2 = *it; if (color[1] == col.value[0] && color[2] == col.value[1] && color[3] == col.value[2] && color[0] == col.value[3]) { color[3] = col2.value[0]; color[2] = col2.value[1]; color[1] = col2.value[2]; color[0] = col2.value[3]; return; } ++ it; } } void DyePalette::replaceSOGLColor(uint8_t *const color) const { std::vector<Color>::const_iterator it = mColors.begin(); const std::vector<Color>::const_iterator it_end = mColors.end(); while (it != it_end) { const Color &col = *it; ++ it; if (it == it_end) return; const Color &col2 = *it; if (color[2] == col.value[0] && color[1] == col.value[1] && color[0] == col.value[2]) { color[0] = col2.value[0]; color[1] = col2.value[1]; color[2] = col2.value[2]; return; } ++ it; } } void DyePalette::replaceAOGLColor(uint8_t *const color) const { std::vector<Color>::const_iterator it = mColors.begin(); const std::vector<Color>::const_iterator it_end = mColors.end(); while (it != it_end) { const Color &col = *it; ++ it; if (it == it_end) return; const Color &col2 = *it; if (color[2] == col.value[0] && color[1] == col.value[1] && color[0] == col.value[2] && color[3] == col.value[3]) { color[0] = col2.value[0]; color[1] = col2.value[1]; color[2] = col2.value[2]; color[3] = col2.value[3]; return; } ++ it; } } Dye::Dye(const std::string &description) { for (int i = 0; i < dyePalateSize; ++i) mDyePalettes[i] = nullptr; if (description.empty()) return; size_t next_pos = 0; const size_t length = description.length(); do { const size_t pos = next_pos; next_pos = description.find(';', pos); if (next_pos == std::string::npos) next_pos = length; if (next_pos <= pos + 3 || description[pos + 1] != ':') { logger->log("Error, invalid dye: %s", description.c_str()); return; } int i = 0; switch (description[pos]) { case 'R': i = 0; break; case 'G': i = 1; break; case 'Y': i = 2; break; case 'B': i = 3; break; case 'M': i = 4; break; case 'C': i = 5; break; case 'W': i = 6; break; case 'S': i = 7; break; case 'A': i = 8; break; default: logger->log("Error, invalid dye: %s", description.c_str()); return; } mDyePalettes[i] = new DyePalette(description.substr( pos + 2, next_pos - pos - 2), i != 8 ? 6 : 8); ++next_pos; } while (next_pos < length); } Dye::~Dye() { for (int i = 0; i < dyePalateSize; ++i) { delete mDyePalettes[i]; mDyePalettes[i] = nullptr; } } void Dye::update(int color[3]) const { const int cmax = std::max(color[0], std::max(color[1], color[2])); if (cmax == 0) return; const int cmin = std::min(color[0], std::min(color[1], color[2])); const int intensity = color[0] + color[1] + color[2]; if (cmin != cmax && (cmin != 0 || (intensity != cmax && intensity != 2 * cmax))) { // not pure return; } const int i = (color[0] != 0) | ((color[1] != 0) << 1) | ((color[2] != 0) << 2); if (mDyePalettes[i - 1]) mDyePalettes[i - 1]->getColor(cmax, color); } void Dye::instantiate(std::string &target, const std::string &palettes) { size_t next_pos = target.find('|'); if (next_pos == std::string::npos || palettes.empty()) return; ++next_pos; std::ostringstream s; s << target.substr(0, next_pos); size_t last_pos = target.length(), pal_pos = 0; do { const size_t pos = next_pos; next_pos = target.find(';', pos); if (next_pos == std::string::npos) next_pos = last_pos; if (next_pos == pos + 1 && pal_pos != std::string::npos) { const size_t pal_next_pos = palettes.find(';', pal_pos); s << target[pos] << ':'; if (pal_next_pos == std::string::npos) { s << palettes.substr(pal_pos); s << target.substr(next_pos); break; } s << palettes.substr(pal_pos, pal_next_pos - pal_pos); pal_pos = pal_next_pos + 1; } else if (next_pos > pos + 2) { s << target.substr(pos, next_pos - pos); } else { logger->log("Error, invalid dye placeholder: %s", target.c_str()); return; } s << target[next_pos]; ++next_pos; } while (next_pos < last_pos); target = s.str(); } int Dye::getType() const { if (mDyePalettes[sPaleteIndex]) return 1; if (mDyePalettes[aPaleteIndex]) return 2; return 0; }