|
t/Account
|
- Called UNIVERSAL::can() as a function, not a method at /usr/lib/perl5/vendor_perl/5.10.0/DateTime/Locale.pm line 298
- 1..7
- ok 1 - use WebGUI::Account;
- ok 2 - new() throws exception without session object
- ok 3 - WebGUI::Account object created successfully
- ok 4 - Blessed into the right class isa WebGUI::Account
- ok 5 - getUrl adds op, module, and do since no method has been set
- ok 6 - getUrl adds op if passed other parameters
- ok 7 - getUrl doesnt add op=account if already exists
|
1.27s |
100.0% |
|
t/AdSpace
|
- Called UNIVERSAL::can() as a function, not a method at /usr/lib/perl5/vendor_perl/5.10.0/DateTime/Locale.pm line 298
- 1..56
- ok 1 - use WebGUI::AdSpace;
- ok 2 - The object isa WebGUI::AdSpace
- ok 3 - create()
- ok 4 - get()
- ok 5 - getId()
- ok 6 - newByName returns identical object if name exists
- ok 7 - newByName returns undef if the name does not exist
- ok 8 - new returns undef if the id does not exist
- ok 9 - create returns undef unless you pass it a name
- ok 10 - create returns undef if the name already exists
- ok 11 - The object isa WebGUI::Session
- ok 12 - get, set work on title
- ok 13 - getAdSpaces returns all AdSpaces in alphabetical order by title
- ok 14 - set and get for width
- ok 15 - set and get for costPerClick
- ok 16 - set and get for name
- ok 17 - set and get for height
- ok 18 - set and get for description
- ok 19 - set and get for groupToPurchase
- ok 20 - set and get for minimumImpressions
- ok 21 - set and get for costPerImpression
- ok 22 - set and get for minimumClicks
- ok 23 - set and get for title
- ok 24 - empty call to set does not change width
- ok 25 - empty call to set does not change costPerClick
- ok 26 - empty call to set does not change name
- ok 27 - empty call to set does not change height
- ok 28 - empty call to set does not change description
- ok 29 - empty call to set does not change groupToPurchase
- ok 30 - empty call to set does not change minimumImpressions
- ok 31 - empty call to set does not change costPerImpression
- ok 32 - empty call to set does not change minimumClicks
- ok 33 - empty call to set does not change title
- ok 34 - set can clear the title
- ok 35 - set can clear the title
- ok 36 - set can not clear the name
- ok 37 - Got the set of Ads for bruce
- ok 38 - Got the set of Ads for catWoman
- ok 39 - clicking on the penguin ad returns the penguin url
- ok 40 - clicking on the joker ad returns the joker url
- ok 41 - clicking on the twoFace ad returns the twoFace url
- ok 42 - counted penguin clicks correctly
- ok 43 - counted joker clicks correctly
- ok 44 - counted twoFace clicks correctly
- ok 45 - displayImpression returns the ad
- ok 46 - displayImpressions: impresssions and nextInPriority are not updated when dontCount=1
- ok 47 - displayImpression added 1 impression
- ok 48 - displayImpression changed the nextInPriority
- ok 49 - displayImpression set the nextInPriority correctly
- ok 50 - displayImpression deactivates an ad if enough impressions and clicks are bought
- ok 51 - displayImpression returns earliest by nextInPriority, penguin has 3 clicks
- ok 52 - displayImpression returns still returns penguinAd, but deactivates it after 4 clicks
- ok 53 - displayImpression deactiveated penguinAd
- ok 54 - displayImpression now returns jokerAd
- ok 55 - displayImpression did not deactiveate jokerAd after one impression
- ok 56 - displayImpression deactivated jokerAd after two impressions
|
1.29s |
100.0% |
|
t/Auth
|
- Called UNIVERSAL::can() as a function, not a method at /usr/lib/perl5/vendor_perl/5.10.0/DateTime/Locale.pm line 298
- 1..2
- ok 1 - returnUrl field is used to set redirect after createAccountSave
- ok 2 - returnUrl field is used to set redirect after login
|
1.24s |
100.0% |
|
t/Config
|
- Called UNIVERSAL::can() as a function, not a method at /usr/lib/perl5/vendor_perl/5.10.0/DateTime/Locale.pm line 298
- 1..15
- ok 1 - load config
- ok 2 - get()
- ok 3 - get() macros hash
- ok 4 - get() assets hash
- ok 5 - get() shippingDrivers array
- ok 6 - getFilename()
- ok 7 - getWebguiRoot()
- ok 8 - readAllConfigs
- ok 9 - addToArray()
- ok 10 - deleteFromArray()
- ok 11 - addToHash()
- ok 12 - deleteFromHash()
- ok 13 - getCookieName()
- ok 14 - asset classes are all valid asset classes
- ok 15 - set: array, not scalar
|
2.03s |
100.0% |
|
t/Crud
|
- Called UNIVERSAL::can() as a function, not a method at /usr/lib/perl5/vendor_perl/5.10.0/DateTime/Locale.pm line 298
- 1..55
- ok 1 - structure: id name
- ok 2 - structure: id type
- ok 3 - structure: sequenceNumber name
- ok 4 - structure: sequenceNumber type
- ok 5 - structure: dateCreated name
- ok 6 - structure: dateCreated type
- ok 7 - structure: lastUpdated name
- ok 8 - structure: lastUpdated type
- ok 9 - isa WebGUI::Crud isa WebGUI::Crud
- ok 10 - dateCreated looks like a date
- ok 11 - lastUpdated looks like a date
- ok 12 - sequenceNumber looks like a number
- ok 13 - record 1 sequenceNumber is 1
- ok 14 - id looks like a guid
- ok 15 - custom id works
- ok 16 - can retrieve unique rows
- ok 17 - can reinstanciate record
- ok 18 - record 1 sequenceNumber is 2
- ok 19 - record 1 sequenceNumber is 3
- ok 20 - record 1 sequenceNumber is 4
- ok 21 - demotion reports success
- ok 22 - can't demote further than end
- ok 23 - promotion reports success
- ok 24 - can't promote further than beginning
- ok 25 - promotion from end works
- ok 26 - demotion to end works
- ok 27 - demotion from beginning works
- ok 28 - promotion to beginning works
- ok 29 - demotion from middle works
- ok 30 - promotion from middle works
- ok 31 - deletion reports success
- ok 32 - deletion of record 2 moved record 3 to sequence 2
- ok 33 - deletion of record 2 moved record 4 to sequence 3
- ok 34 - update returns success
- ok 35 - updates work
- ok 36 - getAllSql() SQL no options
- ok 37 - getAllSql() SQL sequence key value with no key specified
- ok 38 - getAllSql() PARAMS sequence key value with no key specified
- ok 39 - getAllSql() SQL with a row limit
- ok 40 - getAllSql() SQL with a start and row limit
- ok 41 - getAllSql() with a custom order by clause
- ok 42 - getAllSql() with a custom join
- ok 43 - getAllSql() with a custom joinUsing
- ok 44 - getAllSql() SQL with a constraint
- ok 45 - getAllSql PARAMS with a constraint
- ok 46 - getAllSql() SQL with two constraints
- ok 47 - getAllSql PARAMS with two constraints
- ok 48 - getAllIds()
- ok 49 - Put your trust in the Lord. Your ass belongs to me. isa WebGUI::Crud
- ok 50 - Put your trust in the Lord. Your ass belongs to me. isa WebGUI::Crud
- ok 51 - Put your trust in the Lord. Your ass belongs to me. isa WebGUI::Crud
- ok 52 - properties work
- ok 53 - default key is id
- ok 54 - default table is unnamed_crud_table
- ok 55 - default sequence key is blank
|
2.30s |
100.0% |
|
t/DatabaseLink
|
- Called UNIVERSAL::can() as a function, not a method at /usr/lib/perl5/vendor_perl/5.10.0/DateTime/Locale.pm line 298
- 1..27
- ok 1 - create made an object isa WebGUI::DatabaseLink
- ok 2 - create makes an object with a valid GUID
- ok 3 - create: passing no params autovivifies the databaseLinkId, but that is all
- ok 4 - new DatabaseLink created
- ok 5 - new DatabaseLink deleted
- ok 6 - create: params sent to create are embedded in the object correctly
- ok 7 - requested databaseLinkId was not used as the linkId
- ok 8 - create made a valid GUID instead of that thing I asked for
- ok 9 - DSN set correctly for default database link
- ok 10 - databaseName parsed default DSN from config file
- ok 11 - databaseLinkId set correctly
- ok 12 - new returns undef unless you specify a databaseLinkId
- ok 13 - new returns undef with a non-existant databaseLinkId
- ok 14 - explicit
- ok 15 - database=
- ok 16 - dbName=, bad capitalization
- ok 17 - dbname=
- ok 18 - dbnane=, misspelling
- ok 19 - db=
- ok 20 - ACID on *.*, privileged
- ok 21 - ALL PRIVILEGES on *.*, privileged
- ok 22 - Missing DELETE on *.*, unprivileged
- ok 23 - ALL PRIVILEGES on explicit db name, privileged
- ok 24 - ALL PRIVILEGES on quoted, explicit db name, privileged
- ok 25 - ALL PRIVILEGES on quoted, wildcard name, privileged
- ok 26 - ALL PRIVILEGES on wrong db, unprivileged
- ok 27 - delete cleaned up all temporarily created DatabaseLinks
|
1.19s |
100.0% |
|
t/DateTime
|
- Called UNIVERSAL::can() as a function, not a method at /usr/lib/perl5/vendor_perl/5.10.0/DateTime/Locale.pm line 298
- 1..18
- ok 1 - use WebGUI::DateTime;
- ok 2 - constructor isa WebGUI::DateTime
- ok 3 - constructor isa DateTime
- ok 4 - toDatabase returns the identical string since it is in UTC
- ok 5 - toDatabaseDate returns the identical date since it is in UTC
- ok 6 - toDatabaseTime returns the identical time since it is in UTC
- Called UNIVERSAL::can() as a function, not a method at /usr/lib/perl5/vendor_perl/5.10.0/DateTime/TimeZone.pm line 77
- ok 7 - cloneToUserTimeZone isa WebGUI::DateTime
- ok 8 - cloneToUserTimeZone also copies over the session object isa WebGUI::Session
- ok 9 - cloned object has correct time zone
- ok 10 - original object is still UTC
- ok 11 - toUserTimeZone obeys the time zone
- ok 12 - toUserTimeZoneDate obeys the time zone
- ok 13 - toUserTimeZoneTime obeys the time zone
- ok 14 - add returns itself isa WebGUI::DateTime
- ok 15 - add does not nuke WebGUI::Session=HASH(0x97deccc) isa WebGUI::Session
- ok 16 - add does not change the time zone
- ok 17 - add returns the correct time
- ok 18 - epochal construction isa WebGUI::DateTime
|
1.33s |
100.0% |
|
t/Form
|
- Called UNIVERSAL::can() as a function, not a method at /usr/lib/perl5/vendor_perl/5.10.0/DateTime/Locale.pm line 298
- 1..5
- ok 1 - formHeader() dies if first parameter is not WebGUI Session
- ok 2 - formHeader() dies if second parameter is not hash reference
- ok 3 - formHeader called without an options hashref
- ok 4 - formHeader called with an options hashref
- ok 5 - formHeader 'action' option containing query parameters
|
1.13s |
100.0% |
|
t/Group
|
- Called UNIVERSAL::can() as a function, not a method at /usr/lib/perl5/vendor_perl/5.10.0/DateTime/Locale.pm line 298
- 1..156
- ok 1 - Group object creation
- ok 2 - Group assigned new groupId, not new
- ok 3 - Default name
- ok 4 - Default expireOffset
- ok 5 - Default karma threshold
- ok 6 - Default expire notify offset time
- ok 7 - Default delete offset time
- ok 8 - Default expire notify time
- ok 9 - Default databaseLinkId
- ok 10 - Default external database cache timeout
- ok 11 - lastUpdated = create time
- ok 12 - auto Add is off by default
- ok 13 - auto Delete is off by default
- ok 14 - isEditable is on by default
- ok 15 - show in forms is on by default
- ok 16 - is adHoc group is off by default
- ok 17 - Group object creation
- ok 18 - Group assigned new groupId, not new
- ok 19 - Default name
- ok 20 - Default expireOffset
- ok 21 - Default karma threshold
- ok 22 - Default expire notify offset time
- ok 23 - Default delete offset time
- ok 24 - Default expire notify time
- ok 25 - Default databaseLinkId
- ok 26 - Default external database cache timeout
- ok 27 - lastUpdated = create time
- ok 28 - auto Add is off by default
- ok 29 - auto Delete is off by default
- ok 30 - isEditable is on by default
- ok 31 - show in forms is on by default
- ok 32 - is adHoc group is off by default
- ok 33 - description set and get correctly
- ok 34 - expire notify message set and get correctly
- ok 35 - expireNotifyOffset set and get correctly
- ok 36 - expireOffset set and get correctly
- ok 37 - autoAdd set and get correctly
- ok 38 - autoDelete set and get correctly
- ok 39 - deleteOffset set and get correctly
- ok 40 - expireNotify set and get correctly
- ok 41 - isEditable set and get correctly
- ok 42 - showInForms set and get correctly
- ok 43 - dbQuery set and get correctly
- ok 44 - isAdHocMailGroup set and get correctly
- ok 45 - databaseLinkId set and get correctly
- ok 46 - databaseLinkId set and get correctly (0)
- ok 47 - new: noAdmin prevents the admin group from being added to this group
- ok 48 - ldapGroup set and fetched correctly
- ok 49 - ldapGroup set and fetched correctly
- ok 50 - ldapLinkId set and fetched correctly
- ok 51 - ldapRecursiveProperty set and fetched correctly
- ok 52 - ldapRecursiveFilter set and fetched correctly
- ok 53 - GroupId is proper length
- ok 54 - Admin group added by default to this group
- ok 55 - Group not added to any other group
- ok 56 - No users added by default
- ok 57 - No users added by default in any method
- ok 58 - Set name
- ok 59 - Get name via accessor
- ok 60 - Get name via generic accessor
- ok 61 - find returns a group
- ok 62 - find with non-existant group name returns a group
- ok 63 - find with non-existant group name returns a group with undefined ID
- ok 64 - deleted group property hash
- ok 65 - group name restored after ->get through ->name
- ok 66 - group property hash restored
- ok 67 - group was removed
- ok 68 - object name assignment, multiple objects
- ok 69 - Group A is in Group B, recursively
- ok 70 - Group A is in Group B
- ok 71 - Group B contains Group A
- ok 72 - Admin added to group A automatically
- ok 73 - Not allowed to create recursive group loops
- ok 74 - Not allowed to add group Visitor to a group
- ok 75 - Not allowed to add myself to my group
- ok 76 - Group A contains Group C
- ok 77 - Group C is a member of Group A, cached
- ok 78 - Group C is in Group B, recursively
- ok 79 - Group A is in Group B
- ok 80 - Adding Group B to Group C fails, recursively
- ok 81 - Group C is not a member of Group A
- ok 82 - Group C is not in Group B, recursively
- ok 83 - No groups contain Group C
- ok 84 - Add Z tree to A under B
- ok 85 - Not able to add B tree under Z tree under X
- ok 86 - Not able to add a group when it is already a member of a group
- ok 87 - getAllGroupsFor X
- ok 88 - getAllGroupsFor Y
- ok 89 - getAllGroupsFor Z
- ok 90 - userIsAdmin: User who isn't secondary admin can't be group admin
- ok 91 - userIsAdmin returns 1 or 0, not value
- ok 92 - userIsAdmin: using session user Visitor
- ok 93 - userIsAdmin: using session user Admin
- ok 94 - userIsAdmin: User must be member of group to be group admin
- ok 95 - userGroupExpireDate: Default expire time
- ok 96 - addToGroups: Added dude to gX
- ok 97 - userIsAdmin: Dude set to be group admin for gX
- ok 98 - userGroupExpireDate: Default expire time ages
- ok 99 - adding exising user to group resets expire date
- ok 100 - userIsAdmin: adding existing user to group does not change group admin status
- ok 101 - userIsAdmin: empty string returns status
- ok 102 - userIsAdmin: undef returns status
- ok 103 - userIsAdmin: trying 0 as value
- ok 104 - userIsAdmin: trying '0E0'(string) as value
- ok 105 - userIsAdmin: trying 0E0 as value
- ok 106 - users in group B
- ok 107 - users in group A
- ok 108 - users in group C
- ok 109 - users in group Z
- ok 110 - users in group B, recursively
- ok 111 - users in group A, recursively
- ok 112 - users in group C, recursively
- ok 113 - users in group Z, recursively
- ok 114 - addUsers will not add a user to a group they already belong to
- ok 115 - mob[0] is not in group Z
- ok 116 - verify SQL table built correctly
- ok 117 - Group Y's databaseLinkId is set to WebGUI
- ok 118 - setting dbQuery clears cached isInGroup
- ok 119 - all mob users in list of group Y users from database
- ok 120 - mob[0] is in group Y after setting dbQuery
- ok 121 - mob[0] isInGroup Z
- ok 122 - mob[0] in list of group Y users
- ok 123 - mob[0] not in list of group Z users
- ok 124 - mob[0] in list of group Z users, recursively
- ok 125 - karma level checks
- ok 126 - karma disabled in settings, no users in group
- ok 127 - chameleons 1, 2 and 3 are in group K via karma threshold
- ok 128 - chameleons 1, 2 and 3 are group K karma users
- ok 129 - checking retrieval of scratchFilter
- ok 130 - wrong name and value
- ok 131 - wrong value
- ok 132 - wrong name
- ok 133 - right name and value
- ok 134 - right name and value
- ok 135 - getScratchUsers
- ok 136 - getAllUsers for group with scratch
- ok 137 - getIpUsers
- ok 138 - getUsers for group with IP filter
- ok 139 - good IP address
- ok 140 - bad IP address
- ok 141 - another good IP address
- ok 142 - another bad IP address
- ok 143 - Cache dude added to group Y
- ok 144 - Cache dude is a member of group Z by group membership
- ok 145 - Cache dude removed from group Y
- ok 146 - Cache dude removed from group Z too
- ok 147 - Cache dude is a member of group Y by group membership
- ok 148 - Cache dude is a member of group Z by group membership
- ok 149 - Cache dude is a member of group A by group membership
- ok 150 - Cache dude is a member of group B by group membership
- ok 151 - Cache dude is not a member of group Y
- ok 152 - Cache dude is not a member of group Z
- ok 153 - Cache dude is not a member of group A
- ok 154 - Cache dude is not a member of group B
- ok 155 - Admin Group is in Group Visitor
- ok 156 # skip need to test expiration date in groupings interacting with recursive or not
|
7.70s |
100.0% |
|
t/HTML
|
- Called UNIVERSAL::can() as a function, not a method at /usr/lib/perl5/vendor_perl/5.10.0/DateTime/Locale.pm line 298
- 1..12
- ok 1 - all filter complex HTML
- ok 2 - all filter complex HTML
- ok 3 - all filter JT
- ok 4 - filter macros, valid or not
- ok 5 - filter macros leaves HTML alone
- ok 6 - all filter HTML
- ok 7 - all filter complex HTML
- ok 8 - all filters macros and HTML
- ok 9 - all with bare iframe
- ok 10 - all, specific iframe test case
- ok 11 - single comma
- ok 12 - single quote
|
1.08s |
100.0% |
|
t/Inbox
|
- Called UNIVERSAL::can() as a function, not a method at /usr/lib/perl5/vendor_perl/5.10.0/DateTime/Locale.pm line 298
- 1..8
- ok 1 - The object isa WebGUI::Inbox
- ok 2 - new("new") -- object reference is defined
- Called UNIVERSAL::can() as a function, not a method at /usr/lib/perl5/vendor_perl/5.10.0/DateTime/TimeZone.pm line 77
- ok 3 - The object isa WebGUI::Inbox::Message
- ok 4 - addMessage returned a response
- ok 5 - Message body set
- ok 6 - messageId retrieved
- ok 7 - getMessage returns message object
- ok 8 - Messages returned for user
|
1.54s |
100.0% |
|
t/International
|
- Called UNIVERSAL::can() as a function, not a method at /usr/lib/perl5/vendor_perl/5.10.0/DateTime/Locale.pm line 298
- 1..17
- ok 1 - use WebGUI::International;
- ok 2 - object of correct type created isa WebGUI::International
- ok 3 - getNamespace: default namespace is undef
- ok 4 - get: get English label for topicName with default namespace: WebGUI
- ok 5 - getNamespace: set namespace to WebGUI
- ok 6 - get: get English label for topicName: WebGUI
- ok 7 - get: get English label for 84: Group Name
- ok 8 - getNamespace: set namespace to Asset
- ok 9 - get: get English label for topicName in Asset: Assets
- ok 10 - get: test manual namespace override
- ok 11 - Language check: missing key returns English key
- ok 12 - Language check: existing key returns native language key
- ok 13 - Language check: key from missing file return English key
- ok 14 - Language check: key from non-existant file returns an empty string
- ok 15 - keys with spaces work
- ok 16 - getLanguage, specific property
- ok 17 - getLanguage, without a specific property returns a hashref isa HASH
|
1.19s |
100.0% |
|
t/Keyword
|
- Called UNIVERSAL::can() as a function, not a method at /usr/lib/perl5/vendor_perl/5.10.0/DateTime/Locale.pm line 298
- 1..9
- ok 1 - The object isa WebGUI::Asset
- ok 2 - The object isa WebGUI::Keyword
- ok 3 - setKeywordsForAsset() create
- ok 4 - setKeywordsForAsset() update
- ok 5 - getKeywordsForAsset()
- ok 6 - getLatestVersionNumber()
- ok 7 - getLatestVersionNumber()
- ok 8 - getLatestVersionNumber()
- ok 9 - getKeywordsForAsset()
|
1.12s |
100.0% |
|
t/Macro
|
- Called UNIVERSAL::can() as a function, not a method at /usr/lib/perl5/vendor_perl/5.10.0/DateTime/Locale.pm line 298
- 1..39
- ok 1 - c_companyName Macro in text processed okay
- ok 2 - PageTitle Macro in text processed okay
- ok 3 - GroupText Macro in text processed okay for registered user
- ok 4 - GroupText Macro with nested c_companyName macro
- ok 5 - GroupText Macro with nested PageTitle macro
- ok 6 - Extras macro with quoted argument.
- ok 7 - Extras macro with unquoted argument.
- ok 8 - Extras macro with no parens and no args
- ok 9 - Extras macro with parens but no args
- ok 10 - Impossibly ugly, invalid macro fails to process and fails to kill WebGUI
- ok 11 - GroupText Macro with quoted comma
- ok 12 - Escaped double quotes work properly
- ok 13 - Nested macro evaluates results to extras
- ok 14 - Combined macro calls don't get evaluated
- ok 15 - Infinite recursion gets broken
- ok 16 - Carriage returns pass through as needed.
- ok 17 - Single quoted parameters work properly.
- ok 18 - Escaped single quotes work.
- ok 19 - Quoting/Nesting edge case: ^VisualMacro(text);
- ok 20 - Quoting/Nesting edge case: ^VisualMacro(^VisualMacro("something);");
- ok 21 - Quoting/Nesting edge case: ^VisualMacro("^VisualMacro("something););
- ok 22 - Quoting/Nesting edge case: ^VisualMacro("^VisualMacro(something"););
- ok 23 - Quoting/Nesting edge case: ^VisualMacro^VisualMacro(this);;
- ok 24 - Quoting/Nesting edge case: ^VisualMacro(^VisualMacro);
- ok 25 - Quoting/Nesting edge case: ^VisualMacro(^VisualMacro(this));
- ok 26 - Quoting/Nesting edge case: ^VisualMacro("quotes\");
- ok 27 - Quoting/Nesting edge case: ^VisualMacro("^VisualMacro(\"something\",\"something else\");","more still");
- ok 28 - Quoting/Nesting edge case: ^VisualMacro("^VisualMacro(\"something\", \"something else\");", "more still");
- ok 29 - Quoting/Nesting edge case: ^VisualMacro("^VisualMacro('something','something else');","more still");
- ok 30 - Quoting/Nesting edge case: ^VisualMacro("^VisualMacro('something', 'something else');", "more still");
- ok 31 - Invalid macro call: ^;
- ok 32 - Invalid macro call: ^();
- ok 33 - Invalid macro call: ^MacroThatDoesntExist;
- ok 34 - Invalid macro call: ^Ex'tras;
- ok 35 - Invalid macro call: ^Extras(;
- ok 36 - Invalid macro call: ^Extras);
- ok 37 - Invalid macro call: ^Extras(;)
- ok 38 - Macro can return empty string
- ok 39 - Macro can return undef
|
1.38s |
100.0% |
|
t/POD
|
|
10.59s |
100.0% |
|
t/Paginator
|
- Called UNIVERSAL::can() as a function, not a method at /usr/lib/perl5/vendor_perl/5.10.0/DateTime/Locale.pm line 298
- 1..26
- ok 1 - paginator object returned isa WebGUI::Paginator
- ok 2 - all data returned by paginator
- ok 3 - paginator returns right number of pages (default setting)
- ok 4 - page 1 data correct
- ok 5 - page 2 data correct
- ok 6 - page 5 data correct
- ok 7 - pageNumber set to 1 at object creation by default
- ok 8 - setPageNumber returns the page number set
- ok 9 - pageNumber set by setPageNumber
- ok 10 - setPageNumber returns the page number set
- ok 11 - pageNumber set by setPageNumber
- ok 12 - page links correct
- ok 13 - (101) paginator returns correct number of rows
- ok 14 - (101) paginator returns right number of pages (default setting)
- ok 15 - (101) page 1 data correct
- ok 16 - (101) page 2 data correct
- ok 17 - (101) page 5 data correct
- ok 18 - (101) page 5 stringification okay
- ok 19 - Default page number is 1
- ok 20 - set of 5 pages looks right
- ok 21 - set of 20 pages looks right
- ok 22 - set of first 10 pages selected correctly
- ok 23 - set of middle 10 pages @10 selected correctly
- ok 24 - set of 10 pages selected correctly, with off edge page number (3/20)
- ok 25 - set of last 10 pages selected correctly, (17/20)
- ok 26 - set of last 10 pages selected correctly, (20/20)
|
1.45s |
100.0% |
|
t/PassiveProfiling
|
- Called UNIVERSAL::can() as a function, not a method at /usr/lib/perl5/vendor_perl/5.10.0/DateTime/Locale.pm line 298
- 1..6
- ok 1 - use WebGUI::PassiveProfiling;
- Called UNIVERSAL::can() as a function, not a method at /usr/lib/perl5/vendor_perl/5.10.0/DateTime/TimeZone.pm line 77
- ok 2 - add: Nothing added if passive profiling is not enabled
- ok 3 - add: Enabling passiveProfiling in the settings allows it to work, only 1 log entry added
- ok 4 - add: Correct information added for logged asset
- ok 5 - addPage: Nothing added if passive profiling is not enabled
- ok 6 - addPage: All children assets added, but the originating page was not
|
1.38s |
100.0% |
|
t/Pluggable
|
- Called UNIVERSAL::can() as a function, not a method at /usr/lib/perl5/vendor_perl/5.10.0/DateTime/Locale.pm line 298
- 1..8
- ok 1 - Module shouldn't load.
- ok 2 - Module should load.
- ok 3 - Can run a function.
- ok 4 - Can instanciate an object.
- ok 5 - find() finds all modules by default
- ok 6 - find() with onelevel
- ok 7 - find() with exclude
- ok 8 - find() with return => name
|
4.12s |
100.0% |
|
t/PodChecker
|
|
6.95s |
99.8% |
|
t/ProfileCategory
|
- Called UNIVERSAL::can() as a function, not a method at /usr/lib/perl5/vendor_perl/5.10.0/DateTime/Locale.pm line 298
- 1..1
- ok 1 - Setting a category to not be visible does not change its availability through getCategories, with no options
|
1.15s |
100.0% |
|
t/ProfileField
|
- Called UNIVERSAL::can() as a function, not a method at /usr/lib/perl5/vendor_perl/5.10.0/DateTime/Locale.pm line 298
- 1..17
- ok 1 - use WebGUI::ProfileField;
- ok 2 - new() returns undef with no id
- ok 3 - new() returns undef with reserved field ID "op"
- ok 4 - new() returns undef with reserved field ID "func"
- ok 5 - new() returns undef with field ID not found
- ok 6 - field "alias" instantiated
- ok 7 - The object isa WebGUI::ProfileField
- ok 8 - field "uiLevel instantiated
- ok 9 - The object isa WebGUI::ProfileField
- ok 10 - formField method returns something, alias field, session user
- ok 11 - html returned contains value, alias field, session user
- ok 12 - formField method returns something, uiLevel field, session user
- ok 13 - html returned contains value, uiLevel field, session user
- ok 14 - formField method returns something, alias field, defaulted user
- ok 15 - html returned contains value, alias field, defaulted user
- ok 16 - formField method returns something, uiLevel field, defaulted user
- ok 17 - html returned contains value, uiLevel field, defaulted user
|
1.27s |
100.0% |
|
t/SQL
|
- Called UNIVERSAL::can() as a function, not a method at /usr/lib/perl5/vendor_perl/5.10.0/DateTime/Locale.pm line 298
- 1..53
- ok 1 - read()
- ok 2 - array()
- ok 3 - arrayRef()
- ok 4 - geColumnNames()
- ok 5 - hash()
- ok 6 - hashRef()
- ok 7 - rows()
- ok 8 - finish()
- ok 9 - unconditionalRead()
- ok 10 - errorCode()
- ok 11 - errorMessage()
- ok 12 - quote()
- ok 13 - quote(0)
- ok 14 - quote('')
- ok 15 - quoteAndJoin()
- ok 16 - prepare() with placeholder
- ok 17 - execute()
- ok 18 - quickArray()
- ok 19 - quickScalar returns a scalar
- ok 20 - quickScalar returns the correct scalar
- ok 21 - write()
- ok 22 - quickCSV()
- ok 23 - quickHash()
- ok 24 - quickHashRef()
- ok 25 - quickCSV()
- ok 26 - buildArray()
- ok 27 - buildArrayRef()
- ok 28 - buildHash()
- ok 29 - buildHashRef()
- ok 30 - getNextId()
- ok 31 - setRow() - return ID
- ok 32 - setRow() - set data
- ok 33 - getRow()
- ok 34 - AutoCommits enabled by default
- ok 35 - AutoCommit disabled, transaction started.
- ok 36 - AutoCommits reenabled, null transaction finished
- ok 37 - AutoCommit disabled, transaction started.
- ok 38 - AutoCommits reenabled, aborted transaction finished
- ok 39 - beginTransaction returned successfully
- ok 40 - AutoCommit disabled, new transaction started
- ok 41 - access from second dbh on uncommitted data
- ok 42 - rollback called, no updates to table
- ok 43 - access from second dbh on uncommitted data
- ok 44 - rows inserted, committed
- ok 45 - access from second dbh on committed data
- ok 46 - buildArrayOfHashRefs, 1 column, no params
- ok 47 - buildArrayOfHashRefs, 2 columns, no params
- ok 48 - buildArrayOfHashRefs, 2 columns, different column order, no params
- ok 49 - buildArrayOfHashRefs, 2 columns, 1 param
- ok 50 - buildHashRefOfHashRefs, 1 column, no params
- ok 51 - buildHashRefOfHashRefs, 2 columns, no params
- ok 52 - buildHashRefOfHashRefs, 2 columns, 1 param
- ok 53 - Check table structure
|
1.39s |
100.0% |
|
t/Session
|
- Called UNIVERSAL::can() as a function, not a method at /usr/lib/perl5/vendor_perl/5.10.0/DateTime/Locale.pm line 298
- 1..4
- ok 1 - changing session user changes sessionId inside userSession table
- ok 2 - Set session user to Admin, check userId==3
- ok 3 - Set session user to Admin, check uiLevel==9
- ok 4 - The object isa WebGUI::SQL
|
1.22s |
100.0% |
|
t/Storage
|
- Called UNIVERSAL::can() as a function, not a method at /usr/lib/perl5/vendor_perl/5.10.0/DateTime/Locale.pm line 298
- 1..83
- ok 1 - uploadDir defined in config
- ok 2 - uploadDir defined in config
- ok 3 - uploadDir exists and is a directory
- ok 4 - get requires id to be passed
- ok 5 - storage will accept non GUID arguments isa WebGUI::Storage
- ok 6 - getId returns the requested GUID
- ok 7 - No errors during path creation
- ok 8 - No errors during path creation
- ok 9 - pathFrag returns correct value
- ok 10 - getPath: path calculated correctly for directory
- ok 11 - getPath: path calculated correctly for file
- ok 12 - getUrl: url calculated correctly for directory
- ok 13 - getUrl: url calculated correctly for file
- ok 14 - Storage location created and is a directory
- ok 15 - Storage location deleted
- ok 16 - No errors due to a shared common root
- ok 17 - Storage location 1 created and is a directory
- ok 18 - Storage location 2 created and is a directory
- ok 19 - Storage location 2 not touched
- ok 20 - Storage2 cleaned up properly
- ok 21 - Error during creation of object due to short GUID
- ok 22 - No directories created for short guid
- ok 23 - The object isa WebGUI::Storage
- ok 24 - create returns valid sessionIds
- ok 25 - No errors during object creation
- ok 26 - directory created correctly
- ok 27 - processed filename returned by addFileFromScalar
- ok 28 - file was created as a text file
- ok 29 - file is the right size
- ok 30 - getFileSize returns correct size
- ok 31 - file contents match
- ok 32 - getFileContentsAsScalar matches
- ok 33 - getFileContentsAsScalar did not change $/
- ok 34 - no extension
- ok 35 - dot, but no extension
- ok 36 - simple extension
- ok 37 - extensions are all lowercase
- ok 38 - multiple extensions return last extension
- ok 39 - addFileFromHashRef creates file
- ok 40 - getFileContentsAsHashref: thawed hash correctly
- ok 41 - copyFile created file with new name
- ok 42 - copyFile original file still exists
- ok 43 - renameFile created file with new name
- ok 44 - rename file original file is gone
- ok 45 - addFileFromFilesystem: file added from test collateral area
- ok 46 - copy: both storage objects have the same files
- ok 47 - copy: passing explicit variable
- ok 48 - copy: passing explicit variable and files to copy
- ok 49 - storage1 has 4 files
- ok 50 - deleteFile: deleted 1 file
- ok 51 - deleteFile: deleted 1 file
- ok 52 - deleteFile: deleted another file
- ok 53 - deleteFile: storage1 has only 1 file
- ok 54 - set up a file for deleteFile to try and delete illegally
- ok 55 - deleteFile into another storage returns undef
- ok 56 - deleteFile did not delete the file in another storage object
- ok 57 - createTemp creates WebGUI::Storage object isa WebGUI::Storage
- ok 58 - createTemp puts stuff in the temp directory
- ok 59 - createTemp: directory was created
- ok 60 - tar: returns a WebGUI::Storage object isa WebGUI::Storage
- ok 61 - tar: puts stuff in the temp directory
- ok 62 - tar: storage contains only the tar file
- ok 63 - tar did not reuse the same path as the source storage object
- ok 64 - untar: returns a WebGUI::Storage object isa WebGUI::Storage
- ok 65 - untar: puts stuff in the temp directory
- ok 66 - tar and untar loop preserve all files
- ok 67 - untar did not reuse the same path as the tar storage object
- ok 68 - copiedStorage has some files
- ok 69 - clear removed all files from copiedStorage
- ok 70 - clear removed _all_ files from copiedStorage, except for . and ..
- ok 71 - Starting with an empty storage object, no files in here except for . and ..
- ok 72 - getFiles() by default does not return dot files
- ok 73 - getFiles(1) returns all files, including dot files
- ok 74 - getFiles() returns normal files
- ok 75 - getFiles(1) returns all files, including dot files
- ok 76 - addFileFromFormPost returns empty string when HTTP status is 413
- ok 77 - addFileFromFormPost returns empty string when asking for a form variable with no files attached
- ok 78 - Return the name of the uploaded file
- ok 79 - no extension uses unknown icon
- ok 80 - valid extension, lower case works
- ok 81 - valid extension, upper case works
- ok 82 - unknown extension
- ok 83 - CWD must remain the same after addFileFromFilesystem, tar, untar, etc...
|
1.27s |
100.0% |
|
t/Text
|
- Called UNIVERSAL::can() as a function, not a method at /usr/lib/perl5/vendor_perl/5.10.0/DateTime/Locale.pm line 298
- 1..18
- ok 1 - joinCSV basic
- ok 2 - splitCSV basic
- ok 3 - joinCSV inside null
- ok 4 - splitCSV inside null
- ok 5 - joinCSV end null
- ok 6 - splitCSV end null
- ok 7 - joinCSV start null
- ok 8 - splitCSV start null
- ok 9 - joinCSV all null
- ok 10 - splitCSV all null
- ok 11 - joinCSV single null
- ok 12 - splitCSV single null
- ok 13 - joinCSV escape commas
- ok 14 - splitCSV escape commas
- ok 15 - joinCSV escape double quotes
- ok 16 - splitCSV escape double quotes
- ok 17 - joinCSV cruel embedded newlines
- ok 18 - splitCSV cruel embedded newlines
|
1.06s |
100.0% |
|
t/User
|
- Called UNIVERSAL::can() as a function, not a method at /usr/lib/perl5/vendor_perl/5.10.0/DateTime/Locale.pm line 298
- 1..196
- ok 1 - new("new") -- object reference is defined
- ok 2 - new("new") -- profile subhash exists
- ok 3 - username() method
- ok 4 - lastUpdated() -- username change
- ok 5 - userId() returns sane value
- ok 6 - User added to group 2 by default
- ok 7 - User added to group 7 by default
- ok 8 - status("Active")
- ok 9 - lastUpdated() -- status change
- ok 10 - status("Selfdestructed")
- ok 11 - status("Deactivated")
- ok 12 - profileField() get/set
- ok 13 - lastUpdated() -- profileField
- ok 14 - getting non-existant profile fields returns undef
- ok 15 - getting profile fields not cached in the user object returns the profile field default
- ok 16 - ... wg_privacySettings may not be retrieved
- ok 17 - ... wg_privacySettings may not be set
- ok 18 - authMethod() -- default value is WebGUI
- ok 19 - authMethod() -- set to LDAP
- ok 20 - authMethod() -- set back to WebGUI
- ok 21 - lastUpdated() -- authmethod change
- ok 22 - dateCreated()
- ok 23 - karma() -- requires amount, source and description
- ok 24 - karma() -- get/set add amount
- ok 25 - karma() -- get/set source
- ok 26 - karma() -- get/set description
- ok 27 - karma() -- get/set subtract amount
- ok 28 - referringAffiliate() -- get/set
- ok 29 - lastUpdated() -- referringAffiliate
- ok 30 - addToGroups() -- added to first test group
- ok 31 - addToGroups() -- added to second test group
- ok 32 - deleteFromGroups() -- removed from first test group
- ok 33 - deleteFromGroups() -- removed from second test group
- ok 34 - delete() -- users table
- ok 35 - delete() -- userProfileData table
- ok 36 - delete() -- inbox table
- ok 37 - new() -- override user id
- ok 38 - new() -- retrieve existing user
- ok 39 - new() -- returns visitor with no args
- ok 40 - non-existant ID returns valid user object isa WebGUI::User
- ok 41 - new() -- override user id
- ok 42 - authMethod() -- set to LDAP
- ok 43 - Visitor has a valid userId
- ok 44 - Admin has a valid userId
- ok 45 - random illegal Id \#1
- ok 46 - random illegal Id \#2
- ok 47 # skip uncache() -- Don't know how to test uncache()
- ok 48 - content manager name check
- ok 49 - content manager groupId check
- ok 50 - Admin default uiLevel = 9
- ok 51 - Visitor gets the default uiLevel of 5
- ok 52 - userSession setup correctly
- ok 53 - Visitor is not member of group
- ok 54 - Admin is member of group
- ok 55 - Admin user is in admins group
- ok 56 - ipFilter assignment to local net, 194.168.0.0/24
- ok 57 - Visitor is allowed in via IP
- ok 58 - User checks out as visitor
- ok 59 - User that isn't an admin doesn't look like admin
- ok 60 - Visitor is not allowed in via IP
- ok 61 - addToGroups: New user is in group 7(Everyone)
- ok 62 - New user not in group 1 (Visitors)
- ok 63 - User is not a visitor
- ok 64 - addToGroups: New user is in group 3(Admin)
- ok 65 - New user is in group 11(Secondary Admins)
- ok 66 - New user is in group 12(Turn On Admin)
- ok 67 - New user is in group 13(Export Managers)
- ok 68 - New user is in group 14(Product Managers)
- ok 69 - deleteFromGroups: New user is not in group 3(Admin)
- ok 70 - New user not in group 11 (Secondary Admins)
- ok 71 - New user not in group 12 (Turn On Admin)
- ok 72 - New user not in group 13 (Export Managers)
- ok 73 - New user not in group 14 (Product Managers)
- ok 74 - isInGroup, default group is 3
- ok 75 - Visitor is a member of group Visitor
- ok 76 - Visitor is a member of group Everyone
- ok 77 - Visitor is a not member of group 2 (Registered Users)
- ok 78 - deleteFromGroups() -- Visitor removed from Visitor group
- ok 79 - deleteFromGroups() -- Visitor removed from Everyone group
- ok 80 - isInGroup: Visitor is in group Visitor, hardcoded
- ok 81 - isInGroup: Everyone is in group Everyone, hardcoded
- ok 82 - isInGroup: Checking for membership in a non-existant group
- ok 83 - Visitor added back to group Visitor
- ok 84 - Visitor added back to group Everyone
- ok 85 - canUseAdminMode: newly created users cannot
- ok 86 - user successfully added to group 12
- ok 87 - canUseAdminMode: with no subnets set, user canUseAdminMode
- ok 88 - user is not in group 12
- ok 89 - canUseAdminMode: just being in the subnet does not allow adminMode access
- ok 90 - canUseAdminMode: with no subnets set, user canUseAdminMode
- ok 91 - canUseAdminMode: even with the right group permission, user must be in subnet if subnet is set
- ok 92 - canUseAdminMode: multiple IP settings, first IP range
- ok 93 - canUseAdminMode: multiple IP settings, second IP range
- ok 94 - newByEmail returns undef if you look up the Visitor
- ok 95 - newByEmail returns undef if email address cannot be found
- ok 96 - newByEmail returns undef if the user does not have a username
- ok 97 - newByEmail returns a valid user object isa WebGUI::User
- ok 98 - ... and it has the right username
- ok 99 - newByUsername returns undef if you look up the Visitor
- ok 100 - newByUsername returns undef if username cannot be found
- ok 101 - newByUsername returns undef if the user does not have a username
- ok 102 - newByUsername returns a valid user object isa WebGUI::User
- ok 103 - ... and it is the right user object
- ok 104 - buster received original user profile on user creation
- ok 105 - default timeZone set to America/Hillsboro
- ok 106 - extras field for profileField
- ok 107 - busterCopy received updated user profile because there is no username set in his cached user object
- ok 108 - default alias set
- ok 109 - alias set to username since the default alias has only non-word characters
- ok 110 - profile field with default data value that is a list returns a string with all values as CSV
- ok 111 - userProfile dataDefault is not executed when creating users
- ok 112 - Dude belongs to Registered Users, Everyone and T.O.A
- ok 113 - Dude belongs to Registered Users, Everyone as unexpired group memberships
- ok 114 - Accessing the list of groups does not change the cached value
- ok 115 - Accessing the cached list of groups does not change the cached value
- ok 116 - with no profile settings, getFirstName returns undef
- ok 117 - username is the lower priority profile setting for getFirstName
- ok 118 - alias is the middle priority profile setting for getFirstName
- ok 119 - firstName is the highest priority profile setting for getFirstName
- ok 120 - with no profile settings, getWholeName returns undef
- ok 121 - username is the lower priority profile setting for getWholeName
- ok 122 - alias is the middle priority profile setting for getWholeName
- ok 123 - must have firstName and lastName to override alias
- ok 124 - If firstName and lastName are true, wholeName is the concatenation of the both
- ok 125 - neighbor is not onLine (no userSession entry)
- ok 126 - neighbor is onLine
- ok 127 - neighbor is onLine (lastPageViews=599)
- ok 128 - neighbor is not onLine (lastPageViews=601)
- ok 129 - identifier: by default, new users have an undefined password with created through the API
- ok 130 - identifier: setting the identifier returns the new identifier
- ok 131 - identifier: testing fetch of newly set password
- ok 132 - friends returns a Group object isa WebGUI::Group
- ok 133 - second fetch returns the cached group object from the user object
- ok 134 - friends: fetching group object when group exists but is not cached
- ok 135 - acceptsPrivateMessages: visitor cannot receive private messages
- ok 136 - ... never accept private messages from yourself
- ok 137 - ... when allowPrivateMessages=all, anyone can send messages
- ok 138 - acceptsPrivateMessages: when allowPrivateMessages=all, visitor can't send messages
- ok 139 - ... when allowPrivateMessages=none, no one can send messages
- ok 140 - ... when allowPrivateMessages=friends, only friends can send me messages
- ok 141 - ... add $friend to $neighbor friendsGroup, now he can send me messages
- ok 142 - ... illegal profile field doesn't allow messages to be received from anyone
- ok 143 - getGroupIdsRecursive returns the correct set of groups, ignoring expire date and not duplicating groups
- ok 144 - create() throws if no session passed
- ok 145 - ... and if an object other than a Session is passed
- ok 146 - create() returns something
- ok 147 - create() returns a WebGUI::User isa WebGUI::User
- ok 148 - getProfileUrl: passing a page
- ok 149 - getProfileUrl: uses profileModuleIdentifier to pick the right Account module
- ok 150 - getProfileUrl: uses session->url->page if no URL is passed in
- ok 151 - hasFriends, user has no friends
- ok 152 - hasFriends, user has a friend
- ok 153 - acceptsFriendsRequests: returns 0 unless you give it an object
- ok 154 - ... returns 0 unless you give it a user object
- ok 155 - ... visitor cannot have friends
- ok 156 - ... visitor cannot be a friend
- ok 157 - ... cannot be your own friend
- ok 158 - ... cannot accept requests if you are already a friend
- ok 159 - ... follows ableToBeFriend=0
- ok 160 - ... follows ableToBeFriend=1
- ok 161 - profileIsViewable: is a WebGUI::User method
- ok 162 - ... visitors profile is not viewable, even if publicProfile=all
- ok 163 - ... visitor cannot see his own profile
- ok 164 - ... you may always see your own profile field
- ok 165 - ... visitor permission follows publicProfile=none
- ok 166 - ... visitor permission follows publicProfile=none, even admin
- ok 167 - ... visitor permission follows publicProfile=all
- ok 168 - ... visitor permission follows publicProfile=all, even visitor
- ok 169 - ... visitor permission follows publicProfile=friend, not a friend
- ok 170 - ... visitor permission follows publicProfile=friend, now a friend
- ok 171 - getProfileFieldPrivacySetting: returns a HASH if called with no params isa HASH
- ok 172 - ...with no argument, it returns undef
- ok 173 - ...with an empty hashref, it returns undef
- ok 174 - setProfileFieldPrivacySetting: returns a HASH if called with valid params isa HASH
- ok 175 - ...get and set 1 profile field privacy setting
- ok 176 - ...set will not set invalid profile settings
- ok 177 - ...get on a user with existing settings
- ok 178 - ...the privacy field always returns "none"
- ok 179 - updateProfileFields: set firstName
- ok 180 - ... set lastName, too
- ok 181 - canViewField: returns 0 unless you pass it nothing
- ok 182 - ... returns 0 unless you pass it a fieldName and no user object
- ok 183 - ... user can always view their own fields
- ok 184 - ... even if they do not exist
- ok 185 - ... returns 0 unless the field has a valid privacy setting
- ok 186 - ... returns 1 when the field's privacy setting is all
- ok 187 - ... returns 1 when the field's privacy setting is all, even for visitor
- ok 188 - ... returns 1 when the field's privacy setting is all, even for some other user
- ok 189 - ... returns 0 when the field's privacy setting is none for a friend
- ok 190 - ... returns 0 when the field's privacy setting is none, even for admin
- ok 191 - ... returns 0 when the field's privacy setting is none, even for some other user
- ok 192 - ... returns 1 when the field's privacy setting is friends, for a friend
- ok 193 - ... returns 0 when the field's privacy setting is friends, even for admin
- ok 194 - ... returns 0 when the field's privacy setting is friends, even for some other user
- ok 195 - no new additional users were leaked by this test
- ok 196 - no new additional groups were leaked by this test
|
2.23s |
100.0% |
|
t/Utility
|
- Called UNIVERSAL::can() as a function, not a method at /usr/lib/perl5/vendor_perl/5.10.0/DateTime/Locale.pm line 298
- 1..44
- ok 1 - commify() - no comma needed
- ok 2 - commify() - single comma
- ok 3 - commify() - multiple commas
- ok 4 - formatBytes() - bytes
- ok 5 - formatBytes() - kilobytes
- ok 6 - formatBytes() - megabytes
- ok 7 - isBetween() - negative and positive range
- ok 8 - isBetween() - negative and positive range, reversed
- ok 9 - isBetween() - positive range
- ok 10 - isBetween() - negative range
- ok 11 - isBetween() - not in range on high side
- ok 12 - isBetween() - not in range on low side
- ok 13 - isIn()
- ok 14 - makeArrayCommaSafe()
- ok 15 - makeCommaSafe()
- ok 16 - makeCommaSafe()
- ok 17 - makeCommaSafe()
- ok 18 - makeTabSafe()
- ok 19 - makeCommaSafe(): clearing tabs
- ok 20 - makeCommaSafe(): clearing tabs, newlines and carriage returns
- ok 21 - makeArrayTabSafe
- ok 22 - randint()
- ok 23 - randint() with default params
- ok 24 - randint() auto reverses params if they are backwards
- ok 25 # skip Don't know how to test randomizeArray.
- ok 26 # skip Don't know how to test randomizeHash.
- ok 27 - round() - 0 significant digits
- ok 28 - round() - multiple significant digits
- ok 29 - round() - rounds up, too
- ok 30 - sortHash
- ok 31 - sortHashDescending
- ok 32 - isInSubnet: comparing against an empty array ref
- ok 33 - isInSubnet: comparing against an exact match
- ok 34 - isInSubnet: comparing against a mismatch
- ok 35 - isInSubnet: comparing against a match with mask
- ok 36 - isInSubnet: ip is out of range
- ok 37 - isInSubnet: mask is out of range
- ok 38 - isInSubnet: ip has too many dots
- ok 39 - isInSubnet: ip has too few dots
- ok 40 - isInSubnet: ip is missing mask
- ok 41 - isInSubnet: ip has an out of range quad
- ok 42 - isInSubnet: ip has an out of range quad
- ok 43 - isInSubnet: ip has an out of range quad
- ok 44 - isInSubnet: ip has an out of range quad
|
1.09s |
100.0% |
|
t/VersionTag
|
- Called UNIVERSAL::can() as a function, not a method at /usr/lib/perl5/vendor_perl/5.10.0/DateTime/Locale.pm line 298
- 1..60
- ok 1 - WebGUI::VersionTag->can('getVersionTagMode')
- ok 2 - versionTagMode: both site and user setting multiPerUser
- ok 3 - versionTagMode: user setting singlePerUser overrides site setting
- ok 4 - versionTagMode: update site setting doesn't update user setting
- ok 5 - versionTagMode: update user setting to multiPerUser
- Called UNIVERSAL::can() as a function, not a method at /usr/lib/perl5/vendor_perl/5.10.0/DateTime/TimeZone.pm line 77
- ok 6 - empty tag isa WebGUI::VersionTag
- ok 7 - empty tag has an ID
- ok 8 - empty tag has zero assets
- ok 9 - empty tag has zero revisions
- ok 10 - empty tag asset list isa ARRAY
- ok 11 - empty tag asset list is empty
- ok 12 - empty tag is in open tag list
- ok 13 - no working tag initially present
- ok 14 - working tag set
- ok 15 - working tag unset
- ok 16 - tag is initially unlocked
- ok 17 - tag is locked
- ok 18 - locked tag is not in open tag list
- ok 19 - tag is again unlocked
- ok 20 - unlocked tag is in open tag list
- ok 21 - tag retrieved again while valid isa WebGUI::VersionTag
- ok 22 - tag retrieved again has same ID
- ok 23 - second tag can be created isa WebGUI::VersionTag
- ok 24 - second tag has different ID
- ok 25 - working tag set to first
- ok 26 - working tag set to second
- ok 27 - working tag still set to second
- ok 28 - working tag now unset from second
- ok 29 - nonexistent tag is not in open tag list
- ok 30 - nonexistent tag cannot be instantiated
- ok 31 - tag with two assets
- ok 32 - tag with two revisions
- ok 33 - tag with five revisions
- ok 34 - other tag with one asset
- ok 35 - other tag with one revision
- ok 36 - other tag still with one asset
- ok 37 - other tag with two revisions
- ok 38 - original tag still with two assets
- ok 39 - original tag still with five revisions
- ok 40 - versionTagMode singlePerUser: no working tag initially present
- ok 41 - versionTagMode singlePerUser: empty tag isa WebGUI::VersionTag
- ok 42 - versionTagMode singlePerUser: empty tag has an ID
- ok 43 - versionTagMode singlePerUser: empty is not site wide
- ok 44 - versionTagMode singlePerUser: reclaim version tag after clearWorking
- ok 45 - versionTagMode singlePerUser: reclaimed version tag has same id
- ok 46 - versionTagMode siteWide: no working tag initially present
- ok 47 - versionTagMode siteWide: empty tag isa WebGUI::VersionTag
- ok 48 - versionTagMode ssiteWide: empty is site wide
- ok 49 - versionTagMode siteWide: empty tag has an ID
- ok 50 - versionTagMode siteWide: siteWide tag has different version tag id
- ok 51 - versionTagMode siteWide: reclaim version tag after clearWorking and addding new asset
- ok 52 - versionTagMode siteWide: reclaim site wide version tag has correct id
- ok 53 - versionTagMode siteWide + admin singlePerUser: empty tag isa WebGUI::VersionTag
- ok 54 - versionTagMode siteWide + admin singlePerUser: empty tag has an ID
- ok 55 - versionTagMode siteWide + admin singlePerUser: empty is not site wide
- ok 56 - versionTagMode siteWide + admin singlePerUser: empty has different ID
- ok 57 - versionTagMode siteWide + admin singlePerUser: empty has different ID than site wide
- ok 58 - versionTagMode siteWide + admin inherited: reclaimed empty tag isa WebGUI::VersionTag
- ok 59 - versionTagMode siteWide + admin inherited: empty is site wide
- ok 60 - versionTagMode siteWide + admin inherited: empty has same ID as site wide
|
1.55s |
100.0% |
|
t/WebGUI_conf
|
- Called UNIVERSAL::can() as a function, not a method at /usr/lib/perl5/vendor_perl/5.10.0/DateTime/Locale.pm line 298
- 1..3
- ok 1 - WebGUI.conf.original exists
- ok 2 - The file is not empty
- #
- ok 3 - JSON is valid
|
1.04s |
100.0% |
|
t/Whitespace
|
|
1.81s |
100.0% |
|
t/Workflow
|
- Called UNIVERSAL::can() as a function, not a method at /usr/lib/perl5/vendor_perl/5.10.0/DateTime/Locale.pm line 298
- 1..67
- ok 1 - can create workflow
- ok 2 - workflow isa WebGUI::Workflow
- ok 3 - workflow has an ID
- ok 4 - Workflow has a valid Id
- ok 5 - workflow can be retrieved
- ok 6 - workflow title is set
- ok 7 - workflow description is set
- ok 8 - workflow type is set
- ok 9 - workflow is not enabled
- ok 10 - workflow has no activities
- ok 11 - workflow has no instances
- ok 12 - workflow has no crons
- ok 13 - getList returns a hashref isa HASH
- ok 14 - workflow not in enabled list
- ok 15 - There are eleven default workflows, of all types, shipped with WebGUI
- ok 16 - workflow is enabled
- ok 17 - workflow in enabled list
- ok 18 - workflow is disabled again
- ok 19 - There is only 1 WebGUI::User based workflow that ships with WebGUI
- ok 20 - Enable workflow again
- ok 21 - Workflow is enabled after setting the description
- ok 22 - default mode for created workflows is parallel
- ok 23 - Is not singleton
- ok 24 - Is not serial
- ok 25 - Is not realtime, and never will be
- ok 26 - Is parallel
- ok 27 - Is checks after setting mode to serial
- ok 28 - Is checks after setting mode to singleton
- ok 29 - Is checks after setting mode to singleton
- ok 30 - Is checks after setting mode to singleton
- ok 31 - After setting description, workflow is still singleton
- ok 32 - deleted workflow cannot be retrieved
- ok 33 - can create version tag workflow
- ok 34 - workflow isa WebGUI::Workflow
- ok 35 - can create activity
- ok 36 - activity isa WebGUI::Workflow::Activity::UnlockVersionTag
- ok 37 - activity isa WebGUI::Workflow::Activity
- ok 38 - activity has an ID
- ok 39 - workflow has one activity
- ok 40 - Workflow has the correct activity
- not ok 41 - cannot create mismatched activity # TODO Tests that test things that do not work yet
- # Failed (TODO) test 'cannot create mismatched activity'
- # at t/Workflow.t line 116.
- not ok 42 - workflow still has one activity # TODO Tests that test things that do not work yet
- # Failed (TODO) test 'workflow still has one activity'
- # at t/Workflow.t line 117.
- # got: '2'
- # expected: '1'
- ok 43 - can create cron
- ok 44 - cron isa WebGUI::Workflow::Cron
- ok 45 - workflow has one cron
- ok 46 - one cron is same cron
- ok 47 - workflow created with all defaults isa WebGUI::Workflow
- ok 48 - Default title is Untitled
- ok 49 - Default description is undefined
- ok 50 - Default type is None
- ok 51 - By default, enabled is 0
- ok 52 - Default mode is parallel
- ok 53 - getNextActivity returns a Workflow::Activity object isa WebGUI::Workflow::Activity
- ok 54 - getNextActivity returns the activity after the specified activity
- ok 55 - getNextActivity returns undef if there is no next activity
- ok 56 - getNextActivity returns a Workflow::Activity object isa WebGUI::Workflow::Activity
- ok 57 - getActivity returns the requested activity by activityId
- ok 58 - getActivities returns activties in the order they were added to the Workflow
- ok 59 - demote works on first activity, even though it does not move
- ok 60 - promote works on last activity, even though it does not move
- ok 61 - demote activity works
- ok 62 - promote activity works
- ok 63 - delete activity works
- ok 64 - delete activity requires a valid activityId to delete
- ok 65 - delete updates the sequence numbers of its activities
- ok 66 - Manual delete of an activity does not update the sequence numbers
- ok 67 - reorder activities works
|
1.30s |
100.0% |
|
t/hardcodedExtras
|
- Called UNIVERSAL::can() as a function, not a method at /usr/lib/perl5/vendor_perl/5.10.0/DateTime/Locale.pm line 298
- 1..1
- not ok 1 - Asset with hardcoded extras url: Default Carousel, id: CarouselTmpl0000000001, url: /root/import/carousel/carousel-default
- # Failed test 'Asset with hardcoded extras url: Default Carousel, id: CarouselTmpl0000000001, url: /root/import/carousel/carousel-default'
- # at t/hardcodedExtras.t line 90.
- # Looks like you failed 1 test of 1.
- exit status: 1, wait status: 256
|
3.98s |
0.0% |
|
t/mandatory_template_vars
|
- Called UNIVERSAL::can() as a function, not a method at /usr/lib/perl5/vendor_perl/5.10.0/DateTime/Locale.pm line 298
- 1..47
- ok 1 - PBtmpl0000000000000137 exists
- ok 2 - PBtmpl0000000000000001 exists
- ok 3 - Checking for application.workarea of type var in Admin Console, id=PBtmpl0000000000000001
- ok 4 - Checking for application_loop of type loop in Admin Console, id=PBtmpl0000000000000001
- ok 5 - PBtmplHelp000000000001 exists
- ok 6 - Checking for body of type var in Help, id=PBtmplHelp000000000001
- ok 7 - Checking for fields of type loop in Help, id=PBtmplHelp000000000001
- ok 8 - Checking for fields of type if in Help, id=PBtmplHelp000000000001
- ok 9 - PBtmpl0000000000000010 exists
- ok 10 - PBtmpl0000000000000011 exists
- ok 11 - PBtmpl0000000000000012 exists
- ok 12 - PBtmpl0000000000000013 exists
- ok 13 - PBtmpl0000000000000014 exists
- ok 14 - PBtmpl0000000000000020 exists
- ok 15 - Checking for field.isRequired of type if in Mail Form, id=PBtmpl0000000000000020
- ok 16 - matrixtmpl000000000001 exists
- ok 17 - Checking for controls of type var in Matrix Default View, id=matrixtmpl000000000001
- ok 18 - PBtmpl0000000000000002 exists
- ok 19 - Checking for controls of type var in Default Article, id=PBtmpl0000000000000002
- ok 20 - DashboardViewTmpl00001 exists
- ok 21 - Checking for controls of type var in Dashboard Default View, id=DashboardViewTmpl00001
- ok 22 - PBtmpl0000000000000141 exists
- ok 23 - Checking for controls of type var in Default DataForm, id=PBtmpl0000000000000141
- ok 24 - PBtmpl0000000000000078 exists
- ok 25 - Checking for controls of type var in File Folder, id=PBtmpl0000000000000078
- ok 26 - PBtmpl0000000000000033 exists
- ok 27 - Checking for controls of type var in Default HTTP Proxy, id=PBtmpl0000000000000033
- ok 28 - PBtmpl0000000000000054 exists
- ok 29 - Checking for controls of type var in Default Page, id=PBtmpl0000000000000054
- ok 30 - PBtmpl0000000000000047 exists
- ok 31 - Checking for controls of type var in Default Message Board, id=PBtmpl0000000000000047
- ok 32 - MultiSearchTmpl0000001 exists
- ok 33 - Checking for controls of type var in MultiSearch Default Display, id=MultiSearchTmpl0000001
- ok 34 - PBtmpl0000000000000048 exists
- ok 35 - Checking for controls of type var in verticalMenu, id=PBtmpl0000000000000048
- ok 36 - PBtmpl0000000000000055 exists
- ok 37 - Checking for controls of type var in Default Poll, id=PBtmpl0000000000000055
- ok 38 - PBtmpl0000000000000059 exists
- ok 39 - Checking for controls of type var in Default SQL Report, id=PBtmpl0000000000000059
- ok 40 - StockDataTMPL000000001 exists
- ok 41 - Checking for controls of type var in StockData Default View, id=StockDataTMPL000000001
- ok 42 - PBtmpl0000000000000061 exists
- ok 43 - Checking for controls of type var in Default Survey, id=PBtmpl0000000000000061
- ok 44 - PBtmpl0000000000000065 exists
- ok 45 - Checking for controls of type var in Default Syndicated Content, id=PBtmpl0000000000000065
- ok 46 - WeatherDataTmpl0000001 exists
- ok 47 - Checking for controls of type var in WeatherData Default View, id=WeatherDataTmpl0000001
|
1.13s |
100.0% |
|
t/oneOff
|
- Called UNIVERSAL::can() as a function, not a method at /usr/lib/perl5/vendor_perl/5.10.0/DateTime/Locale.pm line 298
- 1..1
- ok 1
- # Survey Overview Template
- # The template that provides an overview of the survey.
|
1.07s |
100.0% |
|
t/splitTag
|
- Called UNIVERSAL::can() as a function, not a method at /usr/lib/perl5/vendor_perl/5.10.0/DateTime/Locale.pm line 298
- 1..10
- ok 1 - get one paragraph, no defaults
- ok 2 - get one paragraph, all defaults
- ok 3 - get all paragraphs, no defaults
- ok 4 - get all paragraphs, default tag
- ok 5 - get nonblank paragraph, all defaults
- ok 6 - get nonblank(nbsp) paragraph, all defaults
- ok 7 - get all list items, no defaults
- ok 8 - get first 2 list items, no defaults
- ok 9 - get table row ignore table data
- ok 10 - get table data ignore table row
|
1.04s |
100.0% |
|
t/stuffInbox
|
- Called UNIVERSAL::can() as a function, not a method at /usr/lib/perl5/vendor_perl/5.10.0/DateTime/Locale.pm line 298
- 1..1
- ok 1
- Called UNIVERSAL::can() as a function, not a method at /usr/lib/perl5/vendor_perl/5.10.0/DateTime/TimeZone.pm line 77
|
1.27s |
100.0% |
|
t/syntaxCheck
|
|
40.80s |
99.9% |
|
t/templateChecker
|
|
1.64s |
100.0% |