… | |
… | |
382 | } |
382 | } |
383 | |
383 | |
384 | rxvt_pop_locale (); |
384 | rxvt_pop_locale (); |
385 | } |
385 | } |
386 | |
386 | |
387 | if (perl) |
387 | if (perl && !term->perl.self) |
388 | { |
388 | { |
389 | // runs outside of perls ENV |
389 | // runs outside of perls ENV |
390 | term->perl.self = (void *)newSVptr ((void *)term, "urxvt::term"); |
390 | term->perl.self = (void *)newSVptr ((void *)term, "urxvt::term"); |
391 | hv_store ((HV *)SvRV ((SV *)term->perl.self), "_overlay", 8, newRV_noinc ((SV *)newAV ()), 0); |
391 | hv_store ((HV *)SvRV ((SV *)term->perl.self), "_overlay", 8, newRV_noinc ((SV *)newAV ()), 0); |
392 | hv_store ((HV *)SvRV ((SV *)term->perl.self), "_selection", 10, newRV_noinc ((SV *)newAV ()), 0); |
392 | hv_store ((HV *)SvRV ((SV *)term->perl.self), "_selection", 10, newRV_noinc ((SV *)newAV ()), 0); |
… | |
… | |
2032 | ############################################################################# |
2032 | ############################################################################# |
2033 | # fancy bg bloatstuff (TODO: should be moved up somewhere) |
2033 | # fancy bg bloatstuff (TODO: should be moved up somewhere) |
2034 | |
2034 | |
2035 | # TODO: ugly |
2035 | # TODO: ugly |
2036 | void |
2036 | void |
2037 | rxvt_term::get_geometry () |
2037 | rxvt_term::background_geometry (bool border = false) |
2038 | PPCODE: |
2038 | PPCODE: |
2039 | EXTEND (SP, 4); |
2039 | EXTEND (SP, 4); |
2040 | PUSHs (sv_2mortal (newSViv (THIS->parent_x))); |
2040 | PUSHs (sv_2mortal (newSViv (THIS->parent_x + (border ? THIS->window_vt_x : 0)))); |
2041 | PUSHs (sv_2mortal (newSViv (THIS->parent_y))); |
2041 | PUSHs (sv_2mortal (newSViv (THIS->parent_y + (border ? THIS->window_vt_y : 0)))); |
2042 | PUSHs (sv_2mortal (newSViv (THIS->szHint.width))); |
2042 | PUSHs (sv_2mortal (newSViv (border ? THIS->vt_width : THIS->szHint.width ))); |
2043 | PUSHs (sv_2mortal (newSViv (THIS->szHint.height))); |
2043 | PUSHs (sv_2mortal (newSViv (border ? THIS->vt_height : THIS->szHint.height))); |
2044 | |
2044 | |
2045 | #if HAVE_IMG |
2045 | #if HAVE_IMG |
|
|
2046 | |
|
|
2047 | #if 0 |
2046 | |
2048 | |
2047 | rxvt_img * |
2049 | rxvt_img * |
2048 | rxvt_term::new_img (SV *format, int width, int height) |
2050 | rxvt_term::new_img (SV *format, int width, int height) |
2049 | CODE: |
2051 | CODE: |
2050 | XRenderPictFormat *f = SvOK (format) |
2052 | XRenderPictFormat *f = SvOK (format) |
… | |
… | |
2052 | : XRenderFindVisualFormat (THIS->dpy, THIS->visual); |
2054 | : XRenderFindVisualFormat (THIS->dpy, THIS->visual); |
2053 | RETVAL = new rxvt_img (THIS, f, width, height); |
2055 | RETVAL = new rxvt_img (THIS, f, width, height); |
2054 | OUTPUT: |
2056 | OUTPUT: |
2055 | RETVAL |
2057 | RETVAL |
2056 | |
2058 | |
|
|
2059 | #endif |
|
|
2060 | |
2057 | #if ENABLE_TRANSPARENCY |
2061 | #if ENABLE_TRANSPARENCY |
2058 | |
2062 | |
2059 | rxvt_img * |
2063 | rxvt_img * |
2060 | rxvt_term::new_img_from_root () |
2064 | rxvt_term::new_img_from_root () |
2061 | CODE: |
2065 | CODE: |
… | |
… | |
2084 | #endif |
2088 | #endif |
2085 | |
2089 | |
2086 | #if HAVE_BG_PIXMAP |
2090 | #if HAVE_BG_PIXMAP |
2087 | |
2091 | |
2088 | void |
2092 | void |
2089 | rxvt_term::set_background (rxvt_img *img) |
2093 | rxvt_term::set_background (rxvt_img *img, bool border = false) |
2090 | CODE: |
2094 | CODE: |
2091 | THIS->bg_destroy (); |
2095 | THIS->bg_destroy (); |
2092 | THIS->bg_pixmap = None; |
2096 | THIS->bg_pixmap = None; |
2093 | THIS->bg_flags &= ~rxvt_term::BG_NEEDS_REFRESH; |
2097 | THIS->bg_flags &= ~(rxvt_term::BG_NEEDS_REFRESH | rxvt_term::BG_INHIBIT_RENDER | rxvt_term::BG_IS_TRANSPARENT); |
2094 | |
2098 | |
2095 | if (img) // TODO: cannot be false |
2099 | if (img) // TODO: cannot be false |
2096 | { |
2100 | { |
2097 | XRenderPictFormat *f = XRenderFindVisualFormat (THIS->dpy, THIS->visual); |
2101 | img = img->clone (); // own the img |
|
|
2102 | |
|
|
2103 | if (img->repeat != RepeatNormal) // X11 only supports RepeatNormal as bg pixmap |
|
|
2104 | { |
|
|
2105 | rxvt_img *img2 = img->sub_rect (0, 0, |
|
|
2106 | border ? THIS->vt_width : THIS->szHint.width, |
|
|
2107 | border ? THIS->vt_height : THIS->szHint.height); |
|
|
2108 | delete img; |
|
|
2109 | img = img2; |
|
|
2110 | } |
|
|
2111 | |
|
|
2112 | { |
|
|
2113 | rxvt_img *img2 = img->convert_to (XRenderFindVisualFormat (THIS->dpy, THIS->visual), THIS->pix_colors [Color_bg]); |
|
|
2114 | delete img; |
2098 | rxvt_img *img2 = 0; |
2115 | img = img2; |
2099 | rxvt_img *img3 = 0; |
2116 | } |
2100 | |
2117 | |
2101 | if (f != img->format) |
|
|
2102 | img = img2 = img->convert_to (f, THIS->pix_colors [Color_bg]); |
|
|
2103 | |
|
|
2104 | img->unshare (); |
|
|
2105 | THIS->bg_pixmap = img->steal (); |
2118 | THIS->bg_pixmap = img->steal (); |
|
|
2119 | THIS->bg_flags |= rxvt_term::BG_NEEDS_REFRESH | rxvt_term::BG_INHIBIT_RENDER; |
|
|
2120 | |
|
|
2121 | if (!border) |
2106 | THIS->bg_flags |= rxvt_term::BG_NEEDS_REFRESH; |
2122 | THIS->bg_flags |= rxvt_term::BG_IS_TRANSPARENT; |
2107 | THIS->bg_valid_since = ev::now (); // TODO: extra bloat |
|
|
2108 | |
2123 | |
2109 | delete img2; |
2124 | delete img; |
2110 | } |
2125 | } |
2111 | |
2126 | |
2112 | #endif |
2127 | #endif |
2113 | |
2128 | |
2114 | #endif |
2129 | #endif |
… | |
… | |
2163 | |
2178 | |
2164 | int |
2179 | int |
2165 | rxvt_img::h () |
2180 | rxvt_img::h () |
2166 | CODE: |
2181 | CODE: |
2167 | RETVAL = THIS->h; |
2182 | RETVAL = THIS->h; |
2168 | OUTPUT: |
|
|
2169 | RETVAL |
|
|
2170 | |
|
|
2171 | bool |
|
|
2172 | rxvt_img::shared () |
|
|
2173 | CODE: |
|
|
2174 | RETVAL = THIS->shared; |
|
|
2175 | OUTPUT: |
2183 | OUTPUT: |
2176 | RETVAL |
2184 | RETVAL |
2177 | |
2185 | |
2178 | Pixmap |
2186 | Pixmap |
2179 | rxvt_img::pm () |
2187 | rxvt_img::pm () |
… | |
… | |
2195 | delete THIS; |
2203 | delete THIS; |
2196 | |
2204 | |
2197 | void |
2205 | void |
2198 | rxvt_img::unshare () |
2206 | rxvt_img::unshare () |
2199 | |
2207 | |
2200 | void |
2208 | int |
2201 | rxvt_img::repeat_mode (render_repeat_mode repeat = RepeatNormal) |
2209 | rxvt_img::repeat_mode (render_repeat_mode repeat = 0) |
|
|
2210 | CODE: |
|
|
2211 | if (items >= 2) |
|
|
2212 | THIS->repeat_mode (repeat); |
|
|
2213 | if (GIMME_V != G_VOID) |
|
|
2214 | XPUSHs (sv_2mortal (newSViv (THIS->repeat))); |
2202 | |
2215 | |
2203 | void |
2216 | void |
2204 | rxvt_img::move (int dx, int dy) |
2217 | rxvt_img::move (int dx, int dy) |
2205 | |
2218 | |
2206 | void |
2219 | void |
… | |
… | |
2209 | void |
2222 | void |
2210 | rxvt_img::contrast (NV r, NV g, NV b, NV a = 1.) |
2223 | rxvt_img::contrast (NV r, NV g, NV b, NV a = 1.) |
2211 | |
2224 | |
2212 | rxvt_img * |
2225 | rxvt_img * |
2213 | rxvt_img::clone () |
2226 | rxvt_img::clone () |
|
|
2227 | |
|
|
2228 | rxvt_img * |
|
|
2229 | rxvt_img::reify () |
2214 | |
2230 | |
2215 | rxvt_img * |
2231 | rxvt_img * |
2216 | rxvt_img::sub_rect (int x, int y, int width, int height) |
2232 | rxvt_img::sub_rect (int x, int y, int width, int height) |
2217 | |
2233 | |
2218 | rxvt_img * |
2234 | rxvt_img * |