StrCSpn, StrCSpnReverse: Scan strings for characters: Difference between revisions

From NSIS Wiki
Jump to navigationJump to search
m (Updated author links.)
m (Added category links.)
Line 122: Line 122:
== Credits ==
== Credits ==
Written for [[user:Yurik|Yurik]] in [http://forums.winamp.com/showthread.php?postid=1489629 this forum topic].
Written for [[user:Yurik|Yurik]] in [http://forums.winamp.com/showthread.php?postid=1489629 this forum topic].
[[{{ns:14}}:String Functions]]

Revision as of 22:17, 30 April 2005

Author: Afrow UK (talk, contrib)


Description

These functions allow you to scan strings for characters.

For both functions, the first invalid character found is returned, else null ("") is returned if no invalid characters are found.

StrCSpn

Description

This function (StrCSpn) checks a string for invalid characters on a list.

Example of Usage

Push "abcdxyz"
Push "This string contains at le'''a'''st one of them!"
 Call StrCSpn
Pop $R0 ; $R0 == a
StrCmp $R0 "" +2
 MessageBox MB_OK|MB_ICONEXCLAMATION 'String contains invalid character: $R0'

The Function

Function StrCSpn
 Exch $R0 ; string to check
 Exch
 Exch $R1 ; string of chars
 Push $R2 ; current char
 Push $R3 ; current char
 Push $R4 ; char loop
 Push $R5 ; char loop
 
  StrCpy $R4 -1
 
  NextChar:
  StrCpy $R2 $R1 1 $R4
  IntOp $R4 $R4 - 1
   StrCmp $R2 "" StrOK
 
   StrCpy $R5 -1
 
   NextCharCheck:
   StrCpy $R3 $R0 1 $R5
   IntOp $R5 $R5 - 1
    StrCmp $R3 "" NextChar
    StrCmp $R3 $R2 0 NextCharCheck
     StrCpy $R0 $R2
     Goto Done
 
 StrOK:
 StrCpy $R0 ""
 
 Done:
 
 Pop $R5
 Pop $R4
 Pop $R3
 Pop $R2
 Pop $R1
 Exch $R0
FunctionEnd

StrCSpnReverse

Description

This function (StrCSpnReverse) checks a string for invalid characters not on a list.

Example of Usage

Push "abcdxyz"
Push "This string contains at least one of them'''!'''"
 Call StrCSpn
Pop $R0 ; $R0 == !
StrCmp $R0 "" +2
 MessageBox MB_OK|MB_ICONEXCLAMATION 'String contains invalid character: $R0'

The Function

Function StrCSpnReverse
 Exch $R0 ; string to check
 Exch
 Exch $R1 ; string of chars
 Push $R2 ; current char
 Push $R3 ; current char
 Push $R4 ; char loop
 Push $R5 ; char loop
 
  StrCpy $R4 -1
 
  NextCharCheck:
  StrCpy $R2 $R0 1 $R4
  IntOp $R4 $R4 - 1
   StrCmp $R2 "" StrOK
 
   StrCpy $R5 -1
 
   NextChar:
   StrCpy $R3 $R1 1 $R5
   IntOp $R5 $R5 - 1
    StrCmp $R3 "" +2
    StrCmp $R3 $R2 NextCharCheck NextChar
     StrCpy $R0 $R2
     Goto Done
 
 StrOK:
 StrCpy $R0 ""
 
 Done:
 
 Pop $R5
 Pop $R4
 Pop $R3
 Pop $R2
 Pop $R1
 Exch $R0
FunctionEnd

Credits

Written for Yurik in this forum topic.