Skip to content

Little fix for PR #6 #10

New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Open
wants to merge 5 commits into
base: master
Choose a base branch
from
Open

Little fix for PR #6 #10

Changes from 1 commit
Commits
Show all changes
5 commits
Select commit Hold shift + click to select a range
7258d4c
Adding some initial tests for jsons with arrays.
amolofos Aug 31, 2015
de52a9b
Add support for un-escaping quotes and backslashes in the get process.
amolofos Sep 2, 2015
2b6d2ab
Finishing the first test against arrays.
amolofos Sep 2, 2015
e1cc41f
add quotes: for i in "${@}"
perlpunk Mar 31, 2016
8fc21ab
edit json.swim; make doc
perlpunk Mar 31, 2016
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
Prev Previous commit
Next Next commit
Finishing the first test against arrays.
  • Loading branch information
@amolofos @perlpunk
amolofos authored and perlpunk committed Mar 30, 2016
commit 2b6d2ab21576d6aa19e49dbc72ec96757b79987c
155 changes: 127 additions & 28 deletions test/arrays.t
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -3,66 +3,165 @@
source test/setup

# Number denotes how many tests are to be executed.
use Test::More tests 7
use Test::More tests 45
use JSON

# Testing json where an array element is not the first or the last one.
# Check test/arrays1.json.
# ------------------------------------------------------------------------------

# 1. Does it load?
# 1.1. Does it load?
tree=$(cat test/arrays1.json | JSON.load)
ok $? "JSON.load succeeded"

# 2. Does it fetch first element being non-array?
# 1.2. Does it fetch first element being non-array?
is "$(JSON.get '/id' tree)" '"20150817"' "JSON.get works on first element."

# 3. Escaped quotes?
is "$(JSON.get '/_etag' tree)" '""0300e163-0000-0000-0000-55d223bd0000""' "JSON.get works on escaped quoates"
# 1.3. Escaped quotes?
is "$(JSON.get -s '/_etag' tree)" '\"0300e163-0000-0000-0000-55d223bd0000\"' "JSON.get works on escaped quotes"

# 4. Retrieving the first array element.
# 1.4. Escaped quotes?
is "$(JSON.get -s -e '/_etag' tree)" '"0300e163-0000-0000-0000-55d223bd0000"' "JSON.get works on escaped quotes"

# 1.5. Escaped quotes?
is "$(JSON.get -e '/_etag' tree)" '""0300e163-0000-0000-0000-55d223bd0000""' "JSON.get works on escaped quotes"

# 1.6. Retrieving the first array element.
is "$(JSON.get '/osList' tree)" '' "JSON.get works on first array element."

# 5. Retrieving a simple value of an element of the first array element.
# 1.7. Retrieving a simple value of an element of the first array element.
is "$(JSON.get '/osList/1/osName' tree)" '"Mac"' "JSON.get works on a simple value of an element of the first array element."

# 6. Retrieving an array element of an element of the first array element.
# 1.8. Retrieving an array element of an element of the first array element.
is "$(JSON.get '/osList/1/softwareList' tree)" '' "JSON.get works on an array element of an element of the first array element."

# 7. Retrieving a simple value of an element of an array of an element of element of the first array element.
# 1.9. Retrieving a simple value of an element of an array of an element of element of the first array element.
is "$(JSON.get '/osList/1/softwareList/1/softwareName' tree)" '"VirtualBox"' "JSON.get works on a simple value of an element of an array of an element of element of the first array element."

# trailing_newline_re=$'\n''$'
# json_string='{"foo": "bar", "baz": "quux"}'
#
# JSON.load "$json_string"
# [[ "$JSON__cache" =~ $trailing_newline_re ]]
# ok $? "JSON__cache has trailing newline" || echo -n "$JSON__cache" | hexdump -C
#
# JSON.load "$json_string" tree
# [[ "$tree" =~ $trailing_newline_re ]]
# ok $? "linear tree has trailing newline" || echo -n "$tree" | hexdump -C
#
# JSON.load "{}"
# [[ "$JSON__cache" == '' ]]
# ok $? "empty JSON__cache has no trailing newline" || echo -n "$JSON__cache" | hexdump -C
#
# JSON.load "[]" tree
# [[ "$tree" == '' ]]
# ok $? "empty linear tree has no trailing newline" || echo -n "$tree" | hexdump -C

# Testing json where an array element is the first element.
# Check test/arrays2.json.
# ------------------------------------------------------------------------------

# 2.1. Does it load?
tree=$(cat test/arrays1.json | JSON.load)
ok $? "JSON.load succeeded"

# 2.2. Does it fetch first element being non-array?
is "$(JSON.get '/id' tree)" '"20150817"' "JSON.get works on first element."

# 2.3. Escaped quotes?
is "$(JSON.get -s '/_etag' tree)" '\"0300e163-0000-0000-0000-55d223bd0000\"' "JSON.get works on escaped quotes"

# 2.4. Escaped quotes?
is "$(JSON.get -s -e '/_etag' tree)" '"0300e163-0000-0000-0000-55d223bd0000"' "JSON.get works on escaped quotes"

# 2.5. Escaped quotes?
is "$(JSON.get -e '/_etag' tree)" '""0300e163-0000-0000-0000-55d223bd0000""' "JSON.get works on escaped quotes"

# 2.6. Retrieving the first array element.
is "$(JSON.get '/osList' tree)" '' "JSON.get works on first array element."

# 2.7. Retrieving a simple value of an element of the first array element.
is "$(JSON.get '/osList/1/osName' tree)" '"Mac"' "JSON.get works on a simple value of an element of the first array element."

