ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/rxvtperl.xs
(Generate patch)

Comparing rxvt-unicode/src/rxvtperl.xs (file contents):
Revision 1.157 by root, Sun Jun 3 15:54:15 2012 UTC vs.
Revision 1.169 by sf-exg, Tue Jun 5 15:18:24 2012 UTC

51 51
52///////////////////////////////////////////////////////////////////////////// 52/////////////////////////////////////////////////////////////////////////////
53 53
54typedef char * octet_string; 54typedef char * octet_string;
55typedef char * utf8_string; 55typedef char * utf8_string;
56
57typedef int render_repeat_mode;
56 58
57typedef GdkPixbuf * urxvt__pixbuf; 59typedef GdkPixbuf * urxvt__pixbuf;
58typedef rxvt_img * urxvt__img; 60typedef rxvt_img * urxvt__img;
59 61
60///////////////////////////////////////////////////////////////////////////// 62/////////////////////////////////////////////////////////////////////////////
800 const_iv (XIMSecondary), 802 const_iv (XIMSecondary),
801 const_iv (XIMTertiary), 803 const_iv (XIMTertiary),
802 const_iv (XIMVisibleToForward), 804 const_iv (XIMVisibleToForward),
803 const_iv (XIMVisibleToBackword), 805 const_iv (XIMVisibleToBackword),
804 const_iv (XIMVisibleToCenter), 806 const_iv (XIMVisibleToCenter),
807#if XRENDER
808 const_iv (PictStandardARGB32),
809 const_iv (PictStandardRGB24),
810 const_iv (PictStandardA8),
811 const_iv (PictStandardA4),
812 const_iv (PictStandardA1),
813 const_iv (RepeatNone),
814 const_iv (RepeatNormal),
815 const_iv (RepeatPad),
816 const_iv (RepeatReflect),
817#endif
805# if 0 818# if 0
806 const_iv (XIMForwardChar), 819 const_iv (XIMForwardChar),
807 const_iv (XIMBackwardChar), 820 const_iv (XIMBackwardChar),
808 const_iv (XIMForwardWord), 821 const_iv (XIMForwardWord),
809 const_iv (XIMBackwardWord), 822 const_iv (XIMBackwardWord),
834 rxvt_fatal ("%s", msg); 847 rxvt_fatal ("%s", msg);
835 848
836void 849void
837_exit (int status) 850_exit (int status)
838 851
852void
853catch_fatal (SV *block)
854 PROTOTYPE: &
855 CODE:
856 try
857 {
858 PUSHMARK (SP);
859 PUTBACK;
860 call_sv (block, G_VOID | G_DISCARD);
861 SPAGAIN;
862 }
863 catch (const rxvt_failure_exception &e)
864 {
865 croak ("rxvt_fatal exception caught, trying to continue.");
866 }
867
839NV 868NV
840NOW () 869NOW ()
841 CODE: 870 CODE:
842 RETVAL = ev::now (); 871 RETVAL = ev::now ();
843 OUTPUT: 872 OUTPUT:
967rxvt_term::destroy () 996rxvt_term::destroy ()
968 997
969void 998void
970rxvt_term::set_should_invoke (int htype, int inc) 999rxvt_term::set_should_invoke (int htype, int inc)
971 CODE: 1000 CODE:
972 THIS->perl.should_invoke [htype] += inc; 1001 uint8_t &count = THIS->perl.should_invoke [htype];
1002 uint8_t prev = count;
1003 count += inc;
1004 if (!prev != !count)
1005 {
1006 // hook status changed, react
1007 switch (htype)
1008 {
1009 case HOOK_POSITION_CHANGE:
1010 if (count)
1011 THIS->get_window_origin (THIS->parent_x, THIS->parent_y);
1012 }
1013 }
973 1014
974int 1015int
975rxvt_term::grab_button (int button, U32 modifiers, Window window = THIS->vt) 1016rxvt_term::grab_button (int button, U32 modifiers, Window window = THIS->vt)
976 CODE: 1017 CODE:
977 RETVAL = XGrabButton (THIS->dpy, button, modifiers, window, 1, 1018 RETVAL = XGrabButton (THIS->dpy, button, modifiers, window, 1,
1234 CODE: 1275 CODE:
1235 RETVAL = THIS->parent; 1276 RETVAL = THIS->parent;
1236 OUTPUT: 1277 OUTPUT:
1237 RETVAL 1278 RETVAL
1238 1279
1239Window 1280int
1240rxvt_term::vt () 1281rxvt_term::parent_x ()
1241 CODE: 1282 CODE:
1242 RETVAL = THIS->vt; 1283 RETVAL = THIS->parent_x;
1284 OUTPUT:
1285 RETVAL
1286
1287int
1288rxvt_term::parent_y ()
1289 CODE:
1290 RETVAL = THIS->parent_y;
1243 OUTPUT: 1291 OUTPUT:
1244 RETVAL 1292 RETVAL
1245 1293
1246void 1294void
1247rxvt_term::vt_emask_add (U32 emask) 1295rxvt_term::vt_emask_add (U32 emask)
1723 1771
1724void 1772void
1725rxvt_term::scr_bell () 1773rxvt_term::scr_bell ()
1726 1774
1727void 1775void
1776rxvt_term::scr_recolour (bool refresh = true);
1777
1778void
1728rxvt_term::scr_change_screen (int screen) 1779rxvt_term::scr_change_screen (int screen)
1729 1780
1730void 1781void
1731rxvt_term::scr_add_lines (SV *string) 1782rxvt_term::scr_add_lines (SV *string)
1732 CODE: 1783 CODE:
1845 type, format, PropModeReplace, 1896 type, format, PropModeReplace,
1846 (unsigned char *)data_, len / elemsize); 1897 (unsigned char *)data_, len / elemsize);
1847} 1898}
1848 1899
1849Atom 1900Atom
1850XInternAtom (rxvt_term *term, char *atom_name, int only_if_exists = FALSE) 1901XInternAtom (rxvt_term *term, octet_string atom_name, int only_if_exists = FALSE)
1851 C_ARGS: term->dpy, atom_name, only_if_exists 1902 C_ARGS: term->dpy, atom_name, only_if_exists
1852 1903
1853char * 1904char *
1854XGetAtomName (rxvt_term *term, Atom atom) 1905XGetAtomName (rxvt_term *term, Atom atom)
1855 C_ARGS: term->dpy, atom 1906 C_ARGS: term->dpy, atom
1856 CLEANUP: 1907 CLEANUP:
1857 XFree (RETVAL); 1908 XFree (RETVAL);
1858 1909
1859void 1910void
1860XDeleteProperty (rxvt_term *term, Window window, Atom property) 1911XDeleteProperty (rxvt_term *term, Window window, Atom property)
1861 C_ARGS: term->dpy, window, property 1912 C_ARGS: term->dpy, window, property
1862 1913
1863Window 1914Window
1864rxvt_term::DefaultRootWindow () 1915rxvt_term::DefaultRootWindow ()
1865 CODE: 1916 CODE:
1866 RETVAL = THIS->display->root; 1917 RETVAL = THIS->display->root;
1918 PUSHs (newSVuv (child)); 1969 PUSHs (newSVuv (child));
1919 } 1970 }
1920} 1971}
1921 1972
1922############################################################################# 1973#############################################################################
1974# fancy bg bloatstuff (TODO: should be moved up somewhere)
1975
1976# TODO: ugly
1977void
1978rxvt_term::get_geometry ()
1979 PPCODE:
1980 EXTEND (SP, 4);
1981 PUSHs (sv_2mortal (newSViv (THIS->parent_x)));
1982 PUSHs (sv_2mortal (newSViv (THIS->parent_y)));
1983 PUSHs (sv_2mortal (newSViv (THIS->szHint.width)));
1984 PUSHs (sv_2mortal (newSViv (THIS->szHint.height)));
1985
1986#if HAVE_IMG
1987
1988rxvt_img *
1989rxvt_term::new_img (SV *format, int width, int height)
1990 CODE:
1991 XRenderPictFormat *f = SvOK (format)
1992 ? XRenderFindStandardFormat (THIS->dpy, SvIV (format))
1993 : XRenderFindVisualFormat (THIS->dpy, THIS->visual);
1994 RETVAL = new rxvt_img (THIS, f, width, height);
1995 OUTPUT:
1996 RETVAL
1997
1998#if ENABLE_TRANSPARENCY
1999
2000#if 0
2001
2002rxvt_img *
2003rxvt_term::new_img_from_root ()
2004 CODE:
2005 RETVAL = rxvt_img::new_from_root (THIS);
2006 OUTPUT:
2007 RETVAL
2008
2009#endif
2010
2011#endif
2012
2013#if HAVE_PIXBUF
2014
2015rxvt_img *
2016rxvt_term::new_img_from_file (octet_string filename)
2017 CODE:
2018 try
2019 {
2020 RETVAL = rxvt_img::new_from_file (THIS, filename);
2021 }
2022 catch (const class rxvt_failure_exception &e)
2023 {
2024 croak ("new_img_from_file failed");
2025 }
2026 OUTPUT:
2027 RETVAL
2028
2029#endif
2030
2031#if HAVE_BG_PIXMAP
2032
2033void
2034rxvt_term::set_background (rxvt_img *img)
2035 CODE:
2036 THIS->bg_destroy ();
2037 THIS->bg_pixmap = None;
2038 THIS->bg_flags &= ~rxvt_term::BG_NEEDS_REFRESH;
2039
2040 if (img) // TODO: cannot be false
2041 {
2042 img->unshare ();
2043 THIS->bg_pixmap = img->steal ();
2044 THIS->bg_flags |= rxvt_term::BG_NEEDS_REFRESH;
2045 THIS->bg_valid_since = ev::now (); // TODO: extra bloat
2046 }
2047
2048#endif
2049
2050#endif
2051
2052#############################################################################
1923# urxvt::overlay 2053# urxvt::overlay
1924############################################################################# 2054#############################################################################
1925 2055
1926MODULE = urxvt PACKAGE = urxvt::overlay 2056MODULE = urxvt PACKAGE = urxvt::overlay
1927 2057
1955 2085
1956MODULE = urxvt PACKAGE = urxvt::img 2086MODULE = urxvt PACKAGE = urxvt::img
1957 2087
1958#if HAVE_IMG 2088#if HAVE_IMG
1959 2089
1960# rxvt_img (rxvt_screen *screen, XRenderPictFormat *format, int width, int height); 2090# rxvt_img *new (rxvt_screen *screen, XRenderPictFormat *format, int width, int height)
1961# rxvt_img (rxvt_screen *screen, XRenderPictFormat *format, int width, int height, Pixmap pixmap); 2091# rxvt_img *rxvt_img (rxvt_screen *screen, XRenderPictFormat *format, int width, int height, Pixmap pixmap);
1962 2092
1963void fill (urxvt::img self, SV *c) 2093int
2094rxvt_img::w ()
1964 CODE: 2095 CODE:
2096 RETVAL = THIS->w;
2097 OUTPUT:
2098 RETVAL
2099
2100int
2101rxvt_img::h ()
2102 CODE:
2103 RETVAL = THIS->h;
2104 OUTPUT:
2105 RETVAL
2106
2107bool
2108rxvt_img::shared ()
2109 CODE:
2110 RETVAL = THIS->shared;
2111 OUTPUT:
2112 RETVAL
2113
2114Pixmap
2115rxvt_img::pm ()
2116 CODE:
2117 RETVAL = THIS->pm;
2118 OUTPUT:
2119 RETVAL
2120
2121void
2122rxvt_img::fill (SV *c)
2123 INIT:
1965 rxvt_color rc; 2124 rxvt_color rc;
1966 parse_color (self->s, rc, c); 2125 parse_color (THIS->s, rc, c);
1967 self->fill (rc); 2126 C_ARGS: rc
1968 2127
1969void blur (urxvt::img self, int rh, int rv) 2128void
2129rxvt_img::DESTROY ()
1970 CODE: 2130 CODE:
1971 self->blur (rh, rv); 2131 delete THIS;
1972 2132
1973void brightness (urxvt::img self, double r, double g, double b, double a = 1.) 2133rxvt_img *
1974 CODE: 2134rxvt_img::blur (int rh, int rv)
1975 self->brightness (r, g, b, a);
1976 2135
1977void contrast (urxvt::img self, double r, double g, double b, double a = 1.) 2136void
1978 CODE: 2137rxvt_img::brightness (NV r, NV g, NV b, NV a = 1.)
1979 self->contrast (r, g, b, a);
1980 2138
1981urxvt::img copy (urxvt::img self) 2139void
1982 CODE: 2140rxvt_img::contrast (NV r, NV g, NV b, NV a = 1.)
1983 RETVAL = self->copy ();
1984 OUTPUT:
1985 RETVAL
1986 2141
2142void
2143rxvt_img::unshare ()
2144
2145rxvt_img *
2146rxvt_img::clone ()
2147
2148rxvt_img *
2149rxvt_img::sub_rect (int x, int y, int width, int height, render_repeat_mode repeat = RepeatNormal)
2150
2151rxvt_img *
2152rxvt_img::transform (int new_width, int new_height, NV p11, NV p12, NV p13, NV p21, NV p22, NV p23, NV p31, NV p32, NV p33, render_repeat_mode repeat = RepeatNormal)
2153 INIT:
2154 double matrix[9] = {
2155 p11, p12, p13,
2156 p21, p22, p23,
2157 p31, p32, p33
2158 };
2159 C_ARGS: new_width, new_height, matrix, repeat
2160
2161rxvt_img *
1987urxvt::img scale (urxvt::img self, int new_width, int new_height) 2162rxvt_img::scale (int new_width, int new_height)
1988 CODE:
1989 RETVAL = self->scale (new_width, new_height);
1990 OUTPUT:
1991 RETVAL
1992 2163
1993# rxvt_img *transform (urxvt::img self, int new_width, int new_height, double matrix[16]); 2164rxvt_img *
2165rxvt_img::rotate (int new_width, int new_height, int x, int y, NV phi, render_repeat_mode repeat = RepeatNormal)
1994 2166
1995#endif 2167#endif
1996 2168

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines