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

From NSIS Wiki
Jump to navigationJump to search
m (Added category links.)
 
(5 intermediate revisions by 2 users not shown)
Line 1: Line 1:
{|align=right
{{PageAuthor|Afrow UK}}
|<small>Author: [[{{ns:2}}:Afrow UK|Afrow UK]] ([[{{ns:3}}:Afrow UK|talk]], [[{{ns:-1}}:Contributions/Afrow UK|contrib]])</small>
 
|}
<br style="clear:both;">
== Description ==
== Description ==
These functions allow you to scan strings for characters.
These functions allow you to scan strings for characters.
Line 14: Line 12:
=== Example of Usage ===
=== Example of Usage ===
<highlight-nsis>
<highlight-nsis>
Push "abcdxyz"
Push "`¬¦!$\"£$$%^&*()_-+={[]}:;@'~#<>,.?/\| $\t"
Push "This string contains at le'''a'''st one of them!"
Push "This string contains at least one of them!"
  Call StrCSpn
  Call StrCSpn
Pop $R0 ; $R0 == a
Pop $R0 ; $R0 == !
StrCmp $R0 "" +2
StrCmp $R0 "" +2
  MessageBox MB_OK|MB_ICONEXCLAMATION 'String contains invalid character: $R0'
  MessageBox MB_OK|MB_ICONEXCLAMATION 'String contains invalid character: $R0'
Line 70: Line 68:
=== Example of Usage ===
=== Example of Usage ===
<highlight-nsis>
<highlight-nsis>
Push "abcdxyz"
Push "abcdefghijklmnopqrstuvwxyz "
Push "This string contains at least one of them'''!'''"
Push "This string contains at least one of them!"
  Call StrCSpn
  Call StrCSpnReverse
Pop $R0 ; $R0 == !
Pop $R0 ; $R0 == !
StrCmp $R0 "" +2
StrCmp $R0 "" +2
Line 123: Line 121:
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]]
[[Category:String Functions]]

Latest revision as of 07:44, 13 June 2006

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 "`¬¦!$\"£$$%^&*()_-+={[]}:;@'~#<>,.?/\| $\t"
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 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 "abcdefghijklmnopqrstuvwxyz "
Push "This string contains at least one of them!"
 Call StrCSpnReverse
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.

Retrieved from "https://nsis.sourceforge.io/mediawiki/index.php?title=StrCSpn,_StrCSpnReverse:_Scan_strings_for_characters&oldid=10693"