Come scrivere sulle porte I/O in Windows XP? (Delphi7)

Question

Sto provando a scrivere sulle porte 0x60 e 0x64, senza fortuna.

codice Delphi:

procedure PortOut(IOport: WORD; Value: BYTE); assembler; register; 
asm 
    XCHG DX,AX 
    OUT DX,AL 
end; 

Dopo aver chiamato PortOut, ottengo un'istruzione privilegiata EPrivilege un'eccezione, perché IN e OUT può eseguire solo come Ring0.

Mi piacerebbe sapere come ottenere i privilegi Ring0 come un'applicazione o come scrivere sulle porte 0x60 e 0x64 utilizzando una libreria esterna esistente.

Answer 1

Date un'occhiata al IO.DLL from Geek Hideout.

IO.DLL permette di porta senza soluzione di continuità di I/O operazioni per Windows 95/98/NT/2000/XP che utilizzano lo stesso biblioteca.

Ecco un esempio: Parallel Port I/O Using Delphi V 6.0

Answer 2

• Inpout32.dll for Windows 98/2000/NT/XP (binari e codice sorgente)
• Inpoutx64.dll for WIN XP 64 bit (binari e codice sorgente)
• Delphi: Accessing Port Hardware and how to use InpOut32.dll

Answer 3

Naturalmente che potrebbero causare problemi per i dispositivi che sono controllati da un driver. Roba come IO.DLL è principalmente pensata per le schede di interfaccia per le quali non esistono driver di Windows o dove il driver di Windows è inattivo fino a quando non viene attivato.

E poiché la porta 60h è il controller della tastiera e la tastiera è solitamente in uso, potrebbe causare problemi.

Se non si interfaccia l'hardware antico, ma si sta tentando di eseguire il port dos code (TP), consiglio urgentemente di riscrivere il suddetto codice in base alle normali API di Windows.

Answer 4

Il modo corretto per gestire questa situazione è scrivere un driver di Windows, ma non può essere eseguito in Delphi per mancanza di supporto. Richiede DDK e un compilatore C. Le altre soluzioni presentate qui funzionano, ma si tenga presente che di solito si dà accesso a a qualsiasi porta I/O, non solo a quelle richieste dall'applicazione. E questo potrebbe essere un problema di sicurezza - se l'architettura x86 consente al programmatore di sistema di definire l'IOPL (livello di privilegio I/O) e la maggior parte dei sistemi lo ha impostato su 0, c'è un motivo. I driver delle porte I/O di accesso generale sono utili per i test e forse per la prototipazione o come misure di stopgap, ma farò molta attenzione a distribuirli, specialmente se il sistema non è sotto stretto controllo. Se hai bisogno di questo tipo di accesso, devi assolutamente capire come funziona il kernel di Windows e i suoi driver, e perché - e implementare il tuo driver. La maggior parte delle volte Windows non è sicuro di per sé - è in esecuzione su molti software non sicuri con i privilegi sbagliati che lo rendono così.

Answer 5

Cavolo,

E 'stato un lungo periodo di tempo per me. Ho appena lanciato il mio DPro 2006 per guardare il VCL su questo e ha bombardato. (Suppongo che è quello che ottengo per non aver fatto alcun codice Delphi negli ultimi due anni su questa macchina ...e mantenendo aggiornate le patch, oltre a installare/disinstallare un jillion altri pacchetti pagati e FOSS sulla confezione ....)

Ma mi sembra che se hai afferrato i file di intestazione per Windows Driver Framework, o controlla il sito di Project JEDI, potresti trovare qualcosa per assemblare un driver Miniport o altro.

Solo il mio $ 0.02 pena

/s/BezantSoft