I’m trying to port a Windows code that uses usbprint to linux and mac, and I need the linux/mac replacements for IOCTL_USBPRINT_VENDOR_SET_COMMAND and IOCTL_USBPRINT_VENDOR_GET_COMMAND windows ioctl’s. Any idea?

Thanks in advance

Public Class Form1

Public Sub Command1_Click()

End Sub

Function SendToUsbPrinter(ByVal PrintOut As String) As Boolean

Dim PrnGuid As GUID
‘Dim InterfaceClassGuid As GUID
Dim Success As Long, Ret As Long
Dim Openned As Boolean
Dim Buffer(256) As Byte
Dim DeviceInterfaceData As Device_Interface_Data
Dim FunctionClassDeviceData As Device_Interface_Detail
Dim PnPHandle As Long, BytesReturned As Long
Dim I As Long
Dim DeviceName As String, DevIndex As Long, DeviceHandle As Long
Dim ReqdSize As Long
Dim BytesWritten As Long
Dim d As Integer

PrnGuid.Data4 = New Byte() {0, 1, 2, 3, 4, 5, 6, 7}
FunctionClassDeviceData.DataPath = New Byte() {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}
‘Data4() = Data4({0, 1, 2, 3, 4, 5, 6, 7})
DeviceInterfaceData.cbSize = 28
‘ \\?\usb#vid_0a5f&pid_000a#41a081100503#{28d78fad-5a12-11d1-ae5b-0000f803a8c2}

PrnGuid.Data1 = &H28D78FAD
PrnGuid.Data2 = &H5A12
PrnGuid.Data3 = &H11D1
PrnGuid.Data4(0) = &HAE
PrnGuid.Data4(1) = &H5B
PrnGuid.Data4(2) = &H0
PrnGuid.Data4(3) = &H0
PrnGuid.Data4(4) = &HF8
PrnGuid.Data4(5) = &H3
PrnGuid.Data4(6) = &HA8
PrnGuid.Data4(7) = &HC2

‘DeviceInterfaceData.InterfaceClassGuid.Data4 = {0, 0, 0, 0, 0, 0, 0, 0}

PnPHandle = SetupDiGetClassDevs(PrnGuid.Data1, 0, 0, _
DIGCF_PRESENT Or DIGCF_DEVICEINTERFACE)

SendToUsbPrinter = False
If (PnPHandle = -1) Then
MsgBox(”Could not attach to PnP node”)
Else
DeviceInterfaceData.cbSize = Len(DeviceInterfaceData)
DevIndex = 0
‘ Should be a Do While -> looking for the correct device-name…
If SetupDiEnumDeviceInterfaces(PnPHandle, 0, PrnGuid.Data1, _
DevIndex, DeviceInterfaceData.cbSize) = 0 Then

FunctionClassDeviceData.cbSize = 5
Success = SetupDiGetDeviceInterfaceDetail(PnPHandle, _
DeviceInterfaceData, FunctionClassDeviceData, _
UBound(FunctionClassDeviceData.DataPath), _
BytesReturned, 0)
If Success = 0 Then
MsgBox(”Could not get the name of this device”)

Else
DeviceName = “”
I = 0
Do While FunctionClassDeviceData.DataPath(I) = 0
DeviceName = DeviceName & _
Chr(FunctionClassDeviceData.DataPath(I))
I = I + 1

Loop
Debug.Print(DeviceName)
DeviceHandle = CreateFile(DeviceName, _
GENERIC_WRITE, FILE_SHARE_READ, _
0, OPEN_ALWAYS, _
FILE_ATTRIBUTE_NORMAL + FILE_FLAG_SEQUENTIAL_SCAN, _
0)
If (DeviceHandle = -1) Then
Debug.Print(”Open failed on ” & DeviceName)
Else
Ret = WriteFile(DeviceHandle, PrintOut, _
Len(PrintOut), BytesWritten, 0)
Debug.Print(”Sent ” & BytesWritten & ” bytes.”)
SendToUsbPrinter = True
CloseHandle(DeviceHandle)
End If
End If
Else
MsgBox(”Dispositvo no conectado”)
End If
SetupDiDestroyDeviceInfoList(PnPHandle)
End If
End Function
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
TextBox1.Text = SendToUsbPrinter(”Hello world.”)
End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

End Sub
End Class

Module Module1
Public Const DIGCF_PRESENT As Integer = &H2
Public Const DIGCF_DEVICEINTERFACE As Integer = &H10
Public Const DIGCF_ALLCLASSES As Integer = &H4
Public Const GENERIC_READ = &H80000000
Public Const GENERIC_WRITE = &H40000000
Public Const FILE_FLAG_SEQUENTIAL_SCAN = &H8000000
Public Const FILE_ATTRIBUTE_HIDDEN = &H2
Public Const FILE_ATTRIBUTE_NORMAL = &H80
Public Const FILE_SHARE_READ = &H1
Public Const FILE_SHARE_WRITE = &H2
Public Const OPEN_ALWAYS = 4
Public Const OPEN_EXISTING = 3

