查看完整版本: clearcase script 需求专帖

回复 6# 的帖子

用户ActivePerl公司提供的perlapp把脚本编程EXE

求trigger

实现新创建的文件和文件夹继承父目录的权限设置。

关于基线的权限

问题描述如下：
打基线的权限是通过什么来控制的?貌似现在任何人都可以执行这个操作。（CCRC的元数据视图中可以看到所有项目，任何用户都可以创建基线，晕啊。）
现在通过项目经理来打基线、推荐基线。我试过通过trigger来限制，可发现还是有问题：
1。trigger是作用在vob级别，可1个vob下有许多project，每个project是有不同的项目经理打基线的，如何控制到project级别？
2。加了trigger后好象普通用户的deliver操作都受到影响了。
应该怎么把打极限这个操作用权限管理起来呢？
我的trigger如下：
cleartool mktrtype -ucmobject  -all  -nc -preop mkbl -nusers ccadm  -exec "ccperl -e \"exit 1\"" NO_MKBL

回复 22# 的帖子

cleartool mktrtype -element -all  -postop mkelem -execwin "ccperl \\server\ccstg_c\changeGroup.pl" -nc ChangeGroup@vob:\XXXX

##############changGroup.pl#######

$filepath_temp    =     $ENV{CLEARCASE_PN};

#取得新元素的上级目录地址
if ($filepath_temp=~/.*\\/g){
$folder=$&;
}
$folder=~s/\\$//;

#取得上级目录所属的组名

$folder_group=`cleartool des -fmt %[group]p $folder`;

#改变新元素所对应的属组

system("cleartool protect -chgrp \"$folder_group\" \"$filepath_temp\"");

回复 23# 的帖子

Trigger可以不是对整个VOB进行限制的。
可以通过mktrigger进行对单个目录或文件进行设置。

如何剔除已经merge且ci的分支

我想实现一个功能：

如果一个分支，我已经手动merge了，而且已经check in。
此时发现此分支又问题，我又要从这个view中剔除出来。如何操作？

除了手动取删除各个文件的节点外，能又一个什么样的方法，一次性就剔除的么？

注： 这个分支上的文件不能丢，只是从这次的merge中剔除。

标题: Auto Merge
详细信息:项目组所有人在做Merge之前通知Manager
平台:windows
语言工具:Perl/Vbscript
其他信息:

已实现情况见下:

cleartool mktrtype -element -all -nc -postop mkhlink -hltype Merge
-execwin "ccperl D:\tt\trigger\Send e-mail.pl" -nc POST_MERGE_NOTIFY_TRIG@\dev

send e-mail.pl content:

CC Trigger Send E-mail Sample
# file: SendEmail.pl

# Simple example showing how to send email in Perl

use chilkat;

$mailman = new chilkat::CkMailMan();
$mailman->UnlockComponent('anything for 30-day trial');

# Set the SMTP server hostname
$mailman->put_SmtpHost('smtp.comcast.net');

# If your SMTP server requires a login, set username/password
# $mailman->put_SmtpUsername('myUsername');
# $mailman->put_SmtpPassword('myPassword');

# Create a simple email
$email = new chilkat::CkEmail();
$email->put_Subject('Sending mail from Perl');
$email->put_Body('This email was sent from a Perl program');
$email->put_From('Chilkat Support <[email]support@chilkatsoft.com[/email]>');

# Add a few recipients
$email->AddTo('Manager','ta@sina.com.cn');
   
$success = $mailman->SendEmail($email);
if (! $success)
    {
        $mailman->SaveLastError('lastError.txt');        
    }

高手请帮忙修改.

congfig spec的语法会自动检查吗？
我只清楚如果spec编写的不正确就无法获取正确的View，语法检查的话倒是没看到有啊

隐藏lost+found

标题：隐藏lost+found
详细说明：让CCRC客户端看不到cvob里的lost+found 文件夹
平台：windows os 单一平台
语言要求：可用perl或bat
其它信息：做成clearcase trigger

如何在deliver开始的时候，使用trigger来限制开发人员的提交格式

如何在deliver开始的时候，使用trigger来限制开发人员必须提交格式如下内容：
修复Bug单号：
修改目的：

ps：以上内容需要在开发人员做deliver的时候，谈出对话框让他填写后进行deliver

回复 27# 的帖子

It is "POST_MERGE_NOTIFY" not "Merge之前".

回复 28# 的帖子

congfig spec的语法会自动检查，但检查通过的config spec 仍可给出错误view.

标题： 自动化Rebase
详细说明：对于指定的组件或指定的测试流，如果推荐基线有变化，则自动自动rebase操作
平台：windows
语言要求：perl
其它信息：做成clearcase trigger

谢谢各位大大了。

[quote]原帖由 [i]tommy[/i] 于 2007-9-27 18:27 发表 [url=http://www.scmlife.com/bbs/redirect.php?goto=findpost&pid=53600&ptid=1400][img]http://www.scmlife.com/bbs/images/common/back.gif[/img][/url]
标题: Auto Merge
详细信息:自动从一个branch merge to 另外一个 branch
平台:windows
语言工具:batch file
其他信息:可以放在计划任务里，每天晚上做一次,config spec没有上传，根据需求自己写 [/quote]
好东西。。支持多对多merge?

沟通很不方便。。。访问速度太糟糕了

deliver以后自动lock已经提交的activities

什么时候斑竹能罗列下呀。

好贴，谢谢分享

回复 15# 的帖子

cq policy里设置：deliver完成后自动complete活动就可以了