# 2.8. Retrieving an array element of an element of the first array element.
is "$(JSON.get '/osList/1/softwareList' tree)" '' "JSON.get works on an array element of an element of the first array element."

# 2.9. Retrieving a simple value of an element of an array of an element of element of the first array element.
is "$(JSON.get '/osList/1/softwareList/1/softwareName' tree)" '"VirtualBox"' "JSON.get works on a simple value of an element of an array of an element of element of the first array element."

# Testing json where an array element is the last element.
# Check test/arrays3.json.
# ------------------------------------------------------------------------------

# 3.1. Does it load?
tree=$(cat test/arrays1.json | JSON.load)
ok $? "JSON.load succeeded"

# 3.2. Does it fetch first element being non-array?
is "$(JSON.get '/id' tree)" '"20150817"' "JSON.get works on first element."

# 3.3. Escaped quotes?
is "$(JSON.get -s '/_etag' tree)" '\"0300e163-0000-0000-0000-55d223bd0000\"' "JSON.get works on escaped quotes"

# 3.4. Escaped quotes?
is "$(JSON.get -s -e '/_etag' tree)" '"0300e163-0000-0000-0000-55d223bd0000"' "JSON.get works on escaped quotes"

# 3.5. Escaped quotes?
is "$(JSON.get -e '/_etag' tree)" '""0300e163-0000-0000-0000-55d223bd0000""' "JSON.get works on escaped quotes"

# 3.6. Retrieving the first array element.
is "$(JSON.get '/osList' tree)" '' "JSON.get works on first array element."

# 3.7. Retrieving a simple value of an element of the first array element.
is "$(JSON.get '/osList/1/osName' tree)" '"Mac"' "JSON.get works on a simple value of an element of the first array element."

# 3.8. Retrieving an array element of an element of the first array element.
is "$(JSON.get '/osList/1/softwareList' tree)" '' "JSON.get works on an array element of an element of the first array element."

# 3.9. Retrieving a simple value of an element of an array of an element of element of the first array element.
is "$(JSON.get '/osList/1/softwareList/1/softwareName' tree)" '"VirtualBox"' "JSON.get works on a simple value of an element of an array of an element of element of the first array element."

# Testing json where an array element is the first and the last element only.
# Check test/arrays4.json.
# ------------------------------------------------------------------------------

# 4.1. Does it load?
tree=$(cat test/arrays1.json | JSON.load)
ok $? "JSON.load succeeded"

# 4.2. Does it fetch first element being non-array?
is "$(JSON.get '/id' tree)" '"20150817"' "JSON.get works on first element."

# 4.3. Escaped quotes?
is "$(JSON.get -s '/_etag' tree)" '\"0300e163-0000-0000-0000-55d223bd0000\"' "JSON.get works on escaped quotes"

# 4.4. Escaped quotes?
is "$(JSON.get -s -e '/_etag' tree)" '"0300e163-0000-0000-0000-55d223bd0000"' "JSON.get works on escaped quotes"

# 4.5. Escaped quotes?
is "$(JSON.get -e '/_etag' tree)" '""0300e163-0000-0000-0000-55d223bd0000""' "JSON.get works on escaped quotes"

# 4.6. Retrieving the first array element.
is "$(JSON.get '/osList' tree)" '' "JSON.get works on first array element."

# 4.7. Retrieving a simple value of an element of the first array element.
is "$(JSON.get '/osList/1/osName' tree)" '"Mac"' "JSON.get works on a simple value of an element of the first array element."

# 4.8. Retrieving an array element of an element of the first array element.
is "$(JSON.get '/osList/1/softwareList' tree)" '' "JSON.get works on an array element of an element of the first array element."

# 4.9. Retrieving a simple value of an element of an array of an element of element of the first array element.
is "$(JSON.get '/osList/1/softwareList/1/softwareName' tree)" '"VirtualBox"' "JSON.get works on a simple value of an element of an array of an element of element of the first array element."

# Testing json where an array element is the first, the last element and more exist.
# Check test/arrays5.json.
# ------------------------------------------------------------------------------

# 5.1. Does it load?
tree=$(cat test/arrays1.json | JSON.load)
ok $? "JSON.load succeeded"

# 5.2. Does it fetch first element being non-array?
is "$(JSON.get '/id' tree)" '"20150817"' "JSON.get works on first element."

# 5.3. Escaped quotes?
is "$(JSON.get -s '/_etag' tree)" '\"0300e163-0000-0000-0000-55d223bd0000\"' "JSON.get works on escaped quotes"

# 5.4. Escaped quotes?
is "$(JSON.get -s -e '/_etag' tree)" '"0300e163-0000-0000-0000-55d223bd0000"' "JSON.get works on escaped quotes"

# 5.5. Escaped quotes?
is "$(JSON.get -e '/_etag' tree)" '""0300e163-0000-0000-0000-55d223bd0000""' "JSON.get works on escaped quotes"

# 5.6. Retrieving the first array element.
is "$(JSON.get '/osList' tree)" '' "JSON.get works on first array element."

# 5.7. Retrieving a simple value of an element of the first array element.
is "$(JSON.get '/osList/1/osName' tree)" '"Mac"' "JSON.get works on a simple value of an element of the first array element."

# 5.8. Retrieving an array element of an element of the first array element.
is "$(JSON.get '/osList/1/softwareList' tree)" '' "JSON.get works on an array element of an element of the first array element."

# 5.9. Retrieving a simple value of an element of an array of an element of element of the first array element.
is "$(JSON.get '/osList/1/softwareList/1/softwareName' tree)" '"VirtualBox"' "JSON.get works on a simple value of an element of an array of an element of element of the first array element."