Re: lib5250 0.17.3 infinite loop -- LINUX5250

(Replying to myself)

I'm having problems with the emulator getting stuck in an infinite loop. Actually, the symptom is that the emulator seems to be locking up -- but based on how large the tracefile gets (29 megabytes in a few seconds) I'm assuming that it's stuck in an a loop.

A little more info.... it appears that the loop that it's getting stuck in is the one in the tn5250_display_set_cursor_prev_progression_field() function.

In that function is the following loop. (I added some TN5250_LOG statements to try to determine what's going on)


  while ((field = tn5250_display_prev_field (This)) != NULL)
    {
      tn5250_display_set_cursor_field (This, field);

      TN5250_LOG(("field->entry_id=%d, currentfield=%d\n",
                  field->entry_id, currentfield));

      if (field->entry_id == currentfield)
        {
          if (field->id == orig_id)
            {
              field = tn5250_display_prev_field (This);
              tn5250_display_set_cursor_field (This, field);
              break;
            }
          if (!differentfieldfound)
            {
              break;
            }
        }
      else
        {
          differentfieldfound = 1;
        }

      TN5250_LOG(("field->nextfieldprogressionid=%d, currentfield=%d\n",
                  field->nextfieldprogressionid, currentfield));

      if (field->nextfieldprogressionid == currentfield)
        {
          break;
        }
    }


The logged entries look like this:

This->cy = 2, This->cx = 0
field->entry_id=2, currentfield=3
field->nextfieldprogressionid=0, currentfield=3
tn5250_display_prev_field entered!
This->cy = 1, This->cx = 8
field->entry_id=1, currentfield=3
field->nextfieldprogressionid=0, currentfield=3
tn5250_display_prev_field entered!
This->cy = 22, This->cx = 8
field->entry_id=43, currentfield=3
field->nextfieldprogressionid=0, currentfield=3
tn5250_display_prev_field entered!
This->cy = 22, This->cx = 0
field->entry_id=42, currentfield=3
field->nextfieldprogressionid=0, currentfield=3
tn5250_display_prev_field entered!
This->cy = 21, This->cx = 8
field->entry_id=41, currentfield=3
field->nextfieldprogressionid=0, currentfield=3
tn5250_display_prev_field entered!
This->cy = 21, This->cx = 0
field->entry_id=40, currentfield=3
field->nextfieldprogressionid=0, currentfield=3
tn5250_display_prev_field entered!
This->cy = 20, This->cx = 8
field->entry_id=39, currentfield=3
field->nextfieldprogressionid=0, currentfield=3
tn5250_display_prev_field entered!
This->cy = 20, This->cx = 0
field->entry_id=38, currentfield=3
field->nextfieldprogressionid=0, currentfield=3
tn5250_display_prev_field entered!
This->cy = 19, This->cx = 8
field->entry_id=37, currentfield=3
field->nextfieldprogressionid=0, currentfield=3
tn5250_display_prev_field entered!

There are many more, in fact, it keeps writing entries like this until I kill the process. They all have "nextfieldprogressionid=0". If someone who knows more about field progression would like me to send them the tracefile, please contact me off-list.

Thanks for any help