/usr/share/psychtoolbox-3/PsychBasic/GetMouse.m is in psychtoolbox-3-common 3.0.11.20140816.dfsg1-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 | function [x,y,buttons,focus,valuators,valinfo] = GetMouse(windowPtrOrScreenNumber, mouseDev)
% [x,y,buttons,focus,valuators,valinfo] = GetMouse([windowPtrOrScreenNumber][, mouseDev])
%
% Returns the current (x,y) position of the cursor and the up/down state
% of the mouse buttons. "buttons" is a 1xN matrix where N is the number of
% mouse buttons. Each element of the matrix represents one mouse button.
% The element is true (1) if the corresponding mouse button is pressed and
% false (0) otherwise.
%
% If an optional windowPtr argument for an onscreen window is provided,
% GetMouse will also return the window focus state as optional 4th
% return argument 'focus'. 'focus' is 1 if the window has input focus
% and zero otherwise.
%
% The optional 'mouseDev' parameter allows to select a specific mouse or
% pointer device to query if your system has multiple pointer devices.
% Currently Linux only, silently ignored on other operating systems.
%
% On Linux, the optional 'valuator' return argument contains the current
% values of all axis on a multi-axis device, ie., a device which not only
% has an x- and y-axis like a conventional mouse. E.g., digitizer tablets
% (like the "Wacom" pen tablets), may also have axis (also called "valuators")
% which report pen rotation, pen tilt and yaw angle wrt. the tablet surface,
% distance to the tablet surface, or normal and tangential pen pressure.
% Touchpads or trackpads may return contact area with the finger, or pressure.
% Joysticks may return info about additional sliders, wheels or other controls
% beyond the deflection of the joystick itself.
%
% 'valuators' is a vector with one double value per axis on Linux. On OS/X
% or MS-Windows, valuator is an empty matrix.
%
% The optional 'valinfo' struct array contains one struct per valuator.
% The struct contains fields with info about a valuator, e.g., minimum
% and maximum value, resolution and a label. This is only supported on Linux.
% On other systems it is an empty matrix.
%
%
% % Test if any mouse button is pressed.
% if any(buttons)
% fprintf('Someone''s pressing a button.\n');
% end
%
% % Test if the first mouse button is pressed.
% if buttons(1)
% fprintf('Someone''s pressing the first button!\n');
% end
%
% % Test if the second mouse button is pressed.
% if length(buttons)>=2 && buttons(2)
% fprintf('Someone''s pressing the second button!\n');
% end
%
% length(buttons) tells you how many buttons there are on your mouse.
%
% The cursor position (x,y) is "local", i.e. relative to the origin of
% the window or screen, if supplied. Otherwise it's "global", i.e. relative
% to the origin of the main screen (the one with the menu bar).
%
% NOTE: If you use GetMouse to wait for clicks, don't forget to wait
% for the user to release the mouse button, ending the current click, before
% you begin waiting for the next mouse press.
%
% Alternatively, you can also use the GetClicks() function to wait for
% mouse-clicks and return the mouse position of first click and the number
% of mouse button clicks.
%
% fprintf('Please click the mouse now.\n');
% [x,y,buttons] = GetMouse;
% while any(buttons) % if already down, wait for release
% [x,y,buttons] = GetMouse;
% end
% while ~any(buttons) % wait for press
% [x,y,buttons] = GetMouse;
% end
% while any(buttons) % wait for release
% [x,y,buttons] = GetMouse;
% end
% fprintf('You clicked! Thanks.\n');
%
% NOTE: GetMouse no longer supports this obsolete usage:
% xy = GetMouse([windowPtrOrScreenNumber])
% where xy is a 1x2 vector containing the x, y coordinates.
%
% OS X: _______________________________________________________________________
%
% Even if your mouse has more than three buttons, GetMouse will return as
% many values as your mouse has buttons. GetMouse can't distinguish between
% multiple mice and will always return the unified state of all mice.
%
% LINUX: ______________________________________________________________________
%
% GetMouse can distinguish between multiple mouse-like devices. It can return
% information about additional axis (valuators). GetMouse not only returns
% status info about mouse/trackpad/trackball devices, but also info about
% Pen digitizer tablets (e.g., Wacom tablets), touch pads and touch screens,
% and joystick/gamepad devices. Usually you'd use the GamePad() function though
% for Joystick/Gamepad query.
%
% M$-Windows: _________________________________________________________________
%
% Limitations:
%
% GetMouse will always assume a three button mouse and therefore always
% return the state of three buttons. GetMouse can't distinguish between
% multiple mice and will always return the unified state of all mice.
% _____________________________________________________________________________
% See also: GetClicks, SetMouse
%
% 4/27/96 dhb Wrote this help file.
% 5/12/96 dgp Removed confusing comment about columns.
% Added query about coordinates.
% 5/16/96 dhb Modified MEX file to conform to above usage, answered
% query about coordinates.
% 5/29/96 dhb Flushing mouse button events added by dgp.
% 8/23/96 dhb Added support for windowInfo argument.
% 2/24/97 dgp Updated.
% 2/24/97 dgp Updated comments about flushing mouse button events.
% 3/10/97 dgp windowPtrOrScreenNumber
% 3/23/97 dgp deleted obsolete comment about flushing mouse button events.
% 5/9/00 dgp Added note about waiting for release before waiting for next click.
% 8/5/01 awi Added examples and modified to document new size of returned button matrix
% on windows.
% 8/6/01 awi Added See also line for GetClicks and note about prior Windows version.
% 4/13/02 dgp Cosmetic.
% 5/16/02 awi Changed Win GetMouse to return variable number of button values and updated
% help accordingly.
% 5/20/02 dgp Cosmetic.
% 5/22/02 dgp Note that obsolete usage is no longer supported.
% 6/10/01 awi Added SetMouse to see also.
% 7/12/04 awi ****** OS X-specific fork from the OS 9 version *******
% Added note that this is not supported in OS X. When the
% new OS X mouse functions are in place this will have to be updated.
% Check to see if the OS 9 GetMouse source would work in
% Carbon on OS X so that we could still support this.
% 11/18/04 awi Added support for OS X
% 09/03/05 mk Add caching for 'numMouseButtons' to get 10-fold speedup.
% 02/21/06 mk Added Linux support.
% 18/04/06 fwc fixed bug that prevented use of multiple mice (tested with 3)
% 06/10/06 mk Added Microsoft Windows support. Removed the old WinPTB GetMouse.dll
% which worked except for button state queries.
% 09/20/06 mk Updated help section for Windows: GetMouse now also works without onscreen windows.
% 09/01/10 mk Restrict number of mouse buttons on Windows and Linux to 3.
% 11/03/10 mk Return window focus state 'focus' as optional 4th return argument.
% 07/29/11 mk Allow specification of 'mouseDev' mouse device index.
% 08/05/11 mk Allow query of additional valuators and info about them. Help update.
% 05/02/12 mk Add workaround for 64-Bit OS/X to compensate for Apple braindamage.
% We Cache the value of numMouseButtons between calls to GetMouse, so we
% can skip the *very time-consuming* detection code on successive calls.
% This gives a tenfold speedup - important for tight realtime-loops.
persistent numMouseButtons;
if isempty(numMouseButtons)
if IsOSX
% Try to get the number of mouse buttons from PsychHID
mousedices = GetMouseIndices;
numMice = length(mousedices);
if numMice == 0
error('GetMouse could not find any mice connected to your computer.');
end
allHidDevices=PsychHID('Devices');
numMouseButtons=-1;
for i=1:numMice
b=allHidDevices(mousedices(i)).buttons;
numMouseButtons=max(b, numMouseButtons);
end
% Invalid number of mouse buttons or no number at all returned by
% PsychHID? Assign a reasonable value of 5 buttons.
if isempty(numMouseButtons) || (numMouseButtons < 1)
numMouseButtons = 5;
end
else
% Windows: Currently only supports three mouse buttons.
% Linux: A greater than zero value (like 3 here) triggers mouse query.
numMouseButtons = 3;
end
end
if nargin < 1
windowPtrOrScreenNumber = [];
end
if nargin < 2
mouseDev = [];
end
% Read the mouse position and buttons:
if (nargout >= 6) && IsLinux
% Get optional valinfo:
[globalX, globalY, rawButtons, focus, valuators, valinfo] = Screen('GetMouseHelper', numMouseButtons, windowPtrOrScreenNumber, mouseDev);
else
% Do not get optional valinfo:
valinfo = [];
[globalX, globalY, rawButtons, focus, valuators] = Screen('GetMouseHelper', numMouseButtons, windowPtrOrScreenNumber, mouseDev);
end
buttons=logical(rawButtons);
%renormalize to screen coordinates from display space
if ~isempty(windowPtrOrScreenNumber)
screenRect=Screen('GlobalRect',windowPtrOrScreenNumber);
x=globalX-screenRect(RectLeft);
y=globalY-screenRect(RectTop);
else
x=globalX;
y=globalY;
end
|