Public Structure GUID

Dim Data1 As Long
Dim Data2 As Integer
Dim Data3 As Integer
Dim Data4() As Byte

End Structure

Public Structure Device_Interface_Data
Dim cbSize As Long
Dim InterfaceClassGuid As GUID
Dim Flags As Long
Dim ReservedPtr As Long
End Structure

Public Structure Device_Interface_Detail
Dim cbSize As Long
Dim DataPath() As Byte
End Structure

Public Property TextBox As Boolean
Public Declare Function SetupDiGetDeviceInterfaceDetail _
Lib “setupapi.dll” Alias “SetupDiGetDeviceInterfaceDetailA” _
(ByVal DeviceInfoSet As Long, ByVal DeviceInterfaceData As Object, _
ByVal DeviceInterfaceDetailData As Object, _
ByVal DeviceInterfaceDetailDataSize As Long, _
ByVal RequiredSize As Long, ByVal DeviceInfoData As Long) As Long

Public Declare Function CreateFile Lib “” Alias “” (
ByVal lpFileName As String, ByVal dwDesiredAccess As Long, _
ByVal dwShareMode As Long, ByVal lpSecurityAttributes As String, _
ByVal dwCreationDisposition As Long, _
ByVal dwFlagsAndAttributes As Long, _
ByVal hTemplateFile As Long) As Long

Public Declare Sub CloseHandle Lib “” (ByVal HandleToClose As Long)

Public Declare Function ReadFile Lib “” (ByVal Handle As Long, ByVal BufferPtr As Long, _
ByVal ByteCount As Long, ByVal BytesReturnedPtr As Long, _
ByVal OverlappedPtr As Long) As Long

Public Declare Function WriteFile Lib “” (ByVal Handle As Long, ByVal Buffer As String, _
ByVal ByteCount As Long, ByVal BytesReturnedPtr As Long, _
ByVal OverlappedPtr As Long) As Long

Public Declare Function SetupDiGetClassDevs Lib “setupapi.dll” _
Alias “SetupDiGetClassDevsA” (ByVal GuidPtr As Long, _
ByVal EnumPtr As Long, ByVal hwndParent As Long, _
ByVal Flags As Long) As Long

Public Declare Function SetupDiDestroyDeviceInfoList _
Lib “setupapi.dll” _
(ByVal DeviceInfoSet As Long) As Boolean

Public Declare Function SetupDiEnumDeviceInterfaces _
Lib “setupapi.dll” (ByVal Handle As Long, _
ByVal InfoPtr As Long, ByVal GuidPtr As Long, _
ByVal MemberIndex As Long, _
ByVal InterfaceDataPtr As Long) As Boolean

End Module

thank you a lot.

I wonder how hard it’d be to make a driver that provided the normal parallel port interface to one of these “Parallel Printer Cable”s.

With the “USB to (not really) Parallel Port Cable” I bought for electronics projects, I got WriteFile to return by grounding the BUSY pin (see wikipedia or any number of other sites for pin definitions) and pulsing the ACK pin. Somebody suggested just grounding ACK, but that only worked for a single byte – I’m guessing the circuit in my cable checks both edges of the ACK signal.
Another site suggested connecting ACK to STROBE, and that seems to work OK for a few bytes, but then I guess the in-cable microcontroller misses the ACK, because it’ll stop sending after a few bytes. I haven’t tried it yet, but I’m thinking that connecting STROBE to the input of a monostable multivibrator and the output of that to ACK will fix the problem by extending the pulse duration (unless I’m completely wrong and that isn’t the problem).

What do i have to do?

I am programming a Printer monitoring tool for HP USB Deskjets in .Net.

I could use SetupDiGetClassDevs(..), SetupDiEnumDeviceInterfaces(..) etc. to obtain the Symbolic Name of the devices which are connected to the PC, but i am not yet successful in obtaining the Friendly name from the Symbolic name. The friendly names are the names which are displayed in “Printers and Faxes”.

For you ref the symbolic names are of the form

\??\USB#Vid_03f0&Pid_6545#0000000002310#{a5dcbf10-6530-11d2-901f-00c04fb951ed}

I would be very glad and thankful if someone could help me by pointing the correct method or steps to follow if possible with a snippet.

Best regards

Narayanan

I really sorry if my english is bad…..i am spanish speaker…..