Attachment 155538 Details for Bug 239004 – find-provides script for ocaml

find-provides script for ocaml

ocaml-find-provides.sh (text/plain), 1.83 KB, created by Richard W.M. Jones on 2007-05-28 11:13:58 UTC

(hide)

Description:

Filename:

MIME Type:

Creator: Richard W.M. Jones

Created: 2007-05-28 11:13:58 UTC

Size: 1.83 KB

patch

obsolete

>#!/bin/sh -
># OCaml-specific "find-provides" for RPM.
># By Richard W.M. Jones <rjones@redhat.com>
># $Id: ocaml-find-provides.sh,v 1.6 2007/05/25 17:09:21 rjones Exp $
>
>#set -x
>
># Usage:
>#   (1) Add the following to the spec file:
>#   %define _use_internal_dependency_generator 0
>#   %define __find_requires /usr/lib/rpm/ocaml-find-requires.sh
>#   %define __find_provides /usr/lib/rpm/ocaml-find-provides.sh
>#
>#   (2) If you don't want the module to depend on the exact compiler
>#   version then use ocaml-find-requires.sh -c, but this is not something
>#   you should do normally.
>#
>#   (3) For any modules which you want to ignore, use '-i Modulename'.
>
>TEMP=`getopt -o i: -n ocaml-find-provides.sh -- "$@"`
>if [ $? != 0 ]; then echo "ocaml-find-provides.sh: failed" >&2; exit 1; fi
>eval set -- "$TEMP"
>
>ignore_modules=nOTREAL
>
>while true; do
>    case "$1" in
>	-i) ignore_modules="$2 $ignore_modules"; shift 2;;
>	--) shift; break;;
>	*) echo "ocaml-find-provides.sh: option error at $1"; exit 1;;
>    esac
>done
>
># Get the list of files.
>files=`sed "s/['\"]/\\\&/g"`
>
># Use ordinary find-provides first.
>echo $files | tr [:blank:] '\n' | /usr/lib/rpm/find-provides
>
># Get list of .cmi, .cmo and .cma files.
>files=`echo $files | tr [:blank:] '\n' | grep '\.cm[ioa]$'`
>
>if [ -z "$files" ]; then exit 0; fi
>
># Get the list of modules exported by the files.
>modules=`ocamlobjinfo $files |
>          grep -E '(Unit|Module) name: ' |
>          awk '{print $3}'`
>
># Turn list of modules into a regexp that matches the module names.
>modules_re=`echo $modules | sed 's/ /|/g'`
>ignore_modules_re=`echo $ignore_modules | sed 's/ /|/g'`
>
># Get a list of the modules these file(s) provide.
>ocamlobjinfo $files |
>grep -Eo '[0-9a-f]{32}[[:space:]]+[A-Za-z0-9_]+' |
>grep -E "$modules_re" |
>while read md5sum module; do
>    echo ocaml-$module-$md5sum
>done |
>grep -Ev "$ignore_modules_re" |
>sort -u

Actions: View

Attachments on bug 239004: 155537 | 155538 | 156725 | 156727