fs::impl::fs_object::mkcol (private)

 fs::impl::fs_object::mkcol

Defined in packages/file-storage/tcl/file-storage-dav-procs.tcl

MKCOL method

Partial Call Graph (max 5 caller/called nodes):

Testcases:

No testcase defined.

Source code:

    set uri [oacs_dav::conn uri]
    set user_id [oacs_dav::conn user_id]
    set peer_addr [oacs_dav::conn peeraddr]
    set item_id [oacs_dav::conn item_id]
    set fname [oacs_dav::conn item_name]
    set parent_id [oacs_dav::item_parent_folder_id $uri]
    if {$parent_id eq ""} {
    return [list 409]
    }
    if { $item_id ne ""} {
    return [list 405]
    }

    if { [catch {
    fs::new_folder  -name $fname  -pretty_name $fname  -parent_id $parent_id  -creation_user $user_id  -creation_ip $peer_addr  } ]} {
    return [list 500]
    }

    return [list 201]

XQL Not present:

Generic, PostgreSQL, Oracle