… | |
… | |
1123 | double scale = sqrt (2.0 * M_PI) * sigma; |
1123 | double scale = sqrt (2.0 * M_PI) * sigma; |
1124 | double sum = 0.0; |
1124 | double sum = 0.0; |
1125 | |
1125 | |
1126 | for (int i = 0; i < width; i++) |
1126 | for (int i = 0; i < width; i++) |
1127 | { |
1127 | { |
1128 | double x = i - width / 2; |
1128 | double x = i - width / 2; |
1129 | kernel[i] = exp (-(x * x) / (2.0 * sigma * sigma)) / scale; |
1129 | kernel[i] = exp (-(x * x) / (2.0 * sigma * sigma)) / scale; |
1130 | sum += kernel[i]; |
1130 | sum += kernel[i]; |
1131 | } |
1131 | } |
1132 | |
1132 | |
1133 | params[0] = XDoubleToFixed (width); |
1133 | params[0] = XDoubleToFixed (width); |
1134 | params[1] = XDoubleToFixed (1); |
1134 | params[1] = XDoubleToFixed (1); |
1135 | |
1135 | |
… | |
… | |
1635 | mask_r = visual->red_mask; |
1635 | mask_r = visual->red_mask; |
1636 | mask_g = visual->green_mask; |
1636 | mask_g = visual->green_mask; |
1637 | mask_b = visual->blue_mask; |
1637 | mask_b = visual->blue_mask; |
1638 | |
1638 | |
1639 | /* boring lookup table pre-initialization */ |
1639 | /* boring lookup table pre-initialization */ |
1640 | switch (srcImage->bits_per_pixel) { |
1640 | switch (srcImage->bits_per_pixel) |
|
|
1641 | { |
1641 | case 15: |
1642 | case 15: |
1642 | if ((mask_r != 0x7c00) || |
1643 | if ((mask_r != 0x7c00) || |
1643 | (mask_g != 0x03e0) || |
1644 | (mask_g != 0x03e0) || |
1644 | (mask_b != 0x001f)) |
1645 | (mask_b != 0x001f)) |
1645 | return; |
1646 | return; |
1646 | lookup = (RUINT32T *) malloc (sizeof (RUINT32T)*(32+32+32)); |
1647 | lookup = (RUINT32T *) malloc (sizeof (RUINT32T)*(32+32+32)); |
1647 | lookup_r = lookup; |
1648 | lookup_r = lookup; |
1648 | lookup_g = lookup+32; |
1649 | lookup_g = lookup+32; |
1649 | lookup_b = lookup+32+32; |
1650 | lookup_b = lookup+32+32; |
1650 | sh_r = 10; |
1651 | sh_r = 10; |
1651 | sh_g = 5; |
1652 | sh_g = 5; |
1652 | sh_b = 0; |
1653 | sh_b = 0; |
1653 | break; |
1654 | break; |
1654 | case 16: |
1655 | case 16: |
1655 | if ((mask_r != 0xf800) || |
1656 | if ((mask_r != 0xf800) || |
1656 | (mask_g != 0x07e0) || |
1657 | (mask_g != 0x07e0) || |
1657 | (mask_b != 0x001f)) |
1658 | (mask_b != 0x001f)) |
1658 | return; |
1659 | return; |
1659 | lookup = (RUINT32T *) malloc (sizeof (RUINT32T)*(32+64+32)); |
1660 | lookup = (RUINT32T *) malloc (sizeof (RUINT32T)*(32+64+32)); |
1660 | lookup_r = lookup; |
1661 | lookup_r = lookup; |
1661 | lookup_g = lookup+32; |
1662 | lookup_g = lookup+32; |
1662 | lookup_b = lookup+32+64; |
1663 | lookup_b = lookup+32+64; |
1663 | sh_r = 11; |
1664 | sh_r = 11; |
1664 | sh_g = 5; |
1665 | sh_g = 5; |
1665 | sh_b = 0; |
1666 | sh_b = 0; |
1666 | break; |
1667 | break; |
1667 | case 24: |
1668 | case 24: |
1668 | if ((mask_r != 0xff0000) || |
1669 | if ((mask_r != 0xff0000) || |
1669 | (mask_g != 0x00ff00) || |
1670 | (mask_g != 0x00ff00) || |
1670 | (mask_b != 0x0000ff)) |
1671 | (mask_b != 0x0000ff)) |
1671 | return; |
1672 | return; |
1672 | lookup = (RUINT32T *) malloc (sizeof (RUINT32T)*(256+256+256)); |
1673 | lookup = (RUINT32T *) malloc (sizeof (RUINT32T)*(256+256+256)); |
1673 | lookup_r = lookup; |
1674 | lookup_r = lookup; |
1674 | lookup_g = lookup+256; |
1675 | lookup_g = lookup+256; |
1675 | lookup_b = lookup+256+256; |
1676 | lookup_b = lookup+256+256; |
1676 | sh_r = 16; |
1677 | sh_r = 16; |
1677 | sh_g = 8; |
1678 | sh_g = 8; |
1678 | sh_b = 0; |
1679 | sh_b = 0; |
1679 | break; |
1680 | break; |
1680 | case 32: |
1681 | case 32: |
1681 | if ((mask_r != 0xff0000) || |
1682 | if ((mask_r != 0xff0000) || |
1682 | (mask_g != 0x00ff00) || |
1683 | (mask_g != 0x00ff00) || |
1683 | (mask_b != 0x0000ff)) |
1684 | (mask_b != 0x0000ff)) |
1684 | return; |
1685 | return; |
1685 | lookup = (RUINT32T *) malloc (sizeof (RUINT32T)*(256+256+256)); |
1686 | lookup = (RUINT32T *) malloc (sizeof (RUINT32T)*(256+256+256)); |
1686 | lookup_r = lookup; |
1687 | lookup_r = lookup; |
1687 | lookup_g = lookup+256; |
1688 | lookup_g = lookup+256; |
1688 | lookup_b = lookup+256+256; |
1689 | lookup_b = lookup+256+256; |
1689 | sh_r = 16; |
1690 | sh_r = 16; |
1690 | sh_g = 8; |
1691 | sh_g = 8; |
1691 | sh_b = 0; |
1692 | sh_b = 0; |
1692 | break; |
1693 | break; |
1693 | default: |
1694 | default: |
1694 | return; /* we do not support this color depth */ |
1695 | return; /* we do not support this color depth */ |
1695 | } |
1696 | } |
1696 | |
1697 | |
1697 | /* prepare limits for color transformation (each channel is handled separately) */ |
1698 | /* prepare limits for color transformation (each channel is handled separately) */ |
1698 | if (shade > 100) { |
1699 | if (shade > 100) |
|
|
1700 | { |
1699 | shade = 200 - shade; |
1701 | shade = 200 - shade; |
1700 | |
1702 | |
1701 | lower_lim_r = 65535-rm; |
1703 | lower_lim_r = 65535-rm; |
1702 | lower_lim_g = 65535-gm; |
1704 | lower_lim_g = 65535-gm; |
1703 | lower_lim_b = 65535-bm; |
1705 | lower_lim_b = 65535-bm; |
1704 | |
1706 | |
1705 | lower_lim_r = 65535-(unsigned int)(((RUINT32T)lower_lim_r)*((RUINT32T)shade)/100); |
1707 | lower_lim_r = 65535-(unsigned int)(((RUINT32T)lower_lim_r)*((RUINT32T)shade)/100); |
1706 | lower_lim_g = 65535-(unsigned int)(((RUINT32T)lower_lim_g)*((RUINT32T)shade)/100); |
1708 | lower_lim_g = 65535-(unsigned int)(((RUINT32T)lower_lim_g)*((RUINT32T)shade)/100); |
1707 | lower_lim_b = 65535-(unsigned int)(((RUINT32T)lower_lim_b)*((RUINT32T)shade)/100); |
1709 | lower_lim_b = 65535-(unsigned int)(((RUINT32T)lower_lim_b)*((RUINT32T)shade)/100); |
1708 | |
1710 | |
1709 | upper_lim_r = upper_lim_g = upper_lim_b = 65535; |
1711 | upper_lim_r = upper_lim_g = upper_lim_b = 65535; |
|
|
1712 | } |
1710 | } else { |
1713 | else |
|
|
1714 | { |
1711 | |
1715 | |
1712 | lower_lim_r = lower_lim_g = lower_lim_b = 0; |
1716 | lower_lim_r = lower_lim_g = lower_lim_b = 0; |
1713 | |
1717 | |
1714 | upper_lim_r = (unsigned int)((((RUINT32T)rm)*((RUINT32T)shade))/100); |
1718 | upper_lim_r = (unsigned int)((((RUINT32T)rm)*((RUINT32T)shade))/100); |
1715 | upper_lim_g = (unsigned int)((((RUINT32T)gm)*((RUINT32T)shade))/100); |
1719 | upper_lim_g = (unsigned int)((((RUINT32T)gm)*((RUINT32T)shade))/100); |
1716 | upper_lim_b = (unsigned int)((((RUINT32T)bm)*((RUINT32T)shade))/100); |
1720 | upper_lim_b = (unsigned int)((((RUINT32T)bm)*((RUINT32T)shade))/100); |
1717 | } |
1721 | } |
1718 | |
1722 | |
1719 | /* switch red and blue bytes if necessary, we need it for some weird XServers like XFree86 3.3.3.1 */ |
1723 | /* switch red and blue bytes if necessary, we need it for some weird XServers like XFree86 3.3.3.1 */ |
1720 | if ((srcImage->bits_per_pixel == 24) && (mask_r >= 0xFF0000)) |
1724 | if ((srcImage->bits_per_pixel == 24) && (mask_r >= 0xFF0000)) |
1721 | { |
1725 | { |
1722 | unsigned int tmp; |
1726 | unsigned int tmp; |
1723 | |
1727 | |
1724 | tmp = lower_lim_r; |
1728 | tmp = lower_lim_r; |
1725 | lower_lim_r = lower_lim_b; |
1729 | lower_lim_r = lower_lim_b; |
1726 | lower_lim_b = tmp; |
1730 | lower_lim_b = tmp; |
1727 | |
1731 | |
1728 | tmp = upper_lim_r; |
1732 | tmp = upper_lim_r; |
1729 | upper_lim_r = upper_lim_b; |
1733 | upper_lim_r = upper_lim_b; |
1730 | upper_lim_b = tmp; |
1734 | upper_lim_b = tmp; |
1731 | } |
1735 | } |
1732 | |
1736 | |
1733 | /* fill our lookup tables */ |
1737 | /* fill our lookup tables */ |
1734 | for (i = 0; i <= mask_r>>sh_r; i++) |
1738 | for (i = 0; i <= mask_r>>sh_r; i++) |
1735 | { |
1739 | { |
1736 | RUINT32T tmp; |
1740 | RUINT32T tmp; |
1737 | tmp = ((RUINT32T)i)*((RUINT32T)(upper_lim_r-lower_lim_r)); |
1741 | tmp = ((RUINT32T)i)*((RUINT32T)(upper_lim_r-lower_lim_r)); |
1738 | tmp += ((RUINT32T)(mask_r>>sh_r))*((RUINT32T)lower_lim_r); |
1742 | tmp += ((RUINT32T)(mask_r>>sh_r))*((RUINT32T)lower_lim_r); |
1739 | lookup_r[i] = (tmp/65535)<<sh_r; |
1743 | lookup_r[i] = (tmp/65535)<<sh_r; |
1740 | } |
1744 | } |
1741 | for (i = 0; i <= mask_g>>sh_g; i++) |
1745 | for (i = 0; i <= mask_g>>sh_g; i++) |
1742 | { |
1746 | { |
1743 | RUINT32T tmp; |
1747 | RUINT32T tmp; |
1744 | tmp = ((RUINT32T)i)*((RUINT32T)(upper_lim_g-lower_lim_g)); |
1748 | tmp = ((RUINT32T)i)*((RUINT32T)(upper_lim_g-lower_lim_g)); |
1745 | tmp += ((RUINT32T)(mask_g>>sh_g))*((RUINT32T)lower_lim_g); |
1749 | tmp += ((RUINT32T)(mask_g>>sh_g))*((RUINT32T)lower_lim_g); |
1746 | lookup_g[i] = (tmp/65535)<<sh_g; |
1750 | lookup_g[i] = (tmp/65535)<<sh_g; |
1747 | } |
1751 | } |
1748 | for (i = 0; i <= mask_b>>sh_b; i++) |
1752 | for (i = 0; i <= mask_b>>sh_b; i++) |
1749 | { |
1753 | { |
1750 | RUINT32T tmp; |
1754 | RUINT32T tmp; |
1751 | tmp = ((RUINT32T)i)*((RUINT32T)(upper_lim_b-lower_lim_b)); |
1755 | tmp = ((RUINT32T)i)*((RUINT32T)(upper_lim_b-lower_lim_b)); |
1752 | tmp += ((RUINT32T)(mask_b>>sh_b))*((RUINT32T)lower_lim_b); |
1756 | tmp += ((RUINT32T)(mask_b>>sh_b))*((RUINT32T)lower_lim_b); |
1753 | lookup_b[i] = (tmp/65535)<<sh_b; |
1757 | lookup_b[i] = (tmp/65535)<<sh_b; |
1754 | } |
1758 | } |
1755 | |
1759 | |
1756 | /* apply table to input image (replacing colors by newly calculated ones) */ |
1760 | /* apply table to input image (replacing colors by newly calculated ones) */ |
1757 | switch (srcImage->bits_per_pixel) |
1761 | switch (srcImage->bits_per_pixel) |
1758 | { |
1762 | { |
1759 | case 15: |
1763 | case 15: |
1760 | { |
1764 | { |
1761 | unsigned short *p1, *pf, *p, *pl; |
1765 | unsigned short *p1, *pf, *p, *pl; |
1762 | p1 = (unsigned short *) srcImage->data; |
1766 | p1 = (unsigned short *) srcImage->data; |
1763 | pf = (unsigned short *) (srcImage->data + srcImage->height * srcImage->bytes_per_line); |
1767 | pf = (unsigned short *) (srcImage->data + srcImage->height * srcImage->bytes_per_line); |
1764 | while (p1 < pf) |
1768 | while (p1 < pf) |
1765 | { |
1769 | { |
1766 | p = p1; |
1770 | p = p1; |
1767 | pl = p1 + srcImage->width; |
1771 | pl = p1 + srcImage->width; |
1768 | for (; p < pl; p++) |
1772 | for (; p < pl; p++) |
1769 | { |
1773 | { |
1770 | *p = lookup_r[(*p & 0x7c00)>>10] | |
1774 | *p = lookup_r[(*p & 0x7c00)>>10] | |
1771 | lookup_g[(*p & 0x03e0)>> 5] | |
1775 | lookup_g[(*p & 0x03e0)>> 5] | |
1772 | lookup_b[(*p & 0x001f)]; |
1776 | lookup_b[(*p & 0x001f)]; |
1773 | } |
1777 | } |
1774 | p1 = (unsigned short *) ((char *) p1 + srcImage->bytes_per_line); |
1778 | p1 = (unsigned short *) ((char *) p1 + srcImage->bytes_per_line); |
|
|
1779 | } |
|
|
1780 | break; |
1775 | } |
1781 | } |
1776 | break; |
|
|
1777 | } |
|
|
1778 | case 16: |
1782 | case 16: |
1779 | { |
1783 | { |
1780 | unsigned short *p1, *pf, *p, *pl; |
1784 | unsigned short *p1, *pf, *p, *pl; |
1781 | p1 = (unsigned short *) srcImage->data; |
1785 | p1 = (unsigned short *) srcImage->data; |
1782 | pf = (unsigned short *) (srcImage->data + srcImage->height * srcImage->bytes_per_line); |
1786 | pf = (unsigned short *) (srcImage->data + srcImage->height * srcImage->bytes_per_line); |
1783 | while (p1 < pf) |
1787 | while (p1 < pf) |
1784 | { |
1788 | { |
1785 | p = p1; |
1789 | p = p1; |
1786 | pl = p1 + srcImage->width; |
1790 | pl = p1 + srcImage->width; |
1787 | for (; p < pl; p++) |
1791 | for (; p < pl; p++) |
1788 | { |
1792 | { |
1789 | *p = lookup_r[(*p & 0xf800)>>11] | |
1793 | *p = lookup_r[(*p & 0xf800)>>11] | |
1790 | lookup_g[(*p & 0x07e0)>> 5] | |
1794 | lookup_g[(*p & 0x07e0)>> 5] | |
1791 | lookup_b[(*p & 0x001f)]; |
1795 | lookup_b[(*p & 0x001f)]; |
1792 | } |
1796 | } |
1793 | p1 = (unsigned short *) ((char *) p1 + srcImage->bytes_per_line); |
1797 | p1 = (unsigned short *) ((char *) p1 + srcImage->bytes_per_line); |
|
|
1798 | } |
|
|
1799 | break; |
1794 | } |
1800 | } |
1795 | break; |
|
|
1796 | } |
|
|
1797 | case 24: |
1801 | case 24: |
1798 | { |
1802 | { |
1799 | unsigned char *p1, *pf, *p, *pl; |
1803 | unsigned char *p1, *pf, *p, *pl; |
1800 | p1 = (unsigned char *) srcImage->data; |
1804 | p1 = (unsigned char *) srcImage->data; |
1801 | pf = (unsigned char *) (srcImage->data + srcImage->height * srcImage->bytes_per_line); |
1805 | pf = (unsigned char *) (srcImage->data + srcImage->height * srcImage->bytes_per_line); |
1802 | while (p1 < pf) |
1806 | while (p1 < pf) |
1803 | { |
1807 | { |
1804 | p = p1; |
1808 | p = p1; |
1805 | pl = p1 + srcImage->width * 3; |
1809 | pl = p1 + srcImage->width * 3; |
1806 | for (; p < pl; p += 3) |
1810 | for (; p < pl; p += 3) |
1807 | { |
1811 | { |
1808 | p[0] = lookup_r[(p[0] & 0xff0000)>>16]; |
1812 | p[0] = lookup_r[(p[0] & 0xff0000)>>16]; |
1809 | p[1] = lookup_r[(p[1] & 0x00ff00)>> 8]; |
1813 | p[1] = lookup_r[(p[1] & 0x00ff00)>> 8]; |
1810 | p[2] = lookup_r[(p[2] & 0x0000ff)]; |
1814 | p[2] = lookup_r[(p[2] & 0x0000ff)]; |
1811 | } |
1815 | } |
1812 | p1 = (unsigned char *) ((char *) p1 + srcImage->bytes_per_line); |
1816 | p1 = (unsigned char *) ((char *) p1 + srcImage->bytes_per_line); |
|
|
1817 | } |
|
|
1818 | break; |
1813 | } |
1819 | } |
1814 | break; |
|
|
1815 | } |
|
|
1816 | case 32: |
1820 | case 32: |
1817 | { |
1821 | { |
1818 | RUINT32T *p1, *pf, *p, *pl; |
1822 | RUINT32T *p1, *pf, *p, *pl; |
1819 | p1 = (RUINT32T *) srcImage->data; |
1823 | p1 = (RUINT32T *) srcImage->data; |
1820 | pf = (RUINT32T *) (srcImage->data + srcImage->height * srcImage->bytes_per_line); |
1824 | pf = (RUINT32T *) (srcImage->data + srcImage->height * srcImage->bytes_per_line); |
1821 | |
1825 | |
1822 | while (p1 < pf) |
1826 | while (p1 < pf) |
1823 | { |
1827 | { |
1824 | p = p1; |
1828 | p = p1; |
1825 | pl = p1 + srcImage->width; |
1829 | pl = p1 + srcImage->width; |
1826 | for (; p < pl; p++) |
1830 | for (; p < pl; p++) |
1827 | { |
1831 | { |
1828 | *p = lookup_r[(*p & 0xff0000)>>16] | |
1832 | *p = lookup_r[(*p & 0xff0000)>>16] | |
1829 | lookup_g[(*p & 0x00ff00)>> 8] | |
1833 | lookup_g[(*p & 0x00ff00)>> 8] | |
1830 | lookup_b[(*p & 0x0000ff)] | |
1834 | lookup_b[(*p & 0x0000ff)] | |
1831 | (*p & ~0xffffff); |
1835 | (*p & ~0xffffff); |
1832 | } |
1836 | } |
1833 | p1 = (RUINT32T *) ((char *) p1 + srcImage->bytes_per_line); |
1837 | p1 = (RUINT32T *) ((char *) p1 + srcImage->bytes_per_line); |
|
|
1838 | } |
|
|
1839 | break; |
1834 | } |
1840 | } |
1835 | break; |
|
|
1836 | } |
|
|
1837 | } |
1841 | } |
1838 | |
1842 | |
1839 | free (lookup); |
1843 | free (lookup); |
1840 | } |
1844 | } |
1841 | #endif /* defined(ENABLE_TRANSPARENCY) && !defined(HAVE_AFTERIMAGE) */ |
1845 | #endif /* defined(ENABLE_TRANSPARENCY) && !defined(HAVE_AFTERIMAGE) */ |