0000158: Crash with some $iif

View Issue Details [ Jump to Notes ] [ Wiki ]

[ Issue History ] [ Print ]

Project

Category

View Status

Date Submitted

Last Update

0000158

mSLDev

Syntax Checking

public

2013-05-31 01:50

2013-06-04 17:49

Reporter

Wims

Assigned To

administrator

Priority

immediate

Severity

crash

Reproducibility

always

Status

closed

Resolution

fixed

Platform

OS Version

Product Version

Target Version

Fixed in Version

0.4.1.0

Summary

0000158: Crash with some $iif

Description

Code:

;MAIN LOOP
alias pacman_loop {
  if (!$window(@pacman)) return
  if ($1) {
    if ($calc($ticks - $hget(pacclient,ticks)) >= 1000) { hadd pacclient ticks $ticks | hadd pacclient fps $hget(pacclient,cticks) | hdel pacclient cticks }
    if (!$hget(pacclient,msg)) {
      hinc pacclient time
      if ($hget(pacclient,bonus)) hinc pacclient btime
    }
  }
  var %h $hget(pacclient,height),%a 1,%? $1,%c
  drawcopy -n @Pac_buf 0 $gettok($sizesprite,2,32) $hget(pacclient_db,size) @Pacman 0 %h
  while ($hget(pacclienti,%a).item) {
    var %c = $v1
    if (!$window(@pacman)) return
    tokenize 32 $sizesprite $hget(pacclienti,%c)
    var %dr $iif($4 < 0,$calc(14 $4))
    if (pacman* iswm %c) {
      var %x $iif($5 isin 3739,2,$iif($istok(38 40,$5,32),0,2))
      drawcopy -nt @Pacani_buf 16711935 $calc(%x * $1 + $iif($8 || $hget(pacclient,msg),0,$hget(pacclient,anim))) 0 $1 $iif(%dr,%dr,$2) @Pacman $&
        $calc($3 $iif($5 == 39,+ $1 -1)) $iif(%dr != $null && $5 == 40,$calc(%h + %dr),$calc(%h + $4 $iif($5 == 40,+ $2 -1))) $&
        $iif($5 == 39,-) $+ $1 $iif($5 == 40,-) $+ $iif(%dr == $null,$2,%dr)
if ($hget(pacclient,nick) == $9) drawdot -rn @pacman 255 2 $calc($3 $iif($5 == 39,+ $1 -1)) $iif(%dr != $null && $5 == 40,$calc(%h + %dr + 7),$calc(%h + $4 + $iif($5 =$iif())))
    }
    else {
      var %x $iif($7,$iif($calc($hget(pacclient,cli)) == 0 || $v1 == 2,0,2),$iif($5 isin 3739,4,$iif($5 == 38,0,2))) ,%y $iif($7,5,$remove(%c,ghost))
      drawcopy -nt @pacani_buf 16711935 $&
        $calc(%x * $1 + $iif($8 || $hget(pacclient,msg),0,$hget(pacclient,anim))) $calc(%y * $2 $iif(%dr != $null,+ $2 - %dr)) $1 $iif(%dr != $null,%dr,$2) @Pacman $&
        $calc($3 $iif($5 == 39,+ $1 -1)) $calc(%h $iif(%dr == $null,+ $4) $iif($5 == 40 && %dr == $null,-1)) $iif($5 == 39,-) $+ $1 $iif(%dr,%dr,$2)
    }
    inc %a
  }
  if ($timer(pacclientgo)) {
    var %xd $int($calc($window(@pacman).bw / 2 - $pic($scriptdirgo.png).width / 2)),%yd $int($calc(($window(@pacman).bh - %h) / 2 - $pic($scriptdirgo.png).height / 2)) + %h
    drawpic -ct @pacman 16777215 %xd %yd $qt($scriptdirgo.png)
  }
  elseif ($hget(pacclient,msg)) $v1
  if (%?) {
    drawdot @Pacman
    if (!$calc($hget(pacclient,time) % 10)) hadd pacclient anim $iif($hget(pacclient,anim),0,$1)
    if (!$calc($hget(pacclient,time) % 17)) && ($hget(pacclient,cli)) hadd pacclient cli $iif($hget(pacclient,cli) == 2,1,2)
    hinc pacclient cticks
    .timerpacclient -ho 1 0 pacman_loop 1
    ;if ($hget(pacclient,fps)) titlebar @pacman fps: $v1
  }
}

Steps To Reproduce

In this mess, notice the line:

if ($hget(pacclient,nick) == $9) drawdot -rn @pacman 255 2 $calc($3 $iif($5 == 39,+ $1 -1)) $iif(%dr != $null && $5 == 40,$calc(%h + %dr + 7),$calc(%h + $4 + $iif($5 =$iif())))

This is what the app restore for me, but while editing the code, it was originally:

if ($hget(pacclient,nick) == $9) drawdot -rn @pacman 255 2 $calc($3 $iif($5 == 39,+ $1 -1)) $iif(%dr != $null && $5 == 40,$calc(%h + %dr + 7),$calc(%h + $4 + |))

| is the cursor.

From there, I manage to get this (I disabled some options, it doesn't add the ')' automatically, you should be able to get there with any options enabled without crashing):

if ($hget(pacclient,nick) == $9) drawdot -rn @pacman 255 2 $calc($3 $iif($5 == 39,+ $1 -1)) $iif(%dr != $null && $5 == 40,$calc(%h + %dr + 7),$calc(%h + $4 + $iif(|$iif())))

Notice the cursor position, now type "$5 ==" or try to type i might say, because there, msldev should freeze and crash a few seconds later.

Additional Information

I have two options disabled: the () deletion and the ')' completion.

Issue History
Date Modified	Username	Field	Change
2013-05-31 01:50	Wims	New Issue
2013-05-31 14:37	administrator	Steps to Reproduce Updated	View Revisions
2013-06-04 03:30	Travis	Note Added: 0000107
2013-06-04 03:32	Travis	Note Edited: 0000107	View Revisions
2013-06-04 03:37	Travis	Note Edited: 0000107	View Revisions
2013-06-04 03:38	Travis	Note Edited: 0000107	View Revisions
2013-06-04 17:49	administrator	Status	new => closed
2013-06-04 17:49	administrator	Assigned To	=> administrator
2013-06-04 17:49	administrator	Resolution	open => fixed
2013-06-04 17:49	administrator	Fixed in Version	=> 0.4.1.0

Notes
(0000107) Travis (reporter) 2013-06-04 03:30 edited on: 2013-06-04 03:38	alias foo noop $calc($iif(=$iif())) alias bar noop $calc($iif(=$foo())) Both produce a crash.

Relationships