note description: "Summary description for {CMS_FILE_UPLOAD_MODULE}." author: "fmurer" date: "$Date$" revision: "$Revision$" class CMS_FILE_UPLOAD_MODULE inherit CMS_MODULE rename module_api as file_upload_api redefine install end create make feature {NONE} -- Initialisation make do version := "1.0" description := "Service to upload a file" package := "file_upload" add_dependency({CMS_NODE_MODULE}) end feature -- Access name: STRING = "file_uploader" feature -- Access: router setup_router(a_router: WSF_ROUTER; a_api: CMS_API) -- do end feature -- Module Management install (api: CMS_API) -- install the module local sql_query: STRING do -- create the database if attached api.storage.as_sql_storage as l_sql_storage then if not l_sql_storage.sql_table_exists ("file_nodes") then sql := "[ CREATE TABLE file_nodes( `nid` INTEGER NOT NULL CHECK("nid">=0), `type` VARCHAR(255) NOT NULL, CONSTRAINT unique_id PRIMARY KEY nid ); ]" l_sql_storage.sql_execute_script (sql, void) if l_sql_storage.has_error then api.logger.put_error ("Could not initialize database for file_uploader module", generating_type) end end Precursor (api) end end end