Stats

  • Locked Locked
  • Replies 3
  • Subscribers 142
  • Views 13816
  • Members are here 0
This discussion has been locked.
You can no longer post new replies to this discussion. If you have a question you can start a new discussion

Limitation of evalstring and ML text field

RK56

Hi,

I have written a GUI where I let the users to write/paste skill script in a ML text field. I see people pasting very large text files inside the field. This concerns me. I want to know when does this method break? Which one overflows first? The ML field or evalstring/errset?

-Ramakrishnan

Parents

  • Here's what I threw together (I wrote it in C syntax rather than my preferred Lisp syntax just in case I had to share it!)

    strs=nil
    for(j 1 100
      nums=nil
      for(i 1 10000
        nums=cons(sprintf(nil "%d" i+1000) nums)
      )
      str=strcat("println(" buildString(nums "+") ")")
      strs=cons(str strs)
    )
    bigStr=buildString(strs "\n")

    procedure(myEvaluateIt(form)
      let((pat)
        pat=pcreCompile("\n")
        ; this replaces all the carriage returns with space so that
        ; it gets slurped in one go
        evalstring(pcreReplace(pat form->big->value " " 0))
        ; alternatively could use loadstring.
        ;loadstring(form->big->value)
      )
    )

    big=hiCreateMLTextField(?name 'big ?prompt "Big" ?value bigStr)
    hiCreateAppForm(?name 'myForm ?fields list(big) ?callback 'myEvaluateIt)
    hiDisplayForm(myForm)

Reply

  • Here's what I threw together (I wrote it in C syntax rather than my preferred Lisp syntax just in case I had to share it!)

    strs=nil
    for(j 1 100
      nums=nil
      for(i 1 10000
        nums=cons(sprintf(nil "%d" i+1000) nums)
      )
      str=strcat("println(" buildString(nums "+") ")")
      strs=cons(str strs)
    )
    bigStr=buildString(strs "\n")

    procedure(myEvaluateIt(form)
      let((pat)
        pat=pcreCompile("\n")
        ; this replaces all the carriage returns with space so that
        ; it gets slurped in one go
        evalstring(pcreReplace(pat form->big->value " " 0))
        ; alternatively could use loadstring.
        ;loadstring(form->big->value)
      )
    )

    big=hiCreateMLTextField(?name 'big ?prompt "Big" ?value bigStr)
    hiCreateAppForm(?name 'myForm ?fields list(big) ?callback 'myEvaluateIt)
    hiDisplayForm(myForm)

Children
No Data

Community Guidelines

The Cadence Design Communities support Cadence users and technologists interacting to exchange ideas, news, technical information, and best practices to solve problems and get the most from Cadence technology. The community is open to everyone, and to provide the most value, we require participants to follow our Community Guidelines that facilitate a quality exchange of ideas and information. By accessing, contributing, using or downloading any materials from the site, you agree to be bound by the full Community Guidelines.