unsigned int hash_str(str, length)
char *str;
int length;
{
  int hash = 0, mul, i, j;
  for (i = 0; i < length && str[i]; ++i) {
    for (j = i + 1, mul = 1; j < length; ++j)
      mul *= 'Z' - 'A' + 2;
    hash += ((toupper(str[i])) - 'A' + 1) * mul;
  }
  return (hash);
}


x86 assembly (clang, -O0):
<hash_str>:
push   %rbp
mov    %rsp,%rbp
sub    $0x20,%rsp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
movl   $0x0,-0x10(%rbp)
movl   $0x0,-0x18(%rbp)
mov    -0x18(%rbp),%ecx
xor    %eax,%eax
cmp    -0xc(%rbp),%ecx
mov    %al,-0x1d(%rbp)
jge    1153 <hash_str+0x43>
mov    -0x8(%rbp),%rax
movslq -0x18(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x0,%eax
setne  %al
mov    %al,-0x1d(%rbp)
mov    -0x1d(%rbp),%al
test   $0x1,%al
jne    1163 <hash_str+0x53>
jmp    11c3 <hash_str+0xb3>
mov    -0x18(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
movl   $0x1,-0x14(%rbp)
mov    -0x1c(%rbp),%eax
cmp    -0xc(%rbp),%eax
jge    1194 <hash_str+0x84>
imul   $0x1b,-0x14(%rbp),%eax
mov    %eax,-0x14(%rbp)
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    1173 <hash_str+0x63>
mov    -0x8(%rbp),%rax
movslq -0x18(%rbp),%rcx
movsbl (%rax,%rcx,1),%edi
call   1030 <toupper@plt>
sub    $0x41,%eax
add    $0x1,%eax
imul   -0x14(%rbp),%eax
add    -0x10(%rbp),%eax
mov    %eax,-0x10(%rbp)
mov    -0x18(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x18(%rbp)
jmp    112d <hash_str+0x1d>
mov    -0x10(%rbp),%eax
add    $0x20,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<hash_str>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
push   %rax
mov    %rdi,(%rsp)
test   %esi,%esi
jle    12f2 <hash_str+0x1e2>
mov    %esi,%r15d
mov    %esi,%r12d
lea    -0x9(%r15),%ebx
xor    %r13d,%r13d
movdqa 0xee4(%rip),%xmm3
movdqa 0xecc(%rip),%xmm4
xor    %ebp,%ebp
jmp    117a <hash_str+0x6a>
nopl   0x0(%rax,%rax,1)
call   1030 <toupper@plt>
movdqa 0xeb3(%rip),%xmm4
movdqa 0xebb(%rip),%xmm3
add    $0xffffffc0,%eax
imul   %r14d,%eax
add    %eax,%ebp
add    $0xffffffff,%ebx
cmp    %r12,%r13
je     12f4 <hash_str+0x1e4>
mov    (%rsp),%rax
movsbl (%rax,%r13,1),%edi
test   %edi,%edi
je     12f4 <hash_str+0x1e4>
mov    %r13,%rcx
add    $0x1,%r13
mov    $0x1,%r14d
cmp    %r12,%r13
jae    1150 <hash_str+0x40>
not    %ecx
lea    (%rcx,%r15,1),%eax
mov    $0x1,%r14d
cmp    $0x8,%eax
jae    11c0 <hash_str+0xb0>
mov    %r13d,%ecx
jmp    12d2 <hash_str+0x1c2>
cs nopw 0x0(%rax,%rax,1)
mov    %ebx,%edx
shr    $0x3,%edx
add    %r15d,%ecx
add    $0xfffffff8,%ecx
mov    %ecx,%esi
shr    $0x3,%esi
add    $0x1,%esi
movdqa 0xe25(%rip),%xmm0
movdqa %xmm0,%xmm1
cmp    $0x38,%ecx
jb     123b <hash_str+0x12b>
lea    0x1(%rdx),%ecx
and    $0xfffffff8,%ecx
movdqa 0xe0e(%rip),%xmm0
movdqa %xmm0,%xmm1
cs nopw 0x0(%rax,%rax,1)
pshufd $0xf5,%xmm1,%xmm2
pmuludq %xmm4,%xmm1
pshufd $0xe8,%xmm1,%xmm1
pmuludq %xmm4,%xmm2
pshufd $0xe8,%xmm2,%xmm2
punpckldq %xmm2,%xmm1
pshufd $0xf5,%xmm0,%xmm2
pmuludq %xmm4,%xmm0
pshufd $0xe8,%xmm0,%xmm0
pmuludq %xmm4,%xmm2
pshufd $0xe8,%xmm2,%xmm2
punpckldq %xmm2,%xmm0
add    $0xfffffff8,%ecx
jne    1200 <hash_str+0xf0>
mov    %eax,%ecx
and    $0xfffffff8,%ecx
test   $0x7,%sil
je     129a <hash_str+0x18a>
add    $0x1,%dl
movzbl %dl,%edx
and    $0x7,%edx
neg    %edx
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
pshufd $0xf5,%xmm1,%xmm2
pmuludq %xmm3,%xmm1
pshufd $0xe8,%xmm1,%xmm1
pmuludq %xmm3,%xmm2
pshufd $0xe8,%xmm2,%xmm2
punpckldq %xmm2,%xmm1
pshufd $0xf5,%xmm0,%xmm2
pmuludq %xmm3,%xmm0
pshufd $0xe8,%xmm0,%xmm0
pmuludq %xmm3,%xmm2
pshufd $0xe8,%xmm2,%xmm2
punpckldq %xmm2,%xmm0
inc    %edx
jne    1260 <hash_str+0x150>
pshufd $0xf5,%xmm1,%xmm2
pshufd $0xf5,%xmm0,%xmm3
pmuludq %xmm2,%xmm3
pmuludq %xmm1,%xmm0
pshufd $0xee,%xmm0,%xmm1
pmuludq %xmm0,%xmm1
pshufd $0xaa,%xmm3,%xmm0
pmuludq %xmm3,%xmm0
pmuludq %xmm1,%xmm0
movd   %xmm0,%r14d
cmp    %ecx,%eax
je     1150 <hash_str+0x40>
add    %r13d,%ecx
mov    %r15d,%eax
sub    %ecx,%eax
nopw   0x0(%rax,%rax,1)
lea    (%r14,%r14,8),%ecx
lea    (%rcx,%rcx,2),%r14d
add    $0xffffffff,%eax
jne    12e0 <hash_str+0x1d0>
jmp    1150 <hash_str+0x40>
xor    %ebp,%ebp
mov    %ebp,%eax
add    $0x8,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
define i32 @hash_str(i8* %0, i32 %1) {
%3 = alloca i8*
%4 = alloca i32
%5 = alloca i32
%6 = alloca i32
%7 = alloca i32
%8 = alloca i32
store i8* %0, i8** %3
store i32 %1, i32* %4
store i32 0, i32* %5
store i32 0, i32* %7
br label %9
9: ; preds = %50, %2
%10 = load i32, i32* %7
%11 = load i32, i32* %4
%12 = icmp slt i32 %10, %11
br i1 %12, label %13, label %21
13: ; preds = %9
%14 = load i8*, i8** %3
%15 = load i32, i32* %7
%16 = sext i32 %15 to i64
%17 = getelementptr inbounds i8, i8* %14, i64 %16
%18 = load i8, i8* %17
%19 = sext i8 %18 to i32
%20 = icmp ne i32 %19, 0
br label %21
21: ; preds = %13, %9
%22 = phi i1 [ false, %9 ], [ %20, %13 ]
br i1 %22, label %23, label %53
23: ; preds = %21
%24 = load i32, i32* %7
%25 = add nsw i32 %24, 1
store i32 %25, i32* %8
store i32 1, i32* %6
br label %26
26: ; preds = %33, %23
%27 = load i32, i32* %8
%28 = load i32, i32* %4
%29 = icmp slt i32 %27, %28
br i1 %29, label %30, label %36
30: ; preds = %26
%31 = load i32, i32* %6
%32 = mul nsw i32 %31, 27
store i32 %32, i32* %6
br label %33
33: ; preds = %30
%34 = load i32, i32* %8
%35 = add nsw i32 %34, 1
store i32 %35, i32* %8
br label %26
36: ; preds = %26
%37 = load i8*, i8** %3
%38 = load i32, i32* %7
%39 = sext i32 %38 to i64
%40 = getelementptr inbounds i8, i8* %37, i64 %39
%41 = load i8, i8* %40
%42 = sext i8 %41 to i32
%43 = call i32 @toupper(i32 %42)
%44 = sub nsw i32 %43, 65
%45 = add nsw i32 %44, 1
%46 = load i32, i32* %6
%47 = mul nsw i32 %45, %46
%48 = load i32, i32* %5
%49 = add nsw i32 %48, %47
store i32 %49, i32* %5
br label %50
50: ; preds = %36
%51 = load i32, i32* %7
%52 = add nsw i32 %51, 1
store i32 %52, i32* %7
br label %9
53: ; preds = %21
%54 = load i32, i32* %5
ret i32 %54
}

LLVM IR (-O2):
define i32 @hash_str(i8* nocapture %0, i32 %1) {
%3 = icmp sgt i32 %1, 0
br i1 %3, label %4, label %80
4: ; preds = %2
%5 = zext i32 %1 to i64
%6 = zext i32 %1 to i64
br label %7
7: ; preds = %4, %72
%8 = phi i64 [ 0, %4 ], [ %23, %72 ]
%9 = phi i32 [ 0, %4 ], [ %78, %72 ]
%10 = trunc i64 %8 to i32
%11 = xor i32 %10, -1
%12 = add i32 %11, %1
%13 = add i32 %12, -8
%14 = lshr i32 %13, 3
%15 = add nuw nsw i32 %14, 1
%16 = trunc i64 %8 to i32
%17 = xor i32 %16, -1
%18 = add i32 %17, %1
%19 = getelementptr inbounds i8, i8* %0, i64 %8
%20 = load i8, i8* %19
%21 = icmp eq i8 %20, 0
br i1 %21, label %80, label %22
22: ; preds = %7
%23 = add nuw nsw i64 %8, 1
%24 = icmp ult i64 %23, %5
br i1 %24, label %25, label %72
25: ; preds = %22
%26 = trunc i64 %23 to i32
%27 = icmp ult i32 %18, 8
br i1 %27, label %63, label %28
28: ; preds = %25
%29 = and i32 %18, -8
%30 = add i32 %29, %26
%31 = and i32 %15, 7
%32 = icmp ult i32 %13, 56
br i1 %32, label %43, label %33
33: ; preds = %28
%34 = and i32 %15, 1073741816
br label %35
35: ; preds = %35, %33
%36 = phi <4 x i32> [ <i32 1, i32 1, i32 1, i32 1>, %33 ], [ %39, %35 ]
%37 = phi <4 x i32> [ <i32 1, i32 1, i32 1, i32 1>, %33 ], [ %40, %35 ]
%38 = phi i32 [ 0, %33 ], [ %41, %35 ]
%39 = mul <4 x i32> %36, <i32 -1038305055, i32 -1038305055, i32 -1038305055, i32 -1038305055>
%40 = mul <4 x i32> %37, <i32 -1038305055, i32 -1038305055, i32 -1038305055, i32 -1038305055>
%41 = add nuw i32 %38, 8
%42 = icmp eq i32 %41, %34
br i1 %42, label %43, label %35
43: ; preds = %35, %28
%44 = phi <4 x i32> [ undef, %28 ], [ %39, %35 ]
%45 = phi <4 x i32> [ undef, %28 ], [ %40, %35 ]
%46 = phi <4 x i32> [ <i32 1, i32 1, i32 1, i32 1>, %28 ], [ %39, %35 ]
%47 = phi <4 x i32> [ <i32 1, i32 1, i32 1, i32 1>, %28 ], [ %40, %35 ]
%48 = icmp eq i32 %31, 0
br i1 %48, label %57, label %49
49: ; preds = %43, %49
%50 = phi <4 x i32> [ %53, %49 ], [ %46, %43 ]
%51 = phi <4 x i32> [ %54, %49 ], [ %47, %43 ]
%52 = phi i32 [ %55, %49 ], [ 0, %43 ]
%53 = mul <4 x i32> %50, <i32 27, i32 27, i32 27, i32 27>
%54 = mul <4 x i32> %51, <i32 27, i32 27, i32 27, i32 27>
%55 = add i32 %52, 1
%56 = icmp eq i32 %55, %31
br i1 %56, label %57, label %49
57: ; preds = %49, %43
%58 = phi <4 x i32> [ %44, %43 ], [ %53, %49 ]
%59 = phi <4 x i32> [ %45, %43 ], [ %54, %49 ]
%60 = mul <4 x i32> %59, %58
%61 = call i32 @llvm.vector.reduce.mul.v4i32(<4 x i32> %60)
%62 = icmp eq i32 %18, %29
br i1 %62, label %72, label %63
63: ; preds = %25, %57
%64 = phi i32 [ %26, %25 ], [ %30, %57 ]
%65 = phi i32 [ 1, %25 ], [ %61, %57 ]
br label %66
66: ; preds = %63, %66
%67 = phi i32 [ %70, %66 ], [ %64, %63 ]
%68 = phi i32 [ %69, %66 ], [ %65, %63 ]
%69 = mul nsw i32 %68, 27
%70 = add nuw nsw i32 %67, 1
%71 = icmp eq i32 %70, %1
br i1 %71, label %72, label %66
72: ; preds = %66, %57, %22
%73 = phi i32 [ 1, %22 ], [ %61, %57 ], [ %69, %66 ]
%74 = sext i8 %20 to i32
%75 = tail call i32 @toupper(i32 %74)
%76 = add nsw i32 %75, -64
%77 = mul nsw i32 %76, %73
%78 = add nsw i32 %77, %9
%79 = icmp eq i64 %23, %6
br i1 %79, label %80, label %7
80: ; preds = %7, %72, %2
%81 = phi i32 [ 0, %2 ], [ %78, %72 ], [ %9, %7 ]
ret i32 %81
}