Solved

"Blue Screen Of Death" Hardware or Software?

Posted on 2008-10-18
3
494 Views
Last Modified: 2010-04-21
Hope I don't get to verbose, but I want to be clear:
I'm writing an app in VB.Net, and declaring/using separate threads that monitor a serial port for both input or output. It works fine - until I get the "Blue Screen Of Death" with the message  "IRQ_NOT_LESS_OR_EQUAL". Of course, I suspected a thread problem - so I took the code for the thread (a simple loop) and wrote it into a standalone test app. After a while, the test app crashes also (with no separate threads).

The thread code is a simple 'Do" loop. It calls MySerialPort.Receive, which is synchronous, so it wait's till it gets a character. It appends the character to a string in a buffer array. When a <cr> is read in, the completed string is used as a parameter in an Event call (I have rem'd out the RaiseEvent in the test code, just to make sure that it wasn't part of the problem.) The code can run non-stop for 10-60 minutes, then the BSOD occurs.

The HeartBeatTimerFlag get's set with every line that is read in. There is a 500 mS timer that will trigger a start signal to the equipment this is controlling if no lines appear for .5 seconds.

Also, the serial port isn't a regular com port - it's a Keyspan USB serial port at COM3, no handshaking, 115200 baud.

I have attached the entire loop for you to see - can someone tell me why the BSOD is occuring? THANKS!!


Private Sub GetData()
        Do
            Application.DoEvents()
            If MySerialPort.BytesToRead <> 0 Then
                Dim returnData As String = Chr(MySerialPort.ReadByte)  
                B = InStr(returnData, vbCr)
                If B <> 0 Then
                    'got a cr, line is done
                    ReceiveApplicationQueue(ReceiveApplicationQueuePointer) = ReceiveApplicationQueue(ReceiveApplicationQueuePointer) & Strings.Left(returnData, B)
                    HeartBeatTimerFlag = True
                    Debug.WriteLine(ReceiveApplicationQueue(ReceiveApplicationQueuePointer))
                    'RaiseEvent GotApplicationString(ReceiveApplicationQueue(ReceiveApplicationQueuePointer))
                    ReceiveApplicationQueue(ReceiveApplicationQueuePointer) = ""
                    ReceiveApplicationQueuePointer = (ReceiveApplicationQueuePointer + 1) Mod 500
                    ReceiveApplicationQueue(ReceiveApplicationQueuePointer) = Strings.Right(returnData, Len(returnData) - B)
                    returnData = ""
                Else
                    ReceiveApplicationQueue(ReceiveApplicationQueuePointer) = ReceiveApplicationQueue(ReceiveApplicationQueuePointer) & returnData
                End If
            End If
        Loop
 
    End Sub

Open in new window

0
Comment
Question by:LongDave
  • 2
3 Comments
 

Author Comment

by:LongDave
ID: 22750797
I forgot to add that the "Application.DoEvents" was not in this loop in the threaded version. I just added it into the standalone so that I wouldn't lock up anything. Incidentally, this is using VB.NET in VS 2005. Thanks!
0
 
LVL 18

Accepted Solution

by:
Priest04 earned 500 total points
ID: 22752205
Well, the error can be both hardware and software, so its hard to say it. Could be the driver is not good. What you could do to eliminate hardware is to try it on different PC. If no BSOD, then its a software problem.

Maybe you should try setting a lower speed, like 9600, for testing purposes.
0
 

Author Closing Comment

by:LongDave
ID: 31507503
It wasn't the software - apparently the old driver for the USB-Serial converter did not work too well with XP-SP3. When the software is plugged into a computer with a 'real' com port, it worked fine.
0

Featured Post

Independent Software Vendors: We Want Your Opinion

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Title # Comments Views Activity
Code enhancement 4 33
VB.NET Inline If statement 4 41
Consume a webservice via VB in Visual Studio 2015 3 22
vb.net datagrid scroll automatically to the first found row 11 28
This article describes some techniques which will make your VBA or Visual Basic Classic code easier to understand and maintain, whether by you, your replacement, or another Experts-Exchange expert.
Since upgrading to Office 2013 or higher installing the Smart Indenter addin will fail. This article will explain how to install it so it will work regardless of the Office version installed.
The viewer will learn how to pass data into a function in C++. This is one step further in using functions. Instead of only printing text onto the console, the function will be able to perform calculations with argumentents given by the user.
The viewer will learn how to clear a vector as well as how to detect empty vectors in C++.

733 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question