1 #define __OOP_NOATTRBASES__
5 #include <utility/hooks.h>
6 #include <exec/interrupts.h>
11 #include <aros/asmcall.h>
13 #include <proto/oop.h>
15 #include "DriverData.h"
16 #include "pci_wrapper.h"
18 #include <aros/debug.h>
19 #define KPrintF kprintf
21 struct Library
*OOPBase
;
24 static OOP_AttrBase __IHidd_PCIDev
;
25 static OOP_Object
*pciobj
, *irqobj
;
27 static OOP_MethodID mid_RB
;
28 static OOP_MethodID mid_RW
;
29 static OOP_MethodID mid_RL
;
31 static OOP_MethodID mid_WB
;
32 static OOP_MethodID mid_WW
;
33 static OOP_MethodID mid_WL
;
35 static HIDDT_IRQ_Handler inthandler
;
36 static BOOL inthandler_added
;
38 BOOL
ahi_pci_init(struct DriverBase
* AHIsubBase
)
40 OOPBase
= OpenLibrary(AROSOOP_NAME
, 0);
43 __IHidd_PCIDev
= OOP_ObtainAttrBase(IID_Hidd_PCIDevice
);
46 pciobj
= OOP_NewObject(NULL
, CLID_Hidd_PCI
, NULL
);
47 irqobj
= OOP_NewObject(NULL
, CLID_Hidd_IRQ
, NULL
);
51 mid_RB
= OOP_GetMethodID(IID_Hidd_PCIDevice
, moHidd_PCIDevice_ReadConfigByte
);
52 mid_RW
= OOP_GetMethodID(IID_Hidd_PCIDevice
, moHidd_PCIDevice_ReadConfigWord
);
53 mid_RL
= OOP_GetMethodID(IID_Hidd_PCIDevice
, moHidd_PCIDevice_ReadConfigLong
);
55 mid_WB
= OOP_GetMethodID(IID_Hidd_PCIDevice
, moHidd_PCIDevice_WriteConfigByte
);
56 mid_WW
= OOP_GetMethodID(IID_Hidd_PCIDevice
, moHidd_PCIDevice_WriteConfigWord
);
57 mid_WL
= OOP_GetMethodID(IID_Hidd_PCIDevice
, moHidd_PCIDevice_WriteConfigLong
);
67 void ahi_pci_exit(void)
70 OOP_DisposeObject(irqobj
);
72 OOP_DisposeObject(pciobj
);
74 OOP_ReleaseAttrBase(IID_Hidd_PCIDevice
);
76 CloseLibrary(OOPBase
);
82 OOP_Object
*found_dev
;
85 static AROS_UFH3(void, Enumerator
,
86 AROS_UFHA(struct Hook
*, hook
, A0
),
87 AROS_UFHA(OOP_Object
*, device
, A2
),
88 AROS_UFHA(APTR
, msg
, A1
))
92 struct enum_data
*ed
= (struct enum_data
*)hook
->h_Data
;
94 if ((ed
->found_dev
== 0) && (device
!= ed
->prev_dev
))
96 ed
->found_dev
= device
;
103 APTR
ahi_pci_find_device(ULONG vendorid
, ULONG deviceid
, APTR dev
)
107 struct Hook FindHook
=
109 h_Entry
: (HOOKFUNC
)Enumerator
,
113 struct TagItem Reqs
[] =
116 { tHidd_PCI_Class
, 0x04 }, /* Multimedia */
117 { tHidd_PCI_SubClass
, 0x01 }, /* Audio */
119 { tHidd_PCI_VendorID
, vendorid
},
120 { tHidd_PCI_ProductID
, deviceid
},
124 struct pHidd_PCI_EnumDevices enummsg
=
126 mID
: OOP_GetMethodID(CLID_Hidd_PCI
, moHidd_PCI_EnumDevices
),
128 requirements
: (struct TagItem
*)&Reqs
,
131 ed
.prev_dev
= (OOP_Object
*)dev
;
134 OOP_DoMethod(pciobj
, (OOP_Msg
)msg
);
136 //KPrintF("ahi_pci_find_device: found_dev = %lx\n", ed.found_dev);
138 return (APTR
)ed
.found_dev
;
141 ULONG
pci_inl(ULONG addr
, struct CMI8738_DATA
*card
)
143 return (*((ULONG
*)(card
->iobase
+ addr
)));
146 UWORD
pci_inw(ULONG addr
, struct CMI8738_DATA
*card
)
148 return (*((UWORD
*)(card
->iobase
+ addr
)));
151 UBYTE
pci_inb(ULONG addr
, struct CMI8738_DATA
*card
)
153 return (*((UBYTE
*)(card
->iobase
+ addr
)));
156 void pci_outl(ULONG value
, ULONG addr
, struct CMI8738_DATA
*card
)
158 *((ULONG
*)(card
->iobase
+ addr
)) = (value
);
161 void pci_outw(UWORD value
, ULONG addr
, struct CMI8738_DATA
*card
)
163 *((UWORD
*)(card
->iobase
+ addr
)) = (value
);
166 void pci_outb(UBYTE value
, ULONG addr
, struct CMI8738_DATA
*card
)
168 *((UBYTE
*)(card
->iobase
+ addr
)) = (value
);
171 void outb_setbits(UBYTE value
, ULONG addr
, struct CMI8738_DATA
*card
)
173 UBYTE data
= pci_inb(addr
, card
);
176 pci_outb(data
, addr
, card
);
180 void outb_clearbits(UBYTE value
, ULONG addr
, struct CMI8738_DATA
*card
)
182 UBYTE data
= pci_inb(addr
, card
);
185 pci_outb(data
, addr
, card
);
189 void outw_setbits(UWORD value
, ULONG addr
, struct CMI8738_DATA
*card
)
191 UWORD data
= pci_inw(addr
, card
);
194 pci_outw(data
, addr
, card
);
198 void outw_clearbits(UWORD value
, ULONG addr
, struct CMI8738_DATA
*card
)
200 UWORD data
= pci_inw(addr
, card
);
203 pci_outw(data
, addr
, card
);
207 void outl_setbits(ULONG value
, ULONG addr
, struct CMI8738_DATA
*card
)
209 ULONG data
= pci_inl(addr
, card
);
212 pci_outl(data
, addr
, card
);
216 void outl_clearbits(ULONG value
, ULONG addr
, struct CMI8738_DATA
*card
)
218 ULONG data
= pci_inl(addr
, card
);
221 pci_outl(data
, addr
, card
);
225 ULONG
inl_config(UBYTE reg
, APTR dev
)
227 struct pHidd_PCIDevice_ReadConfigLong msg
;
232 return OOP_DoMethod((OOP_Object
*)dev
, (OOP_Msg
)&msg
);
235 UWORD
inw_config(UBYTE reg
, APTR dev
)
237 struct pHidd_PCIDevice_ReadConfigWord msg
;
242 return OOP_DoMethod((OOP_Object
*)dev
, (OOP_Msg
)&msg
);
245 UBYTE
inb_config(UBYTE reg
, APTR dev
)
247 struct pHidd_PCIDevice_ReadConfigByte msg
;
252 return OOP_DoMethod(dev
, (OOP_Msg
)&msg
);
255 void outl_config(UBYTE reg
, ULONG val
, APTR dev
)
257 struct pHidd_PCIDevice_WriteConfigLong msg
;
263 OOP_DoMethod((OOP_Object
*)dev
, (OOP_Msg
)&msg
);
266 void outw_config(UBYTE reg
, UWORD val
, APTR dev
)
268 struct pHidd_PCIDevice_WriteConfigWord msg
;
274 OOP_DoMethod((OOP_Object
*)dev
, (OOP_Msg
)&msg
);
277 void outb_config(UBYTE reg
, UBYTE val
, APTR dev
)
279 struct pHidd_PCIDevice_WriteConfigByte msg
;
285 OOP_DoMethod((OOP_Object
*)dev
, (OOP_Msg
)&msg
);
288 ULONG
ahi_pci_get_irq(APTR dev
)
292 OOP_GetAttr((OOP_Object
*)dev
, aHidd_PCIDevice_INTLine
, &val
);
297 static void interrupt_code(HIDDT_IRQ_Handler
*irq
, HIDDT_IRQ_HwInfo
*hw
)
299 struct Interrupt
*i
= (struct Interrupt
*)irq
->h_Data
;
301 AROS_UFC3(void, i
->is_Code
,
302 AROS_UFCA(APTR
, i
->is_Data
, A1
),
303 AROS_UFCA(APTR
, i
->is_Code
, A5
),
304 AROS_UFCA(struct ExecBase
*, SysBase
, A6
));
308 BOOL
ahi_pci_add_intserver(struct Interrupt
*i
, APTR dev
)
310 struct pHidd_IRQ_AddHandler __msg__
, *msg
= &__msg__
;
313 OOP_GetAttr((OOP_Object
*)dev
, aHidd_PCIDevice_INTLine
, &val
);
315 inthandler
.h_Node
.ln_Pri
= 1;
316 inthandler
.h_Node
.ln_Name
= "HD Audio IRQ";
317 inthandler
.h_Code
= interrupt_code
;
318 inthandler
.h_Data
= i
;
320 msg
->mID
= OOP_GetMethodID(CLID_Hidd_IRQ
, moHidd_IRQ_AddHandler
);
321 msg
->handlerinfo
= &inthandler
;
324 OOP_DoMethod(irqobj
, (OOP_Msg
)msg
);
326 inthandler_added
= TRUE
;
331 void ahi_pci_rem_intserver(struct Interrupt
*i
, APTR dev
)
333 if (inthandler_added
)
335 struct pHidd_IRQ_RemHandler __msg__
=
337 mID
: OOP_GetMethodID(CLID_Hidd_IRQ
, moHidd_IRQ_RemHandler
),
338 handlerinfo
: &inthandler
,
341 OOP_DoMethod(irqobj
, (OOP_Msg
)msg
);
343 inthandler_added
= FALSE
;
346 KPrintF("ahi_pci_rem_intserver\n");
350 APTR
ahi_pci_get_base_address(WORD which
, APTR dev
)
358 attr
= aHidd_PCIDevice_Base0
;
362 attr
= aHidd_PCIDevice_Base1
;
366 attr
= aHidd_PCIDevice_Base2
;
370 attr
= aHidd_PCIDevice_Base3
;
374 attr
= aHidd_PCIDevice_Base4
;
378 attr
= aHidd_PCIDevice_Base5
;
385 OOP_GetAttr((OOP_Object
*)dev
, attr
, &val
);
387 //KPrintF("ahi_pci_get_base_address. Result %lx\n", val);
392 ULONG
ahi_pci_get_base_size(WORD which
, APTR dev
)
400 attr
= aHidd_PCIDevice_Size0
;
404 attr
= aHidd_PCIDevice_Size1
;
408 attr
= aHidd_PCIDevice_Size2
;
412 attr
= aHidd_PCIDevice_Size3
;
416 attr
= aHidd_PCIDevice_Size4
;
420 attr
= aHidd_PCIDevice_Size5
;
427 OOP_GetAttr((OOP_Object
*)dev
, attr
, &val
);
429 //KPrintF("ahi_pci_get_base_size. Result %lx\n", val);
437 ULONG
ahi_pci_get_type(WORD which
, APTR dev
)
445 attr
= aHidd_PCIDevice_Type0
;
449 attr
= aHidd_PCIDevice_Type1
;
453 attr
= aHidd_PCIDevice_Type2
;
457 attr
= aHidd_PCIDevice_Type3
;
461 attr
= aHidd_PCIDevice_Type4
;
465 attr
= aHidd_PCIDevice_Type5
;
472 OOP_GetAttr((OOP_Object
*)dev
, attr
, &val
);
474 //KPrintF("ahi_pci_get_type. Result %lx\n", val);