_caldav__PROPFIND_thunderbird (private)
_caldav__PROPFIND_thunderbird
Defined in packages/caldav/tcl/test/caldav-test-procs.tcl
- Partial Call Graph (max 5 caller/called nodes):
- Testcases:
- No testcase defined.
Source code: set _aa_export {} set body_count 1 foreach testcase_body {{ set info [::caldav::test::basic_setup] set user_info [dict get $info user_info] try { # # Tests based on user-agent Mozilla/5.0 (X11; Linux x86_64; # rv:52.0) Gecko/20100101 Thunderbird/52.6.0 Lightning/5.4.6) # aa_log "PROFIND /caldav/calendar with Depth 0" set d [::acs::test::http -user_info $user_info -method PROPFIND -headers {Content-Type text/xml Depth 0} -body [::caldav::test::propfind_body <CS:getctag/>] /caldav/calendar] aa_equals "Status code valid" [dict get $d status] 207 set xml [dict get $d body] aa_log "Result body:<pre>\n[::aa_test::visualize_control_chars $xml]</pre>" ::caldav::test::foreach_response response $xml { ::acs::test::xpath::non_empty $response { d:propstat/d:prop/cs:getctag } } # # Run PROFIND to check ctag with Depth 1 # aa_log "PROFIND /caldav/calendar with Depth 1" set d [::acs::test::http -user_info $user_info -method PROPFIND -headers {Content-Type text/xml Depth 1} -body [::caldav::test::propfind_body "<D:getcontenttype/><D:resourcetype/><D:getetag/>"] /caldav/calendar] aa_equals "Status code valid" [dict get $d status] 207 set xml [dict get $d body] aa_log "Result body:<pre>\n[::aa_test::visualize_control_chars $xml]</pre>" ::caldav::test::foreach_response response $xml { set href [::acs::test::xpath::get_text $response d:href] aa_log "href: $href" if {$href eq "/caldav/calendar/"} { ::acs::test::xpath::non_empty $response { d:propstat/d:prop/d:getcontenttype } ::acs::test::xpath::equals $response { d:propstat/d:prop/d:getetag "" } } else { aa_true "href for calitem ends with .ics" [string match *ics $href] ::acs::test::xpath::non_empty $response { d:propstat/d:prop/d:getcontenttype d:propstat/d:prop/d:getetag } } } } on error {errorMsg} { aa_true "Error msg: $errorMsg" 0 } finally { #calendar::delete -calendar_id $temp_calendar_id } }} { aa_log "Running testcase body $body_count" set ::__aa_test_indent [info level] set catch_val [catch $testcase_body msg] if {$catch_val != 0 && $catch_val != 2} { aa_log_result "fail" "PROPFIND_thunderbird (body $body_count): Error during execution: $msg, stack trace: \n$::errorInfo" } incr body_count }XQL Not present: Generic, PostgreSQL, Oracle