generated from ChewKeanHo/AutomataCI
-
Notifications
You must be signed in to change notification settings - Fork 26
Commit
This commit does not belong to any branch on this repository, and may belong to a fork outside of the repository.
init: ported Index_Any_{String,Unicode} primitive function
Since there are a number of level 1 libraries using the string
function, we have to port its primitive ones into HestiaKERNEL
library. Let's do this.
This patch ports Index_Any_{String,Unicode} primitive function
into HestiaKERNEL library into init/ directory.
Co-authored-by: Shuralyov, Jean <[email protected]>
Co-authored-by: Galyna, Cory <[email protected]>
Co-authored-by: (Holloway) Chew, Kean Ho <[email protected]>
Signed-off-by: (Holloway) Chew, Kean Ho <[email protected]>- Loading branch information
4 people
committed
Nov 11, 2024
1 parent
e9acbed
commit 434d5e4
Showing
7 changed files
with
212 additions
and
0 deletions.
There are no files selected for viewing
31 changes: 31 additions & 0 deletions
31
init/services/HestiaKERNEL/String/Index_Any_Left_String.ps1
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Original file line number | Diff line number | Diff line change |
|---|---|---|
| @@ -0,0 +1,31 @@ | ||
| # Copyright 2024 (Holloway) Chew, Kean Ho <[email protected]> | ||
| # | ||
| # | ||
| # Licensed under (Holloway) Chew, Kean Ho’s Liberal License (the "License"). | ||
| # You must comply with the license to use the content. Get the License at: | ||
| # | ||
| # https://doi.org/10.5281/zenodo.13770769 | ||
| # | ||
| # You MUST ensure any interaction with the content STRICTLY COMPLIES with | ||
| # the permissions and limitations set forth in the license. | ||
| . "${env:LIBS_HESTIA}\HestiaKERNEL\Unicode\Index_Any_Left_Unicode.ps1" | ||
| . "${env:LIBS_HESTIA}\HestiaKERNEL\Unicode\To_Unicode_From_String.ps1" | ||
|
|
||
|
|
||
|
|
||
|
|
||
| function HestiaKERNEL-Index-Any-Left-String { | ||
| param ( | ||
| [string]$___input, | ||
| [string]$___target | ||
| ) | ||
|
|
||
|
|
||
| # execute | ||
| $___content = HestiaKERNEL-To-Unicode-From-String $___input | ||
| $___chars = HestiaKERNEL-To-Unicode-From-String $___target | ||
|
|
||
|
|
||
| # report status | ||
| return HestiaKERNEL-Index-Any-Left-Unicode $___content $___chars | ||
| } |
31 changes: 31 additions & 0 deletions
31
init/services/HestiaKERNEL/String/Index_Any_Left_String.sh
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Original file line number | Diff line number | Diff line change |
|---|---|---|
| @@ -0,0 +1,31 @@ | ||
| #!/bin/sh | ||
| # Copyright 2024 (Holloway) Chew, Kean Ho <[email protected]> | ||
| # | ||
| # | ||
| # Licensed under (Holloway) Chew, Kean Ho’s Liberal License (the "License"). | ||
| # You must comply with the license to use the content. Get the License at: | ||
| # | ||
| # https://doi.org/10.5281/zenodo.13770769 | ||
| # | ||
| # You MUST ensure any interaction with the content STRICTLY COMPLIES with | ||
| # the permissions and limitations set forth in the license. | ||
| . "${LIBS_HESTIA}/HestiaKERNEL/Unicode/Index_Any_Left_Unicode.sh" | ||
| . "${LIBS_HESTIA}/HestiaKERNEL/Unicode/To_Unicode_From_String.sh" | ||
|
|
||
|
|
||
|
|
||
|
|
||
| HestiaKERNEL_Index_Any_Left_String() { | ||
| #___input="$1" | ||
| #___target="$2" | ||
|
|
||
|
|
||
| # execute | ||
| ___content="$(HestiaKERNEL_To_Unicode_From_String "$1")" | ||
| ___chars="$(HestiaKERNEL_To_Unicode_From_String "$2")" | ||
| printf -- "%d" "$(HestiaKERNEL_Index_Any_Left_Unicode "$___content" "$___chars")" | ||
|
|
||
|
|
||
| # report status | ||
| return $? | ||
| } |
49 changes: 49 additions & 0 deletions
49
init/services/HestiaKERNEL/Unicode/Index_Any_Left_Unicode.ps1
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Original file line number | Diff line number | Diff line change |
|---|---|---|
| @@ -0,0 +1,49 @@ | ||
| # Copyright 2024 (Holloway) Chew, Kean Ho <[email protected]> | ||
| # | ||
| # | ||
| # Licensed under (Holloway) Chew, Kean Ho’s Liberal License (the "License"). | ||
| # You must comply with the license to use the content. Get the License at: | ||
| # | ||
| # https://doi.org/10.5281/zenodo.13770769 | ||
| # | ||
| # You MUST ensure any interaction with the content STRICTLY COMPLIES with | ||
| # the permissions and limitations set forth in the license. | ||
| . "${env:LIBS_HESTIA}\HestiaKERNEL\Unicode\Is_Unicode.ps1" | ||
|
|
||
|
|
||
|
|
||
|
|
||
| function HestiaKERNEL-Index-Any-Left-Unicode { | ||
| param ( | ||
| [uint32[]]$___content_unicode, | ||
| [uint32[]]$___target_unicode | ||
| ) | ||
|
|
||
|
|
||
| # validate input | ||
| if ( | ||
| ($(HestiaKERNEL-Is-Unicode $___content_unicode) -ne ${env:HestiaKERNEL_ERROR_OK}) -or | ||
| ($(HestiaKERNEL-Is-Unicode $___target_unicode) -ne ${env:HestiaKERNEL_ERROR_OK}) | ||
| ) { | ||
| return -1 | ||
| } | ||
|
|
||
|
|
||
| # execute | ||
| for ($___index = 0; $___index -le $___content_unicode.Length - 1; $___index++) { | ||
| # get current character | ||
| $___current = $___content_unicode[$___index] | ||
|
|
||
|
|
||
| # scan character from given charset | ||
| foreach ($___char in $___target_unicode) { | ||
| if ($___current -eq $___char) { | ||
| return $___index # exit early from O(m^2) timing ASAP | ||
| } | ||
| } | ||
| } | ||
|
|
||
|
|
||
| # report status | ||
| return -1 | ||
| } |
71 changes: 71 additions & 0 deletions
71
init/services/HestiaKERNEL/Unicode/Index_Any_Left_Unicode.sh
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Original file line number | Diff line number | Diff line change |
|---|---|---|
| @@ -0,0 +1,71 @@ | ||
| #!/bin/sh | ||
| # Copyright 2024 (Holloway) Chew, Kean Ho <[email protected]> | ||
| # | ||
| # | ||
| # Licensed under (Holloway) Chew, Kean Ho’s Liberal License (the "License"). | ||
| # You must comply with the license to use the content. Get the License at: | ||
| # | ||
| # https://doi.org/10.5281/zenodo.13770769 | ||
| # | ||
| # You MUST ensure any interaction with the content STRICTLY COMPLIES with | ||
| # the permissions and limitations set forth in the license. | ||
| . "${LIBS_HESTIA}/HestiaKERNEL/Errors/Error_Codes.sh" | ||
| . "${LIBS_HESTIA}/HestiaKERNEL/Unicode/Is_Unicode.sh" | ||
|
|
||
|
|
||
|
|
||
|
|
||
| HestiaKERNEL_Index_Any_Left_Unicode() { | ||
| #___content_unicode="$1" | ||
| #___target_unicode="$2" | ||
|
|
||
|
|
||
| # validate input | ||
| if [ $(HestiaKERNEL_Is_Unicode "$1") -ne $HestiaKERNEL_ERROR_OK ]; then | ||
| printf -- "%d" "-1" | ||
| return $HestiaKERNEL_ERROR_ENTITY_EMPTY | ||
| fi | ||
|
|
||
| if [ $(HestiaKERNEL_Is_Unicode "$2") -ne $HestiaKERNEL_ERROR_OK ]; then | ||
| printf -- "%d" "-1" | ||
| return $HestiaKERNEL_ERROR_DATA_EMPTY | ||
| fi | ||
|
|
||
|
|
||
| # execute | ||
| ___content_unicode="$1" | ||
| ___index=0 | ||
| while [ ! "$___content_unicode" = "" ]; do | ||
| # get current character | ||
| ___current="${___content_unicode%%, *}" | ||
| ___content_unicode="${___content_unicode#"$___current"}" | ||
| if [ "${___content_unicode%"${___content_unicode#?}"}" = "," ]; then | ||
| ___content_unicode="${___content_unicode#, }" | ||
| fi | ||
|
|
||
|
|
||
| # get char from target character | ||
| ___target_unicode="$2" | ||
| while [ ! "$___target_unicode" = "" ]; do | ||
| ___char="${___target_unicode%%, *}" | ||
| ___target_unicode="${___target_unicode#"$___char"}" | ||
| if [ "${___target_unicode%"${___target_unicode#?}"}" = "," ]; then | ||
| ___target_unicode="${___target_unicode#, }" | ||
| fi | ||
|
|
||
| if [ "$___current" = "$___char" ]; then | ||
| printf -- "%d" "$___index" | ||
| return $HestiaKERNEL_ERROR_OK # exit early from O(m^2) timing ASAP | ||
| fi | ||
| done | ||
|
|
||
|
|
||
| # more characters - increase index and continue | ||
| ___index=$(($___index + 1)) | ||
| done | ||
|
|
||
|
|
||
| # report status | ||
| printf -- "%d" "-1" | ||
| return $HestiaKERNEL_ERROR_OK | ||
| } |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters