diff options
Diffstat (limited to 'protocols/Wayland/Protocols/Core/WLOutput.hs')
| -rw-r--r-- | protocols/Wayland/Protocols/Core/WLOutput.hs | 55 |
1 files changed, 53 insertions, 2 deletions
diff --git a/protocols/Wayland/Protocols/Core/WLOutput.hs b/protocols/Wayland/Protocols/Core/WLOutput.hs index 2989fe5..e0c0d37 100644 --- a/protocols/Wayland/Protocols/Core/WLOutput.hs +++ b/protocols/Wayland/Protocols/Core/WLOutput.hs @@ -12,7 +12,7 @@ module Wayland.Protocols.Core.WLOutput ) where import Data.Data (Typeable) -import Wayland.Server (ResourceClass(..), RequestClass(..), ObjectID) +import Wayland.Server (ResourceClass(..), RequestClass, InterfaceDesc(..), MessageDesc(..), ArgumentDesc(..), Nullability(..), ObjectID) newtype Handle = Handle ObjectID deriving (Show, Eq, Ord) @@ -21,7 +21,58 @@ instance ResourceClass Handle where type ResourceEvent Handle = Event type ResourceRequest Handle = Request objectID (Handle h) = h - interface _ = undefined + interface _ = InterfaceDesc { ifName = "wl_output" + , ifVersion = 4 + , ifRequests = [ MessageDesc { msgName = "release" + , msgSignature = [] + , msgSince = 3 + , msgIsDestructor = True + } + ] + , ifEvents = [ MessageDesc { msgName = "geometry" + , msgSignature = [ ArgumentInt + , ArgumentInt + , ArgumentInt + , ArgumentInt + , ArgumentInt + , ArgumentString NotNull + , ArgumentString NotNull + , ArgumentInt + ] + , msgSince = 1 + , msgIsDestructor = False + } + , MessageDesc { msgName = "mode" + , msgSignature = [ ArgumentUInt + , ArgumentInt + , ArgumentInt + , ArgumentInt + ] + , msgSince = 1 + , msgIsDestructor = False + } + , MessageDesc { msgName = "done" + , msgSignature = [] + , msgSince = 2 + , msgIsDestructor = False + } + , MessageDesc { msgName = "scale" + , msgSignature = [ ArgumentInt ] + , msgSince = 2 + , msgIsDestructor = False + } + , MessageDesc { msgName = "name" + , msgSignature = [ ArgumentString NotNull ] + , msgSince = 4 + , msgIsDestructor = False + } + , MessageDesc { msgName = "description" + , msgSignature = [ ArgumentString NotNull ] + , msgSince = 4 + , msgIsDestructor = False + } + ] + } data Subpixel = SubpixelUnknown |