GreenPlum存储过程的源码导出

原创 2012年03月24日 10:04:31

版权所有,请勿转载,

GreenPlum存储过程的源码导出
发布时间:2012-03-23 来源:原创  作者:场之作坊

#!/bin/bash

source /usr/local/greenplum-db/greenplum_path.sh

USAGE ()
{
  echo "Usage: `basename $0` [-d database] [-p port] [-h hostip] [ -U username ] {-f procname} [-o output]";
  echo "ExpFunToFile Parameter Infomation:";
  echo "  Parameter -f must be specified                             [必须指定函数名 例如:public.test]";
  echo "  Parameter -d: Database Name,Default Value:PGDATABASE       [数据库名]";
  echo "  Parameter -p: Database Port,Default Value:5432             [数据库端口]";
  echo "  Parameter -h: Database Host,Defualt Value:PGHOST           [主机IP地址]";
  echo "  Parameter -U: User Name,Default Value:PGUSER               [连接数据库名]";
  echo "  Parameter -o: Output Path,Default Value: pwd               [目标目录]";
  echo ""
  exit 1;
}

if [ $# -lt 2 ]
  then
   USAGE
  fi
 


dbname=""
procname=""
dbport=""
dbhost=""
outpath=""
dbuser=""

#***************************Judge Parameter Begin
  while getopts :d:f:p:h:U:o: OPTION ;
  do
   case "$OPTION" in
     d) dbname="$OPTARG" ;;
     f) procname="$OPTARG" ;;
     p) dbport="$OPTARG" ;;
     h) dbhost="$OPTARG" ;;
     o) outpath="$OPTARG" ;;
     U) dbuser="$OPTARG" ;;
     \?) #usage statement
       USAGE;
       ;;
   esac
  done

  if [ "$procname" = "" ]
   then
     echo "Parameter -f must be specified "
     USAGE;
   else
   if [ `expr index $procname .` -le 0  ]
     then
       echo "The Function Name is the same as schema.funname."
       echo "Eg: public.test "
       exit 1
   fi
  fi
  strdb=""
  if [ "$dbname" != "" ]
   then
     strdb=" -d $dbname "
  fi
  if [ "$dbport" != "" ]
   then
     strdb=$strdb" -p $dbport "
  fi
  if [ "$dbhost" != "" ]
   then
     strdb=$strdb" -h $dbhost "
  fi
  if [ "$dbuser" != "" ]
   then
    strdb=$strdb" -U $dbuser "
  fi
  if [ "$outpath" != "" ]
   then
    outfile=$outpath/$procname.sql
   else
    outfile=$procname.sql
  fi

#获取函数名以及相关的参数
sqlstr="select nspname||'.'|| proname procname,usename,lanname,prorettype::regtype,proargtypes,proallargtypes,proargmodes,proargnames \
from  pg_catalog.pg_proc  a \
  left join pg_catalog.pg_namespace b on a.pronamespace=b.oid \
  left join pg_catalog.pg_user c on a.proowner=c.usesysid \
  left join pg_catalog.pg_language d on a.prolang=d.oid \
where nspname||'.'||proname=lower('$procname');"

#取出返回值
line=`psql -X -t -c "$sqlstr" -A -F#@# $strdb `
#echo $line,$strdb,$sqlstr
#分解返回值
vusername=`echo $line|awk -F#@# '{print $2}'`
vlanname=`echo $line|awk -F#@# '{print $3}'`
vretvalue=`echo $line|awk -F#@# '{print $4}'`
vargtypes=`echo $line|awk -F#@# '{print $5}'|sed 's/[{}]//g'`
vallargtypes=`echo $line|awk -F#@# '{print $6}'|sed 's/[{}]//g'`
vargmodes=`echo $line|awk -F#@# '{print $7}'|sed 's/[{}]//g'`
vargnames=`echo $line|awk -F#@# '{print $8}'|sed 's/[{}]//g'`
vfuntxt=`echo $line|awk -F#@# '{print $9}'`

#判断参数个数
fnum=`echo $vargnames|awk -F, '{print NF}'`

#echo $strarg
#重组函数的参数串
for((i=1;i<=$fnum;i++))
do
  typeid=`echo $vargtypes|cut -d' ' -f$i`
  atypeid=`echo $vallargtypes|cut -d, -f$i`
  amodes=`echo $vargmodes|cut -d, -f$i`
  argnames=`echo $vargnames|cut -d, -f$i`
  echo $typeid
  if [ "$atypeid" = "" ]
   then
      atypeid=$typeid
  fi
  atype=`psql -X -t -c "select $atypeid::regtype" $strdb `
 
  if [ "$amodes" != "o" ]
  then
   strarg="${strarg},in $argnames $atype"
  else
   strarg="${strarg},out $argnames $atype"
  fi 
done
  vstrarg=`echo $strarg|cut -c 2-`

#获取函数体
sqlstr=" select prosrc from  pg_catalog.pg_proc  a \
  left join pg_catalog.pg_namespace b on a.pronamespace=b.oid \
where nspname||'.'||proname=lower('$procname'); "

#生成文件
echo "CREATE OR REPLACE FUNCTION ${procname}($vstrarg)" >$outfile.sql
echo "RETURNS $vretvalue AS " >>$outfile.sql
echo "\$BODY\$" >>$outfile.sql
psql  -X -t -c "$sqlstr" $strdb >>$outfile.sql
echo "\$BODY\$" >>$outfile.sql
echo "LANGUAGE $vlanname VOLATILE;" >>$outfile.sql

#程序结束

 

 


 

聊聊Greenplum的那些事

开卷有益——作者的话   有时候真的感叹人生岁月匆匆,特别是当一个IT人沉浸于某个技术领域十来年后,蓦然回首,总有说不出的万千感慨。 笔者有幸从04年就开始从事大规模数据计算的相关工...
  • paicMis
  • paicMis
  • 2016年12月11日 23:42
  • 12521

Greenplum优化--SQL调优篇

目录 数据库查询预准备 VACUUM ANALYZE EXPLAIN执行计划 两种聚合方式 关联 重分布 查询优化 explain参数 选择合适分布键 分区表 压缩表 分组扩展 窗口函数 列存储和...

Delphi7高级应用开发随书源码

  • 2003年04月30日 00:00
  • 676KB
  • 下载

greenplum程序开发优化14条原则

1、批量数据处理后,无论成功与否,都应该进行vaccumanalyze .   2、对于大表的DISTINCT操作,请用 GROUPBY操作进行替代   3、对于大表的UNION操作,请用UNIONA...

Sql Server A表汇总到B表存储过程(直接赋参数用,源码)

set ANSI_NULLS ON set QUOTED_IDENTIFIER ON GO -- -- -- -- -- ...
  • dxnn520
  • dxnn520
  • 2012年06月05日 20:23
  • 1348

ORACLE存储过程学习源码

  • 2013年06月26日 19:00
  • 40KB
  • 下载

asp存储过程分页源码

//建立存储过程set ANSI_NULLS ONset QUOTED_IDENTIFIER ONgoALTER PROCEDURE [dbo].[Sp_Page]@IntPageSize int,-...
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:GreenPlum存储过程的源码导出
举报原因:
原因补充:

(最多只允许输入30个字)