modules/win95.pipe.lisp

   1
   2 (defcfunex-exported ("CallNamedPipeA" CallNamedPipeA :convention :stdcall) :int
   3   (arg0 :string)
   4   (arg1 :pointer)
   5   (arg2 :unsigned-long)
   6   (arg3 :pointer)
   7   (arg4 :unsigned-long)
   8   (arg5 :pointer)
   9   (arg6 :unsigned-long))
  10
  11 (defcfunex-exported ("CallNamedPipeW" CallNamedPipeW :convention :stdcall) :int
  12   (arg0 :pointer)
  13   (arg1 :pointer)
  14   (arg2 :unsigned-long)
  15   (arg3 :pointer)
  16   (arg4 :unsigned-long)
  17   (arg5 :pointer)
  18   (arg6 :unsigned-long))
  19
  20 (defcfunex-exported ("ConnectNamedPipe" ConnectNamedPipe :convention :stdcall) :int
  21   (arg0 :pointer)
  22   (arg1 :pointer))
  23
  24 (defcfunex-exported ("CreateNamedPipeA" CreateNamedPipeA :convention :stdcall) :pointer
  25   (arg0 :string)
  26   (arg1 :unsigned-long)
  27   (arg2 :unsigned-long)
  28   (arg3 :unsigned-long)
  29   (arg4 :unsigned-long)
  30   (arg5 :unsigned-long)
  31   (arg6 :unsigned-long)
  32   (arg7 :pointer))
  33
  34 (defcfunex-exported ("CreateNamedPipeW" CreateNamedPipeW :convention :stdcall) :pointer
  35   (arg0 :pointer)
  36   (arg1 :unsigned-long)
  37   (arg2 :unsigned-long)
  38   (arg3 :unsigned-long)
  39   (arg4 :unsigned-long)
  40   (arg5 :unsigned-long)
  41   (arg6 :unsigned-long)
  42   (arg7 :pointer))
  43
  44 (defcfunex-exported ("CreatePipe" CreatePipe :convention :stdcall) :int
  45   (arg0 :pointer)
  46   (arg1 :pointer)
  47   (arg2 :pointer)
  48   (arg3 :unsigned-long))
  49
  50 (defcfunex-exported ("DisconnectNamedPipe" DisconnectNamedPipe :convention :stdcall) :int
  51   (arg0 :pointer))
  52
  53 (defcfunex-exported ("GetNamedPipeHandleStateA" GetNamedPipeHandleStateA :convention :stdcall) :int
  54   (arg0 :pointer)
  55   (arg1 :pointer)
  56   (arg2 :pointer)
  57   (arg3 :pointer)
  58   (arg4 :pointer)
  59   (arg5 :string)
  60   (arg6 :unsigned-long))
  61
  62 (defcfunex-exported ("GetNamedPipeHandleStateW" GetNamedPipeHandleStateW :convention :stdcall) :int
  63   (arg0 :pointer)
  64   (arg1 :pointer)
  65   (arg2 :pointer)
  66   (arg3 :pointer)
  67   (arg4 :pointer)
  68   (arg5 :pointer)
  69   (arg6 :unsigned-long))
  70
  71 (defcfunex-exported ("GetNamedPipeInfo" GetNamedPipeInfo :convention :stdcall) :int
  72   (arg0 :pointer)
  73   (arg1 :pointer)
  74   (arg2 :pointer)
  75   (arg3 :pointer)
  76   (arg4 :pointer))
  77
  78 (defcfunex-exported ("PeekNamedPipe" PeekNamedPipe :convention :stdcall) :int
  79   (arg0 :pointer)
  80   (arg1 :pointer)
  81   (arg2 :unsigned-long)
  82   (arg3 :pointer)
  83   (arg4 :pointer)
  84   (arg5 :pointer))
  85
  86 (defcfunex-exported ("SetNamedPipeHandleState" SetNamedPipeHandleState :convention :stdcall) :int
  87   (arg0 :pointer)
  88   (arg1 :pointer)
  89   (arg2 :pointer)
  90   (arg3 :pointer))
  91
  92 (defcfunex-exported ("TransactNamedPipe" TransactNamedPipe :convention :stdcall) :int
  93   (arg0 :pointer)
  94   (arg1 :pointer)
  95   (arg2 :unsigned-long)
  96   (arg3 :pointer)
  97   (arg4 :unsigned-long)
  98   (arg5 :pointer)
  99   (arg6 :pointer))
 100
 101 (defcfunex-exported ("WaitNamedPipeA" WaitNamedPipeA :convention :stdcall) :int
 102   (arg0 :string)
 103   (arg1 :unsigned-long))
 104
 105 (defcfunex-exported ("WaitNamedPipeW" WaitNamedPipeW :convention :stdcall) :int
 106   (arg0 :pointer)
 107   (arg1 :unsigned-long))
 108