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

Comparing rxvt-unicode/src/urxvt.pm (file contents):
Revision 1.115 by root, Fri Jan 20 15:57:21 2006 UTC vs.
Revision 1.129 by root, Wed Jan 25 15:11:31 2006 UTC

67the match. For example, the followign adds a regex that matches everything 67the match. For example, the followign adds a regex that matches everything
68between two vertical bars: 68between two vertical bars:
69 69
70 URxvt.selection.pattern-0: \\|([^|]+)\\| 70 URxvt.selection.pattern-0: \\|([^|]+)\\|
71 71
72Another example: Programs I use often output "absolute path: " at the
73beginning of a line when they process multiple files. The following
74pattern matches the filename (note, there is a single space at the very
75end):
76
77 URxvt.selection.pattern-0: ^(/[^:]+):\
78
72You can look at the source of the selection extension to see more 79You can look at the source of the selection extension to see more
73interesting uses, such as parsing a line from beginning to end. 80interesting uses, such as parsing a line from beginning to end.
74 81
75This extension also offers following bindable keyboard commands: 82This extension also offers following bindable keyboard commands:
76 83
91 98
92=item selection-popup (enabled by default) 99=item selection-popup (enabled by default)
93 100
94Binds a popup menu to Ctrl-Button3 that lets you convert the selection 101Binds a popup menu to Ctrl-Button3 that lets you convert the selection
95text into various other formats/action (such as uri unescaping, perl 102text into various other formats/action (such as uri unescaping, perl
96evalution, web-browser starting etc.), depending on content. 103evaluation, web-browser starting etc.), depending on content.
97 104
98Other extensions can extend this popup menu by pushing a code reference 105Other extensions can extend this popup menu by pushing a code reference
99onto C<@{ $term->{selection_popup_hook} }>, that is called whenever the 106onto C<@{ $term->{selection_popup_hook} }>, that is called whenever the
100popup is displayed. 107popup is displayed.
101 108
127bottom. C<Escape> leaves search mode and returns to the point where search 134bottom. C<Escape> leaves search mode and returns to the point where search
128was started, while C<Enter> or C<Return> stay at the current position and 135was started, while C<Enter> or C<Return> stay at the current position and
129additionally stores the first match in the current line into the primary 136additionally stores the first match in the current line into the primary
130selection. 137selection.
131 138
139=item readline (enabled by default)
140
141A support package that tries to make editing with readline easier. At the
142moment, it reacts to clicking with the left mouse button by trying to
143move the text cursor to this position. It does so by generating as many
144cursor-left or cursor-right keypresses as required (the this only works
145for programs that correctly support wide characters).
146
147To avoid too many false positives, this is only done when:
148
149=over 4
150
151=item - the tty is in ICANON state.
152
153=item - the text cursor is visible.
154
155=item - the primary screen is currently being displayed.
156
157=item - the mouse is on the same (multi-row-) line as the text cursor.
158
159=back
160
161The normal selection mechanism isn't disabled, so quick successive clicks
162might interfere with selection creation in harmless ways.
163
132=item selection-autotransform 164=item selection-autotransform
133 165
134This selection allows you to do automatic transforms on a selection 166This selection allows you to do automatic transforms on a selection
135whenever a selection is made. 167whenever a selection is made.
136 168
169This transforms the terminal into a tabbar with additional terminals, that 201This transforms the terminal into a tabbar with additional terminals, that
170is, it implements what is commonly refered to as "tabbed terminal". The topmost line 202is, it implements what is commonly refered to as "tabbed terminal". The topmost line
171displays a "[NEW]" button, which, when clicked, will add a new tab, followed by one 203displays a "[NEW]" button, which, when clicked, will add a new tab, followed by one
172button per tab. 204button per tab.
173 205
174Clicking a button will activate that tab. Pressing Shift-Left and 206Clicking a button will activate that tab. Pressing B<Shift-Left> and
175Shift-Right will switch to the tab left or right of the current one. 207B<Shift-Right> will switch to the tab left or right of the current one,
208while B<Shift-Down> creates a new tab.
176 209
177=item mark-urls 210=item mark-urls
178 211
179Uses per-line display filtering (C<on_line_update>) to underline urls and 212Uses per-line display filtering (C<on_line_update>) to underline urls and
180make them clickable. When middle-clicked, the program specified in the 213make them clickable. When middle-clicked, the program specified in the
181resource C<urlLauncher> (default C<x-www-browser>) will be started with 214resource C<urlLauncher> (default C<x-www-browser>) will be started with
182the URL as first argument. 215the URL as first argument.
183 216
217=item xim-onthespot
218
219This (experimental) perl extension implements OnTheSpot editing. It does
220not work perfectly, and some input methods don't seem to work well with
221OnTheSpot editing in general, but it seems to work at leats for SCIM and
222kinput2.
223
224You enable it by specifying this extension and a preedit style of
225C<OnTheSpot>, i.e.:
226
227 @@RXVT_NAME@@ -pt OnTheSpot -pe xim-onthespot
228
184=item automove-background 229=item automove-background
185 230
186This is basically a one-line extension that dynamically changes the background pixmap offset 231This is basically a one-line extension that dynamically changes the background pixmap offset
187to the window position, in effect creating the same effect as pseudo transparency with 232to the window position, in effect creating the same effect as pseudo transparency with
188a custom pixmap. No scaling is supported in this mode. Exmaple: 233a custom pixmap. No scaling is supported in this mode. Exmaple:
197 242
198=item digital-clock 243=item digital-clock
199 244
200Displays a digital clock using the built-in overlay. 245Displays a digital clock using the built-in overlay.
201 246
202=item example-refresh-hooks 247=item remote-selection
203 248
204Displays a very simple digital clock in the upper right corner of the 249Somewhat of a misnomer, this extension adds two menu entries to the
205window. Illustrates overwriting the refresh callbacks to create your own 250selection popup that allows one ti run external commands to store the
206overlays or changes. 251selection somewhere and fetch it again.
252
253We use it to implement a "distributed selection mechanism", which just
254means that one command uploads the file to a remote server, and another
255reads it.
256
257The commands can be set using the C<URxvt.remote-selection.store> and
258C<URxvt.remote-selection.fetch> resources. The first should read the
259selection to store from STDIN (always in UTF-8), the second should provide
260the selection data on STDOUT (also in UTF-8).
261
262The defaults (which are likely useless to you) use rsh and cat:
263
264 URxvt.remote-selection.store: rsh ruth 'cat >/tmp/distributed-selection'
265 URxvt.remote-selection.fetch: rsh ruth 'cat /tmp/distributed-selection'
207 266
208=item selection-pastebin 267=item selection-pastebin
209 268
210This is a little rarely useful extension that Uploads the selection as 269This is a little rarely useful extension that Uploads the selection as
211textfile to a remote site (or does other things). (The implementation is 270textfile to a remote site (or does other things). (The implementation is
231After a successful upload the selection will be replaced by the text given 290After a successful upload the selection will be replaced by the text given
232in the C<selection-pastebin-url> resource (again, the % is the placeholder 291in the C<selection-pastebin-url> resource (again, the % is the placeholder
233for the filename): 292for the filename):
234 293
235 URxvt.selection-pastebin.url: http://www.ta-sa.org/files/txt/% 294 URxvt.selection-pastebin.url: http://www.ta-sa.org/files/txt/%
295
296=item example-refresh-hooks
297
298Displays a very simple digital clock in the upper right corner of the
299window. Illustrates overwriting the refresh callbacks to create your own
300overlays or changes.
236 301
237=back 302=back
238 303
239=head1 API DOCUMENTATION 304=head1 API DOCUMENTATION
240 305
337Called at the very end of initialisation of a new terminal, just before 402Called at the very end of initialisation of a new terminal, just before
338trying to map (display) the toplevel and returning to the mainloop. 403trying to map (display) the toplevel and returning to the mainloop.
339 404
340=item on_destroy $term 405=item on_destroy $term
341 406
342Called whenever something tries to destroy terminal, before doing anything 407Called whenever something tries to destroy terminal, when the terminal is
343yet. If this hook returns true, then destruction is skipped, but this is 408still fully functional (not for long, though).
344rarely a good idea.
345 409
346=item on_reset $term 410=item on_reset $term
347 411
348Called after the screen is "reset" for any reason, such as resizing or 412Called after the screen is "reset" for any reason, such as resizing or
349control sequences. Here is where you can react on changes to size-related 413control sequences. Here is where you can react on changes to size-related
475Called wheneever the window loses keyboard focus, before rxvt-unicode does 539Called wheneever the window loses keyboard focus, before rxvt-unicode does
476focus out processing. 540focus out processing.
477 541
478=item on_configure_notify $term, $event 542=item on_configure_notify $term, $event
479 543
544=item on_property_notify $term, $event
545
480=item on_key_press $term, $event, $keysym, $octets 546=item on_key_press $term, $event, $keysym, $octets
481 547
482=item on_key_release $term, $event, $keysym 548=item on_key_release $term, $event, $keysym
483 549
484=item on_button_press $term, $event 550=item on_button_press $term, $event
493 559
494Called whenever the corresponding X event is received for the terminal If 560Called whenever the corresponding X event is received for the terminal If
495the hook returns true, then the even will be ignored by rxvt-unicode. 561the hook returns true, then the even will be ignored by rxvt-unicode.
496 562
497The event is a hash with most values as named by Xlib (see the XEvent 563The event is a hash with most values as named by Xlib (see the XEvent
498manpage), with the additional members C<row> and C<col>, which are the row 564manpage), with the additional members C<row> and C<col>, which are the
499and column under the mouse cursor. 565(real, not screen-based) row and column under the mouse cursor.
500 566
501C<on_key_press> additionally receives the string rxvt-unicode would 567C<on_key_press> additionally receives the string rxvt-unicode would
502output, if any, in locale-specific encoding. 568output, if any, in locale-specific encoding.
503 569
504subwindow. 570subwindow.
534 600
535our $LIBDIR; 601our $LIBDIR;
536our $RESNAME; 602our $RESNAME;
537our $RESCLASS; 603our $RESCLASS;
538our $RXVTNAME; 604our $RXVTNAME;
605
606our $NOCHAR = chr 0xffff;
539 607
540=head2 Variables in the C<urxvt> Package 608=head2 Variables in the C<urxvt> Package
541 609
542=over 4 610=over 4
543 611
690 unless $msg =~ /\n$/; 758 unless $msg =~ /\n$/;
691 urxvt::warn ($msg); 759 urxvt::warn ($msg);
692 }; 760 };
693} 761}
694 762
763no warnings 'utf8';
764
695my $verbosity = $ENV{URXVT_PERL_VERBOSITY}; 765my $verbosity = $ENV{URXVT_PERL_VERBOSITY};
696 766
697sub verbose { 767sub verbose {
698 my ($level, $msg) = @_; 768 my ($level, $msg) = @_;
699 warn "$msg\n" if $level <= $verbosity; 769 warn "$msg\n" if $level <= $verbosity;
715 785
716 open my $fh, "<:raw", $path 786 open my $fh, "<:raw", $path
717 or die "$path: $!"; 787 or die "$path: $!";
718 788
719 my $source = 789 my $source =
720 "package $pkg; use strict; use utf8;\n" 790 "package $pkg; use strict; use utf8; no warnings 'utf8';\n"
721 . "#line 1 \"$path\"\n{\n" 791 . "#line 1 \"$path\"\n{\n"
722 . (do { local $/; <$fh> }) 792 . (do { local $/; <$fh> })
723 . "\n};\n1"; 793 . "\n};\n1";
724 794
725 eval $source 795 eval $source
750 $TERM->register_package ($_) for @pkg; 820 $TERM->register_package ($_) for @pkg;
751 } 821 }
752 822
753 for (grep $_, map { split /,/, $TERM->resource ("perl_ext_$_") } 1, 2) { 823 for (grep $_, map { split /,/, $TERM->resource ("perl_ext_$_") } 1, 2) {
754 if ($_ eq "default") { 824 if ($_ eq "default") {
755 $ext_arg{$_} ||= [] for qw(selection option-popup selection-popup searchable-scrollback); 825 $ext_arg{$_} ||= [] for qw(selection option-popup selection-popup searchable-scrollback readline);
756 } elsif (/^-(.*)$/) { 826 } elsif (/^-(.*)$/) {
757 delete $ext_arg{$1}; 827 delete $ext_arg{$1};
758 } elsif (/^([^<]+)<(.*)>$/) { 828 } elsif (/^([^<]+)<(.*)>$/) {
759 push @{ $ext_arg{$1} }, $2; 829 push @{ $ext_arg{$1} }, $2;
760 } else { 830 } else {
1257 1327
1258Normally its not a good idea to use this function, as programs might be 1328Normally its not a good idea to use this function, as programs might be
1259confused by changes in cursor position or scrolling. Its useful inside a 1329confused by changes in cursor position or scrolling. Its useful inside a
1260C<on_add_lines> hook, though. 1330C<on_add_lines> hook, though.
1261 1331
1332=item $term->scr_change_screen ($screen)
1333
1334Switch to given screen - 0 primary, 1 secondary.
1335
1262=item $term->cmd_parse ($octets) 1336=item $term->cmd_parse ($octets)
1263 1337
1264Similar to C<scr_add_lines>, but the argument must be in the 1338Similar to C<scr_add_lines>, but the argument must be in the
1265locale-specific encoding of the terminal and can contain command sequences 1339locale-specific encoding of the terminal and can contain command sequences
1266(escape codes) that will be interpreted. 1340(escape codes) that will be interpreted.
1275 1349
1276Replaces the event mask of the pty watcher by the given event mask. Can 1350Replaces the event mask of the pty watcher by the given event mask. Can
1277be used to suppress input and output handling to the pty/tty. See the 1351be used to suppress input and output handling to the pty/tty. See the
1278description of C<< urxvt::timer->events >>. Make sure to always restore 1352description of C<< urxvt::timer->events >>. Make sure to always restore
1279the previous value. 1353the previous value.
1354
1355=item $fd = $term->pty_fd
1356
1357Returns the master file descriptor for the pty in use, or C<-1> if no pty
1358is used.
1280 1359
1281=item $windowid = $term->parent 1360=item $windowid = $term->parent
1282 1361
1283Return the window id of the toplevel window. 1362Return the window id of the toplevel window.
1284 1363
1349=item $modifiermask = $term->ModNumLockMask 1428=item $modifiermask = $term->ModNumLockMask
1350 1429
1351Return the modifier masks corresponding to the "ISO Level 3 Shift" (often 1430Return the modifier masks corresponding to the "ISO Level 3 Shift" (often
1352AltGr), the meta key (often Alt) and the num lock key, if applicable. 1431AltGr), the meta key (often Alt) and the num lock key, if applicable.
1353 1432
1433=item $screen = $term->current_screen
1434
1435Returns the currently displayed screen (0 primary, 1 secondary).
1436
1437=item $cursor_is_hidden = $term->hidden_cursor
1438
1439Returns wether the cursor is currently hidden or not.
1440
1354=item $view_start = $term->view_start ([$newvalue]) 1441=item $view_start = $term->view_start ([$newvalue])
1355 1442
1356Returns the row number of the topmost displayed line. Maximum value is 1443Returns the row number of the topmost displayed line. Maximum value is
1357C<0>, which displays the normal terminal contents. Lower values scroll 1444C<0>, which displays the normal terminal contents. Lower values scroll
1358this many lines into the scrollback buffer. 1445this many lines into the scrollback buffer.
1377line, starting at column C<$start_col> (default C<0>), which is useful 1464line, starting at column C<$start_col> (default C<0>), which is useful
1378to replace only parts of a line. The font index in the rendition will 1465to replace only parts of a line. The font index in the rendition will
1379automatically be updated. 1466automatically be updated.
1380 1467
1381C<$text> is in a special encoding: tabs and wide characters that use more 1468C<$text> is in a special encoding: tabs and wide characters that use more
1382than one cell when displayed are padded with urxvt::NOCHAR characters 1469than one cell when displayed are padded with C<$urxvt::NOCHAR> (chr 65535)
1383(C<chr 65535>). Characters with combining characters and other characters 1470characters. Characters with combining characters and other characters that
1384that do not fit into the normal tetx encoding will be replaced with 1471do not fit into the normal tetx encoding will be replaced with characters
1385characters in the private use area. 1472in the private use area.
1386 1473
1387You have to obey this encoding when changing text. The advantage is 1474You have to obey this encoding when changing text. The advantage is
1388that C<substr> and similar functions work on screen cells and not on 1475that C<substr> and similar functions work on screen cells and not on
1389characters. 1476characters.
1390 1477
1564=item $term->ungrab 1651=item $term->ungrab
1565 1652
1566Calls XUngrab for the most recent grab. Is called automatically on 1653Calls XUngrab for the most recent grab. Is called automatically on
1567evaluation errors, as it is better to lose the grab in the error case as 1654evaluation errors, as it is better to lose the grab in the error case as
1568the session. 1655the session.
1656
1657=item $atom = $term->XInternAtom ($atom_name[, $only_if_exists])
1658
1659=item $atom_name = $term->XGetAtomName ($atom)
1660
1661=item @atoms = $term->XListProperties ($window)
1662
1663=item ($type,$format,$octets) = $term->XGetWindowProperty ($window, $property)
1664
1665=item $term->XChangeWindowProperty ($window, $property, $type, $format, $octets)
1666
1667=item $term->XDeleteProperty ($window, $property)
1668
1669=item $window = $term->DefaultRootWindow
1670
1671=item $term->XReparentWindow ($window, $parent, [$x, $y])
1672
1673=item $term->XMapWindow ($window)
1674
1675=item $term->XUnmapWindow ($window)
1676
1677=item $term->XMoveResizeWindow ($window, $x, $y, $width, $height)
1678
1679=item ($x, $y, $child_window) = $term->XTranslateCoordinates ($src, $dst, $x, $y)
1680
1681=item $term->XChangeInput ($window, $add_events[, $del_events])
1682
1683Various X or X-related functions. The C<$term> object only serves as
1684the source of the display, otherwise those functions map more-or-less
1685directory onto the X functions of the same name.
1569 1686
1570=back 1687=back
1571 1688
1572=cut 1689=cut
1573 1690

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines