Commit 2fb6ebef authored by Malte Sussdorff's avatar Malte Sussdorff

- Malte

parent c7ee67b1
Pipeline #87 failed with stages
......@@ -7,20 +7,22 @@
<initial-install-p>t</initial-install-p>
<singleton-p>t</singleton-p>
<version name="5.1.5" url="http://openacs.org/repository/download/apm/acs-messaging-5.1.5.apm">
<version name="5.3.1b1" url="http://openacs.org/repository/download/apm/acs-messaging-5.3.1b1.apm">
<owner url="mailto:akk+@cs.cmu.edu">Anukul Kapoor</owner>
<owner url="mailto:prevost@maya.com">John Prevost</owner>
<owner url="mailto:vinod@kurup.com">Vinod Kurup</owner>
<summary>General messaging for bboard and general comments.</summary>
<release-date>2004-02-28</release-date>
<release-date>2007-04-15</release-date>
<maturity>3</maturity>
<vendor url="http://openacs.org">OpenACS</vendor>
<license url="http://www.gnu.org/copyleft/gpl.html">GPL</license>
<maturity>3</maturity>
<description format="text/html">Provides generic message services, with email sending. acs-mail-lite and notifications are the
prefered packages for delivering this functionality and it is anticipated that this package will ultimately be deprecated.</description>
<provides url="acs-messaging" version="5.1.4"/>
<requires url="acs-content-repository" version="5.0.0"/>
<requires url="acs-kernel" version="5.0.0"/>
<provides url="acs-messaging" version="5.3.1b1"/>
<requires url="acs-content-repository" version="5.3.1b1"/>
<requires url="acs-kernel" version="5.3.1b1"/>
<callbacks>
</callbacks>
......
......@@ -17,9 +17,9 @@ begin
object_type => 'acs_message',
pretty_name => 'Message',
pretty_plural => 'Messages',
table_name => 'ACS_MESSAGES',
id_column => 'MESSAGE_ID',
name_method => 'ACS_MESSAGE.NAME'
table_name => 'acs_messages',
id_column => 'message_id',
name_method => 'acs_message.name'
);
acs_object_type.create_type (
......@@ -27,9 +27,7 @@ begin
object_type => 'acs_message_revision',
pretty_name => 'Message Revision',
pretty_plural => 'Message Revisions',
table_name => 'CR_REVISIONS',
id_column => 'REVISION_ID',
name_method => 'ACS_OBJECT.DEFAULT_NAME'
name_method => 'acs_object.default_name'
);
end;
......@@ -42,7 +40,7 @@ create table acs_messages ( -- extends cr_items
message_id integer
constraint acs_messages_message_id_fk
references cr_items (item_id) on delete cascade
constraint acs_messages_pk
constraint acs_messages_message_id_pk
primary key,
-- we will need to find a way to make reply_to go to 0 instead of null
-- to improve scalability
......
......@@ -21,13 +21,14 @@ as
mime_type in cr_revisions.mime_type%TYPE default 'text/plain',
text in varchar2 default null,
data in cr_revisions.content%TYPE default null,
parent_id in cr_items.parent_id%TYPE default 0,
parent_id in cr_items.parent_id%TYPE default -4,
context_id in acs_objects.context_id%TYPE,
creation_date in acs_objects.creation_date%TYPE default sysdate,
creation_user in acs_objects.creation_user%TYPE default null,
creation_ip in acs_objects.creation_ip%TYPE default null,
object_type in acs_objects.object_type%TYPE default 'acs_message',
is_live in char default 't'
is_live in char default 't',
package_id in acs_objects.package_id%TYPE default null
) return acs_objects.object_id%TYPE;
function edit (
......@@ -88,7 +89,8 @@ as
creation_user in acs_objects.creation_user%TYPE default null,
creation_ip in acs_objects.creation_ip%TYPE default null,
is_live in char default 't',
storage_type in cr_items.storage_type%TYPE default 'file'
storage_type in cr_items.storage_type%TYPE default 'file',
package_id in acs_objects.package_id%TYPE default null
) return acs_objects.object_id%TYPE;
function edit_file (
......@@ -121,7 +123,8 @@ as
creation_user in acs_objects.creation_user%TYPE default null,
creation_ip in acs_objects.creation_ip%TYPE default null,
is_live in char default 't',
storage_type in cr_items.storage_type%TYPE default 'file'
storage_type in cr_items.storage_type%TYPE default 'file',
package_id in acs_objects.package_id%TYPE default null
) return acs_objects.object_id%TYPE;
function edit_image (
......@@ -151,7 +154,8 @@ as
parent_id in acs_objects.context_id%TYPE,
creation_date in acs_objects.creation_date%TYPE default sysdate,
creation_user in acs_objects.creation_user%TYPE default null,
creation_ip in acs_objects.creation_ip%TYPE default null
creation_ip in acs_objects.creation_ip%TYPE default null,
package_id in acs_objects.package_id%TYPE default null
) return cr_extlinks.extlink_id%TYPE;
function edit_extlink (
......@@ -187,13 +191,14 @@ as
mime_type in cr_revisions.mime_type%TYPE default 'text/plain',
text in varchar2 default null,
data in cr_revisions.content%TYPE default null,
parent_id in cr_items.parent_id%TYPE default 0,
parent_id in cr_items.parent_id%TYPE default -4,
context_id in acs_objects.context_id%TYPE,
creation_date in acs_objects.creation_date%TYPE default sysdate,
creation_user in acs_objects.creation_user%TYPE default null,
creation_ip in acs_objects.creation_ip%TYPE default null,
object_type in acs_objects.object_type%TYPE default 'acs_message',
is_live in char default 't'
is_live in char default 't',
package_id in acs_objects.package_id%TYPE default null
) return acs_objects.object_id%TYPE
is
v_message_id acs_messages.message_id%TYPE;
......@@ -226,7 +231,8 @@ as
creation_date => creation_date,
creation_user => creation_user,
creation_ip => creation_ip,
item_subtype => object_type
item_subtype => object_type,
package_id => package_id
);
insert into acs_messages
......@@ -394,7 +400,8 @@ as
creation_user in acs_objects.creation_user%TYPE default null,
creation_ip in acs_objects.creation_ip%TYPE default null,
is_live in char default 't',
storage_type in cr_items.storage_type%TYPE default 'file'
storage_type in cr_items.storage_type%TYPE default 'file',
package_id in acs_objects.package_id%TYPE default null
) return acs_objects.object_id%TYPE
is
v_file_id cr_items.item_id%TYPE;
......@@ -408,7 +415,8 @@ as
creation_date => creation_date,
creation_user => creation_user,
creation_ip => creation_ip,
storage_type => storage_type
storage_type => storage_type,
package_id => package_id
);
-- create an initial revision for the new attachment
......@@ -482,7 +490,8 @@ as
creation_user in acs_objects.creation_user%TYPE default null,
creation_ip in acs_objects.creation_ip%TYPE default null,
is_live in char default 't',
storage_type in cr_items.storage_type%TYPE default 'file'
storage_type in cr_items.storage_type%TYPE default 'file',
package_id in acs_objects.package_id%TYPE default null
) return acs_objects.object_id%TYPE
is
v_image_id cr_items.item_id%TYPE;
......@@ -496,7 +505,8 @@ as
creation_date => creation_date,
creation_user => creation_user,
creation_ip => creation_ip,
storage_type => storage_type
storage_type => storage_type,
package_id => package_id
);
-- create an initial revision for the new attachment
......@@ -580,7 +590,8 @@ as
parent_id in acs_objects.context_id%TYPE,
creation_date in acs_objects.creation_date%TYPE default sysdate,
creation_user in acs_objects.creation_user%TYPE default null,
creation_ip in acs_objects.creation_ip%TYPE default null
creation_ip in acs_objects.creation_ip%TYPE default null,
package_id in acs_objects.package_id%TYPE default null
) return cr_extlinks.extlink_id%TYPE
is
v_extlink_id cr_extlinks.extlink_id%TYPE;
......@@ -594,7 +605,8 @@ as
extlink_id => new_extlink.extlink_id,
creation_date => new_extlink.creation_date,
creation_user => new_extlink.creation_user,
creation_ip => new_extlink.creation_ip
creation_ip => new_extlink.creation_ip,
package_id => new_extlink.package_id
);
end new_extlink;
......
update acs_objects
set title = (select name
from cr_items
where item_id = object_id),
package_id = acs_object__package_id(content_item.get_root_folder(object_id))
where object_type = 'acs_message';
@@ ../acs-messaging-packages.sql
This diff is collapsed.
update acs_object_types set table_name=null, id_column=null where object_type='acs_message_revision';
......@@ -15,12 +15,12 @@ select acs_object_type__create_type (
'Message',
'Messages',
'content_item',
'ACS_MESSAGES',
'MESSAGE_ID',
'acs_messages',
'message_id',
null,
'f',
null,
'ACS_MESSAGE.NAME'
'acs_message__name'
);
select acs_object_type__create_type (
......@@ -28,12 +28,12 @@ select acs_object_type__create_type (
'Message Revision',
'Message Revisions',
'content_revision',
'CR_REVISIONS',
'REVISION_ID',
null,
null,
null,
'f',
null,
'ACS_OBJECT.DEFAULT_NAME'
'acs_object__default_name'
);
......@@ -43,7 +43,7 @@ create table acs_messages ( -- extends cr_items
message_id integer
constraint acs_messages_message_id_fk
references cr_items (item_id) on delete cascade
constraint acs_messages_pk
constraint acs_messages_message_id_pk
primary key,
-- we will need to find a way to make reply_to go to 0 instead of null
-- to improve scalability
......
......@@ -17,6 +17,9 @@ drop function acs_message__edit (integer,varchar,varchar,varchar,
drop function acs_message__new (integer,integer,timestamptz,integer,
varchar,varchar,varchar,varchar,varchar,text,
integer,integer,integer,varchar,varchar,boolean);
drop function acs_message__new (integer,integer,timestamptz,integer,
varchar,varchar,varchar,varchar,varchar,text,
integer,integer,integer,varchar,varchar,boolean,integer);
drop function acs_message__delete (integer);
drop function acs_message__message_p (integer);
drop function acs_message__send (integer,varchar,integer,timestamptz);
......@@ -25,18 +28,26 @@ drop function acs_message__first_ancestor (integer);
drop function acs_message__new_file (integer,integer,varchar,varchar,
text,varchar,text,timestamptz,integer,
varchar,boolean);
drop function acs_message__new_file (integer,integer,varchar,varchar,
text,varchar,text,timestamptz,integer,
varchar,boolean,integer);
drop function acs_message__edit_file (integer,varchar,text,varchar,
text,timestamptz,integer,varchar,boolean);
drop function acs_message__delete_file (integer);
drop function acs_message__new_image (integer,integer,varchar,varchar,
text,varchar,text,integer,integer,
timestamptz,integer,varchar,boolean);
drop function acs_message__new_image (integer,integer,varchar,varchar,
text,varchar,text,integer,integer,
timestamptz,integer,varchar,boolean,integer);
drop function acs_message__edit_image (integer,varchar,text,varchar,
text,integer,integer,timestamptz,integer,
varchar,boolean);
drop function acs_message__delete_image (integer);
drop function acs_message__new_extlink (varchar,integer,varchar,varchar,text,
integer,timestamptz,integer,varchar);
drop function acs_message__new_extlink (varchar,integer,varchar,varchar,text,
integer,timestamptz,integer,varchar,integer);
drop function acs_message__edit_extlink (integer,varchar,varchar,text);
drop function acs_message__delete_extlink (integer);
drop function acs_message__name (integer);
......
This diff is collapsed.
update acs_objects
set title = (select name
from cr_items
where item_id = object_id),
package_id = acs_object__package_id(content_item__get_root_folder(object_id))
where object_type = 'acs_message';
\i ../acs-messaging-packages.sql
update acs_object_types set table_name=null, id_column=null where object_type='acs_message_revision';
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment