Shell Programming and Scripting

gawk '
BEGIN{
   FS=OFS=","
}
prev!=$1 && prev{
   for(i=1;i<=count;i++){
     print prev,a[prev,i]
   }
   prev=count=""
}
{
   prev=$1
   sub(/[^,]*,/,"")
   if(count==6){
     count=1
   }
   else{
     count++
   }
   a[prev,count]=a[prev,count]?a[prev,count] OFS $0:$0
}
END{
   if(prev){
     for(i=1;i<=count;i++){
        print prev,a[prev,i]
     }
   }
}'  tmp1.txt > tmp1

gawk -F, '
 func init_block() {ts=$1;delete a;cnt=0;nf0=NF}
 func dump_block() {for(f=2;f<=nf0;f+=1){printf("%s",ts);for(r=1;r<=cnt;r+=1){printf(",%s",a[r,f])};print ""}}
 BEGIN{ts=-1}
 ts<0{init_block()}
 ts!=$1{dump_block();init_block()}
 {cnt+=1;for(f=1; f<=NF; f++) a[cnt,f]=$f}
 END{dump_block()}' < tmp1 > tmp.txt

awk '
BEGIN {	FS = OFS = ","
}
{	for(i = 2; i <= NF; i++)
		d[NR % 6, i] = $i
}
!(NR % 6) {
	for(i = 2; i <= NF; i++)
		print $1, d[1, i], d[2, i], d[3, i], d[4, i], d[5, i], d[0, i]
}' tmp1.txt

awk '                    ##Starting awk code from here.
BEGIN {	FS = OFS = ","   ##Starting BEGIN section of awk where setting FS and OFS value to comma for the Input_file.
}
{	for(i = 2; i <= NF; i++)  ##Starting a for loop which starts from i=2 value to till value of NF.
		d[NR % 6, i] = $i ##Creating an array d whose index is NR%6 means will be 0 on every line which is dividable with 6 and value of variable i as second index.
}
!(NR % 6) {                       ##Checking condition here if current line value if fully dividable with 6.
	for(i = 2; i <= NF; i++)  ##Starting a for loop again here from value of i from 2 to till value of NF in line.
		print $1, d[1, i], d[2, i], d[3, i], d[4, i], d[5, i], d[0, i]  ##Printing values of array d with indexes from 1 to 6 and i value as per loop.
}' tmp1.txt                       ##mentioning Input_file name here.