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.116 by root, Fri Jan 20 16:18:07 2006 UTC vs.
Revision 1.130 by root, Wed Jan 25 15:32:48 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
180Uses 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
181make them clickable. When middle-clicked, the program specified in the 213make them clickable. When middle-clicked, the program specified in the
182resource C<urlLauncher> (default C<x-www-browser>) will be started with 214resource C<urlLauncher> (default C<x-www-browser>) will be started with
183the URL as first argument. 215the URL as first argument.
184 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
185=item automove-background 229=item automove-background
186 230
187This 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
188to 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
189a custom pixmap. No scaling is supported in this mode. Exmaple: 233a custom pixmap. No scaling is supported in this mode. Exmaple:
198 242
199=item digital-clock 243=item digital-clock
200 244
201Displays a digital clock using the built-in overlay. 245Displays a digital clock using the built-in overlay.
202 246
203=item example-refresh-hooks 247=item remote-clipboard
204 248
205Displays a very simple digital clock in the upper right corner of the 249Somewhat of a misnomer, this extension adds two menu entries to the
206window. Illustrates overwriting the refresh callbacks to create your own 250selection popup that allows one ti run external commands to store the
207overlays 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'
208 266
209=item selection-pastebin 267=item selection-pastebin
210 268
211This is a little rarely useful extension that Uploads the selection as 269This is a little rarely useful extension that Uploads the selection as
212textfile to a remote site (or does other things). (The implementation is 270textfile to a remote site (or does other things). (The implementation is
232After 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
233in the C<selection-pastebin-url> resource (again, the % is the placeholder 291in the C<selection-pastebin-url> resource (again, the % is the placeholder
234for the filename): 292for the filename):
235 293
236 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.
237 301
238=back 302=back
239 303
240=head1 API DOCUMENTATION 304=head1 API DOCUMENTATION
241 305
338Called 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
339trying to map (display) the toplevel and returning to the mainloop. 403trying to map (display) the toplevel and returning to the mainloop.
340 404
341=item on_destroy $term 405=item on_destroy $term
342 406
343Called whenever something tries to destroy terminal, before doing anything 407Called whenever something tries to destroy terminal, when the terminal is
344yet. If this hook returns true, then destruction is skipped, but this is 408still fully functional (not for long, though).
345rarely a good idea.
346 409
347=item on_reset $term 410=item on_reset $term
348 411
349Called 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
350control 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
452 515
453=item on_refresh_end $term 516=item on_refresh_end $term
454 517
455Called just after the screen gets redrawn. See C<on_refresh_begin>. 518Called just after the screen gets redrawn. See C<on_refresh_begin>.
456 519
457=item on_keyboard_command $term, $string 520=item on_user_command $term, $string
458 521
459Called whenever the user presses a key combination that has a 522Called whenever the a user-configured event is being activated (e.g. via
460C<perl:string> action bound to it (see description of the B<keysym> 523a C<perl:string> action bound to a key, see description of the B<keysym>
461resource in the @@RXVT_NAME@@(1) manpage). 524resource in the @@RXVT_NAME@@(1) manpage).
525
526The event is simply the action string. This interface is assumed to change
527slightly in the future.
462 528
463=item on_x_event $term, $event 529=item on_x_event $term, $event
464 530
465Called on every X event received on the vt window (and possibly other 531Called on every X event received on the vt window (and possibly other
466windows). Should only be used as a last resort. Most event structure 532windows). Should only be used as a last resort. Most event structure
476Called wheneever the window loses keyboard focus, before rxvt-unicode does 542Called wheneever the window loses keyboard focus, before rxvt-unicode does
477focus out processing. 543focus out processing.
478 544
479=item on_configure_notify $term, $event 545=item on_configure_notify $term, $event
480 546
547=item on_property_notify $term, $event
548
481=item on_key_press $term, $event, $keysym, $octets 549=item on_key_press $term, $event, $keysym, $octets
482 550
483=item on_key_release $term, $event, $keysym 551=item on_key_release $term, $event, $keysym
484 552
485=item on_button_press $term, $event 553=item on_button_press $term, $event
494 562
495Called whenever the corresponding X event is received for the terminal If 563Called whenever the corresponding X event is received for the terminal If
496the hook returns true, then the even will be ignored by rxvt-unicode. 564the hook returns true, then the even will be ignored by rxvt-unicode.
497 565
498The event is a hash with most values as named by Xlib (see the XEvent 566The event is a hash with most values as named by Xlib (see the XEvent
499manpage), with the additional members C<row> and C<col>, which are the row 567manpage), with the additional members C<row> and C<col>, which are the
500and column under the mouse cursor. 568(real, not screen-based) row and column under the mouse cursor.
501 569
502C<on_key_press> additionally receives the string rxvt-unicode would 570C<on_key_press> additionally receives the string rxvt-unicode would
503output, if any, in locale-specific encoding. 571output, if any, in locale-specific encoding.
504 572
505subwindow. 573subwindow.
535 603
536our $LIBDIR; 604our $LIBDIR;
537our $RESNAME; 605our $RESNAME;
538our $RESCLASS; 606our $RESCLASS;
539our $RXVTNAME; 607our $RXVTNAME;
608
609our $NOCHAR = chr 0xffff;
540 610
541=head2 Variables in the C<urxvt> Package 611=head2 Variables in the C<urxvt> Package
542 612
543=over 4 613=over 4
544 614
691 unless $msg =~ /\n$/; 761 unless $msg =~ /\n$/;
692 urxvt::warn ($msg); 762 urxvt::warn ($msg);
693 }; 763 };
694} 764}
695 765
766no warnings 'utf8';
767
696my $verbosity = $ENV{URXVT_PERL_VERBOSITY}; 768my $verbosity = $ENV{URXVT_PERL_VERBOSITY};
697 769
698sub verbose { 770sub verbose {
699 my ($level, $msg) = @_; 771 my ($level, $msg) = @_;
700 warn "$msg\n" if $level <= $verbosity; 772 warn "$msg\n" if $level <= $verbosity;
716 788
717 open my $fh, "<:raw", $path 789 open my $fh, "<:raw", $path
718 or die "$path: $!"; 790 or die "$path: $!";
719 791
720 my $source = 792 my $source =
721 "package $pkg; use strict; use utf8;\n" 793 "package $pkg; use strict; use utf8; no warnings 'utf8';\n"
722 . "#line 1 \"$path\"\n{\n" 794 . "#line 1 \"$path\"\n{\n"
723 . (do { local $/; <$fh> }) 795 . (do { local $/; <$fh> })
724 . "\n};\n1"; 796 . "\n};\n1";
725 797
726 eval $source 798 eval $source
751 $TERM->register_package ($_) for @pkg; 823 $TERM->register_package ($_) for @pkg;
752 } 824 }
753 825
754 for (grep $_, map { split /,/, $TERM->resource ("perl_ext_$_") } 1, 2) { 826 for (grep $_, map { split /,/, $TERM->resource ("perl_ext_$_") } 1, 2) {
755 if ($_ eq "default") { 827 if ($_ eq "default") {
756 $ext_arg{$_} ||= [] for qw(selection option-popup selection-popup searchable-scrollback); 828 $ext_arg{$_} ||= [] for qw(selection option-popup selection-popup searchable-scrollback readline);
757 } elsif (/^-(.*)$/) { 829 } elsif (/^-(.*)$/) {
758 delete $ext_arg{$1}; 830 delete $ext_arg{$1};
759 } elsif (/^([^<]+)<(.*)>$/) { 831 } elsif (/^([^<]+)<(.*)>$/) {
760 push @{ $ext_arg{$1} }, $2; 832 push @{ $ext_arg{$1} }, $2;
761 } else { 833 } else {
1258 1330
1259Normally its not a good idea to use this function, as programs might be 1331Normally its not a good idea to use this function, as programs might be
1260confused by changes in cursor position or scrolling. Its useful inside a 1332confused by changes in cursor position or scrolling. Its useful inside a
1261C<on_add_lines> hook, though. 1333C<on_add_lines> hook, though.
1262 1334
1335=item $term->scr_change_screen ($screen)
1336
1337Switch to given screen - 0 primary, 1 secondary.
1338
1263=item $term->cmd_parse ($octets) 1339=item $term->cmd_parse ($octets)
1264 1340
1265Similar to C<scr_add_lines>, but the argument must be in the 1341Similar to C<scr_add_lines>, but the argument must be in the
1266locale-specific encoding of the terminal and can contain command sequences 1342locale-specific encoding of the terminal and can contain command sequences
1267(escape codes) that will be interpreted. 1343(escape codes) that will be interpreted.
1276 1352
1277Replaces the event mask of the pty watcher by the given event mask. Can 1353Replaces the event mask of the pty watcher by the given event mask. Can
1278be used to suppress input and output handling to the pty/tty. See the 1354be used to suppress input and output handling to the pty/tty. See the
1279description of C<< urxvt::timer->events >>. Make sure to always restore 1355description of C<< urxvt::timer->events >>. Make sure to always restore
1280the previous value. 1356the previous value.
1357
1358=item $fd = $term->pty_fd
1359
1360Returns the master file descriptor for the pty in use, or C<-1> if no pty
1361is used.
1281 1362
1282=item $windowid = $term->parent 1363=item $windowid = $term->parent
1283 1364
1284Return the window id of the toplevel window. 1365Return the window id of the toplevel window.
1285 1366
1350=item $modifiermask = $term->ModNumLockMask 1431=item $modifiermask = $term->ModNumLockMask
1351 1432
1352Return the modifier masks corresponding to the "ISO Level 3 Shift" (often 1433Return the modifier masks corresponding to the "ISO Level 3 Shift" (often
1353AltGr), the meta key (often Alt) and the num lock key, if applicable. 1434AltGr), the meta key (often Alt) and the num lock key, if applicable.
1354 1435
1436=item $screen = $term->current_screen
1437
1438Returns the currently displayed screen (0 primary, 1 secondary).
1439
1440=item $cursor_is_hidden = $term->hidden_cursor
1441
1442Returns wether the cursor is currently hidden or not.
1443
1355=item $view_start = $term->view_start ([$newvalue]) 1444=item $view_start = $term->view_start ([$newvalue])
1356 1445
1357Returns the row number of the topmost displayed line. Maximum value is 1446Returns the row number of the topmost displayed line. Maximum value is
1358C<0>, which displays the normal terminal contents. Lower values scroll 1447C<0>, which displays the normal terminal contents. Lower values scroll
1359this many lines into the scrollback buffer. 1448this many lines into the scrollback buffer.
1378line, starting at column C<$start_col> (default C<0>), which is useful 1467line, starting at column C<$start_col> (default C<0>), which is useful
1379to replace only parts of a line. The font index in the rendition will 1468to replace only parts of a line. The font index in the rendition will
1380automatically be updated. 1469automatically be updated.
1381 1470
1382C<$text> is in a special encoding: tabs and wide characters that use more 1471C<$text> is in a special encoding: tabs and wide characters that use more
1383than one cell when displayed are padded with urxvt::NOCHAR characters 1472than one cell when displayed are padded with C<$urxvt::NOCHAR> (chr 65535)
1384(C<chr 65535>). Characters with combining characters and other characters 1473characters. Characters with combining characters and other characters that
1385that do not fit into the normal tetx encoding will be replaced with 1474do not fit into the normal tetx encoding will be replaced with characters
1386characters in the private use area. 1475in the private use area.
1387 1476
1388You have to obey this encoding when changing text. The advantage is 1477You have to obey this encoding when changing text. The advantage is
1389that C<substr> and similar functions work on screen cells and not on 1478that C<substr> and similar functions work on screen cells and not on
1390characters. 1479characters.
1391 1480
1565=item $term->ungrab 1654=item $term->ungrab
1566 1655
1567Calls XUngrab for the most recent grab. Is called automatically on 1656Calls XUngrab for the most recent grab. Is called automatically on
1568evaluation errors, as it is better to lose the grab in the error case as 1657evaluation errors, as it is better to lose the grab in the error case as
1569the session. 1658the session.
1659
1660=item $atom = $term->XInternAtom ($atom_name[, $only_if_exists])
1661
1662=item $atom_name = $term->XGetAtomName ($atom)
1663
1664=item @atoms = $term->XListProperties ($window)
1665
1666=item ($type,$format,$octets) = $term->XGetWindowProperty ($window, $property)
1667
1668=item $term->XChangeWindowProperty ($window, $property, $type, $format, $octets)
1669
1670=item $term->XDeleteProperty ($window, $property)
1671
1672=item $window = $term->DefaultRootWindow
1673
1674=item $term->XReparentWindow ($window, $parent, [$x, $y])
1675
1676=item $term->XMapWindow ($window)
1677
1678=item $term->XUnmapWindow ($window)
1679
1680=item $term->XMoveResizeWindow ($window, $x, $y, $width, $height)
1681
1682=item ($x, $y, $child_window) = $term->XTranslateCoordinates ($src, $dst, $x, $y)
1683
1684=item $term->XChangeInput ($window, $add_events[, $del_events])
1685
1686Various X or X-related functions. The C<$term> object only serves as
1687the source of the display, otherwise those functions map more-or-less
1688directory onto the X functions of the same name.
1570 1689
1571=back 1690=back
1572 1691
1573=cut 1692=cut
1574 1693

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines